43: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
44: --
45: IF l_debug_on IS NULL
46: THEN
47: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
48: END IF;
49: --
50: IF l_debug_on THEN
51: WSH_DEBUG_SV.push(l_module_name);
47: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
48: END IF;
49: --
50: IF l_debug_on THEN
51: WSH_DEBUG_SV.push(l_module_name);
52: --
53: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
54: END IF;
55: --
49: --
50: IF l_debug_on THEN
51: WSH_DEBUG_SV.push(l_module_name);
52: --
53: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
54: END IF;
55: --
56: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
57:
60: --
61: -- Debug Statements
62: --
63: IF l_debug_on THEN
64: WSH_DEBUG_SV.pop(l_module_name);
65: END IF;
66: --
67: RETURN;
68: END IF;
82: --
83: --
84: x_group_by_flags := group_by_info;
85: IF l_debug_on THEN
86: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
87: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
88: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
83: --
84: x_group_by_flags := group_by_info;
85: IF l_debug_on THEN
86: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
87: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
88: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
91: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
84: x_group_by_flags := group_by_info;
85: IF l_debug_on THEN
86: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
87: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
88: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
91: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
92: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
85: IF l_debug_on THEN
86: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
87: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
88: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
91: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
92: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
93: WSH_DEBUG_SV.pop(l_module_name);
86: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
87: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
88: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
91: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
92: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
93: WSH_DEBUG_SV.pop(l_module_name);
94: END IF;
87: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
88: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
91: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
92: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
93: WSH_DEBUG_SV.pop(l_module_name);
94: END IF;
95: RETURN;
88: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
91: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
92: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
93: WSH_DEBUG_SV.pop(l_module_name);
94: END IF;
95: RETURN;
96: END IF;
89: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
90: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
91: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
92: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
93: WSH_DEBUG_SV.pop(l_module_name);
94: END IF;
95: RETURN;
96: END IF;
97:
106: --
107: -- Debug Statements
108: --
109: IF l_debug_on THEN
110: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
111: END IF;
112: --
113: FND_MESSAGE.SET_TOKEN('ORG_NAME',wsh_util_core.get_org_name(p_organization_id));
114: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
116: --
117: -- Debug Statements
118: --
119: IF l_debug_on THEN
120: WSH_DEBUG_SV.pop(l_module_name);
121: END IF;
122: --
123: RETURN;
124: END IF;
136:
137: x_group_by_flags := group_by_info;
138:
139: IF l_debug_on THEN
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
143: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
144: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
137: x_group_by_flags := group_by_info;
138:
139: IF l_debug_on THEN
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
143: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
144: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
145: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
138:
139: IF l_debug_on THEN
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
143: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
144: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
145: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
146: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
139: IF l_debug_on THEN
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
143: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
144: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
145: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
146: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
147: END IF;
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
143: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
144: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
145: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
146: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
147: END IF;
148: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
143: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
144: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
145: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
146: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
147: END IF;
148: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
149:
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
143: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
144: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
145: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
146: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
147: END IF;
148: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
149:
150: --
150: --
151: -- Debug Statements
152: --
153: IF l_debug_on THEN
154: WSH_DEBUG_SV.pop(l_module_name);
155: END IF;
156: --
157: EXCEPTION
158: WHEN Others THEN
161: --
162: -- Debug Statements
163: --
164: IF l_debug_on THEN
165: WSH_DEBUG_SV.logmsg(l_module_name, 'THE UNEXPECTED ERROR FROM GET_GROUP_BY_ATTR IS ' || L_ERROR_TEXT );
166: END IF;
167: --
168: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR');
169: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
171: --
172: -- Debug Statements
173: --
174: IF l_debug_on THEN
175: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
176: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
177: END IF;
178: --
179: END get_group_by_attr;
172: -- Debug Statements
173: --
174: IF l_debug_on THEN
175: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
176: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
177: END IF;
178: --
179: END get_group_by_attr;
180:
284: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
285: --
286: IF l_debug_on IS NULL
287: THEN
288: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
289: END IF;
290: --
291: IF l_debug_on THEN
292: WSH_DEBUG_SV.push(l_module_name);
288: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
289: END IF;
290: --
291: IF l_debug_on THEN
292: WSH_DEBUG_SV.push(l_module_name);
293: WSH_DEBUG_SV.logmsg(l_module_name, 'attributes count: '|| p_grouping_attributes.count);
294: END IF;
295:
296: i := p_grouping_attributes.FIRST;
289: END IF;
290: --
291: IF l_debug_on THEN
292: WSH_DEBUG_SV.push(l_module_name);
293: WSH_DEBUG_SV.logmsg(l_module_name, 'attributes count: '|| p_grouping_attributes.count);
294: END IF;
295:
296: i := p_grouping_attributes.FIRST;
297: WHILE i is NOT NULL LOOP
296: i := p_grouping_attributes.FIRST;
297: WHILE i is NOT NULL LOOP
298:
299: IF l_debug_on THEN
300: WSH_DEBUG_SV.logmsg(l_module_name, 'entity: '|| p_grouping_attributes(i).entity_type);
301: WSH_DEBUG_SV.logmsg(l_module_name, 'entity_id: '|| p_grouping_attributes(i).entity_id);
302: WSH_DEBUG_SV.logmsg(l_module_name, 'index: '||i);
303: END IF;
304:
297: WHILE i is NOT NULL LOOP
298:
299: IF l_debug_on THEN
300: WSH_DEBUG_SV.logmsg(l_module_name, 'entity: '|| p_grouping_attributes(i).entity_type);
301: WSH_DEBUG_SV.logmsg(l_module_name, 'entity_id: '|| p_grouping_attributes(i).entity_id);
302: WSH_DEBUG_SV.logmsg(l_module_name, 'index: '||i);
303: END IF;
304:
305: IF p_grouping_attributes(i).ship_to_location_id IS NULL OR p_grouping_attributes(i).ship_from_location_id IS NULL THEN
298:
299: IF l_debug_on THEN
300: WSH_DEBUG_SV.logmsg(l_module_name, 'entity: '|| p_grouping_attributes(i).entity_type);
301: WSH_DEBUG_SV.logmsg(l_module_name, 'entity_id: '|| p_grouping_attributes(i).entity_id);
302: WSH_DEBUG_SV.logmsg(l_module_name, 'index: '||i);
303: END IF;
304:
305: IF p_grouping_attributes(i).ship_to_location_id IS NULL OR p_grouping_attributes(i).ship_from_location_id IS NULL THEN
306:
307: IF p_grouping_attributes(i).entity_type = 'DELIVERY'
308: AND p_grouping_attributes(i).entity_id IS NOT NULL THEN
309:
310: IF l_debug_on THEN
311: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Calling c_delivery_group');
312: END IF;
313:
314: OPEN c_delivery_group(p_grouping_attributes(i).entity_id);
315: FETCH c_delivery_group INTO l_grouping_attributes;
318: ELSIF p_grouping_attributes(i).entity_type = 'DELIVERY_DETAIL'
319: AND p_grouping_attributes(i).entity_id IS NOT NULL THEN
320:
321: IF l_debug_on THEN
322: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Calling c_detail_group');
323: END IF;
324:
325:
326: OPEN c_detail_group(p_grouping_attributes(i).entity_id);
339: END IF;
340:
341:
342: IF l_debug_on THEN
343: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || p_group_by_header );
344: END IF;
345:
346: IF p_action_code = 'AUTOCREATE_DELIVERIES' THEN
347:
352: l_group_by_header := 'N';
353:
354: END IF;
355: IF l_debug_on THEN
356: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || l_group_by_header );
357: END IF;
358:
359: get_group_by_attr (
360: p_organization_id => l_grouping_attributes.organization_id,
362: x_return_status => x_return_status,
363: p_group_by_header_flag => l_group_by_header);
364:
365: IF l_debug_on THEN
366: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
367: END IF;
368:
369: --
370: -- Line direction is also a mandatory grouping attribute.
435:
436: IF l_grouping_attributes.line_direction IN ('O','IO') -- J-IB-NPARIKH
437: THEN
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
440: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
441: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
442: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
443: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
436: IF l_grouping_attributes.line_direction IN ('O','IO') -- J-IB-NPARIKH
437: THEN
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
440: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
441: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
442: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
443: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
444: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
437: THEN
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
440: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
441: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
442: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
443: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
444: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
445: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
440: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
441: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
442: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
443: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
444: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
445: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
446: END IF;
439: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
440: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
441: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
442: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
443: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
444: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
445: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
446: END IF;
447: --{
440: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
441: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
442: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
443: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
444: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
445: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
446: END IF;
447: --{
448: IF (group_by_info.customer = 'Y') THEN
441: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
442: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
443: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
444: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
445: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
446: END IF;
447: --{
448: IF (group_by_info.customer = 'Y') THEN
449: l1_hash_string := l1_hash_string ||'-'||to_char(l_grouping_attributes.customer_id);
485:
486: IF (NVL(p_group_by_header, group_by_info.header) = 'Y'
487: AND l_grouping_attributes.line_direction IN ('O','IO') ) THEN
488: IF l_debug_on THEN
489: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || NVL(p_group_by_header, group_by_info.header) );
490: END IF;
491: p_grouping_attributes(i).source_header_id := l_grouping_attributes.source_header_id;
492: ELSE
493: p_grouping_attributes(i).source_header_id := NULL;
545: -- Debug Statements
546:
547: --
548: IF l_debug_on THEN
549: WSH_DEBUG_SV.logmsg(l_module_name, 'L1_HASH_STRING '||L1_HASH_STRING ||' VALUE '||L1_HASH_VALUE );
550: END IF;
551:
552:
553: --
567:
568: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
569:
570: IF l_debug_on THEN
571: WSH_DEBUG_SV.pop(l_module_name);
572: END IF;
573:
574: EXCEPTION
575:
579: --
580: -- Debug Statements
581: --
582: IF l_debug_on THEN
583: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
584: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
585: END IF;
586:
587:
580: -- Debug Statements
581: --
582: IF l_debug_on THEN
583: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
584: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
585: END IF;
586:
587:
588:
606: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
607: --
608: IF l_debug_on IS NULL
609: THEN
610: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
611: END IF;
612: --
613: IF l_debug_on THEN
614: WSH_DEBUG_SV.push(l_module_name);
610: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
611: END IF;
612: --
613: IF l_debug_on THEN
614: WSH_DEBUG_SV.push(l_module_name);
615: END IF;
616: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
617:
618: l_grp_attr_tab(1).ship_to_location_id := p_delivery_rec.ultimate_dropoff_location_id;
650: p_delivery_rec.hash_string := l_grp_attr_tab(1).l1_hash_string;
651:
652:
653: IF l_debug_on THEN
654: WSH_DEBUG_SV.pop(l_module_name);
655: END IF;
656:
657: EXCEPTION
658:
663: --
664: -- Debug Statements
665: --
666: IF l_debug_on THEN
667: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
668: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
669: END IF;
670: --
671:
664: -- Debug Statements
665: --
666: IF l_debug_on THEN
667: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
668: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
669: END IF;
670: --
671:
672: WHEN Others THEN
676: -- Debug Statements
677: --
678: IF l_debug_on THEN
679:
680: WSH_DEBUG_SV.logmsg(l_module_name,'OTHERS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
682: END IF;
683: --
684:
677: --
678: IF l_debug_on THEN
679:
680: WSH_DEBUG_SV.logmsg(l_module_name,'OTHERS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
682: END IF;
683: --
684:
685:
717: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
718: --
719: IF l_debug_on IS NULL
720: THEN
721: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
722: END IF;
723: --
724: IF l_debug_on THEN
725: WSH_DEBUG_SV.push(l_module_name);
721: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
722: END IF;
723: --
724: IF l_debug_on THEN
725: WSH_DEBUG_SV.push(l_module_name);
726: END IF;
727: --
728: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
729:
829: -- Add this record to the group.
830: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
831:
832: IF l_debug_on THEN
833: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
834: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
835: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
830: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
831:
832: IF l_debug_on THEN
833: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
834: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
835: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
831:
832: IF l_debug_on THEN
833: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
834: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
835: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
832: IF l_debug_on THEN
833: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
834: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
835: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
840: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
833: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
834: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
835: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
840: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
841: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
834: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
835: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
840: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
841: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
842: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
835: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
840: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
841: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
842: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
843: END IF;
836: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
840: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
841: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
842: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
843: END IF;
844:
837: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
840: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
841: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
842: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
843: END IF;
844:
845: ELSE
838: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
839: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
840: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
841: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
842: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
843: END IF;
844:
845: ELSE
846:
845: ELSE
846:
847: -- Index exists but the hash strings/attributes do not match.
848: IF l_debug_on THEN
849: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
850: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
851: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
846:
847: -- Index exists but the hash strings/attributes do not match.
848: IF l_debug_on THEN
849: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
850: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
851: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
847: -- Index exists but the hash strings/attributes do not match.
848: IF l_debug_on THEN
849: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
850: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
851: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
855: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
848: IF l_debug_on THEN
849: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
850: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
851: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
855: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
856: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
849: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
850: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
851: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
855: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
856: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
857: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
850: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
851: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
855: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
856: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
857: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
858: END IF;
851: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
855: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
856: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
857: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
858: END IF;
859:
852: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
855: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
856: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
857: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
858: END IF;
859:
860: IF p_check_one_group = 'Y' THEN
853: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
854: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
855: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
856: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
857: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
858: END IF;
859:
860: IF p_check_one_group = 'Y' THEN
861:
898: select WSH_MATCH_GROUP_S.nextval into p_group_tab(l_group_index).group_id from dual;
899: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
900:
901: IF l_debug_on THEN
902: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
903: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
904: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
899: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
900:
901: IF l_debug_on THEN
902: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
903: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
904: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
900:
901: IF l_debug_on THEN
902: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
903: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
904: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
901: IF l_debug_on THEN
902: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
903: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
904: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
902: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
903: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
904: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
903: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
904: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
904: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
912: END IF;
905: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
912: END IF;
913:
906: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
912: END IF;
913:
914: l_hashval_exists := TRUE;
907: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
908: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
912: END IF;
913:
914: l_hashval_exists := TRUE;
915:
936: --
937: -- Debug Statements
938: --
939: IF l_debug_on THEN
940: WSH_DEBUG_SV.pop(l_module_name);
941: END IF;
942: --
943:
944:
950: --
951: -- Debug Statements
952: --
953: IF l_debug_on THEN
954: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
955: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_MULTIPE_GROUPS');
956: END IF;
957: --
958:
951: -- Debug Statements
952: --
953: IF l_debug_on THEN
954: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
955: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_MULTIPE_GROUPS');
956: END IF;
957: --
958:
959: WHEN Others THEN
962: --
963: -- Debug Statements
964: --
965: IF l_debug_on THEN
966: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.
967: C_UNEXPEC_ERR_LEVEL);
968: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
969: END IF;
970:
964: --
965: IF l_debug_on THEN
966: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.
967: C_UNEXPEC_ERR_LEVEL);
968: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
969: END IF;
970:
971: END;
972:
1134: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1135: --
1136: IF l_debug_on IS NULL
1137: THEN
1138: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1139: END IF;
1140: --
1141: IF l_debug_on THEN
1142: WSH_DEBUG_SV.push(l_module_name);
1138: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1139: END IF;
1140: --
1141: IF l_debug_on THEN
1142: WSH_DEBUG_SV.push(l_module_name);
1143: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1144: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1145: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1146: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1139: END IF;
1140: --
1141: IF l_debug_on THEN
1142: WSH_DEBUG_SV.push(l_module_name);
1143: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1144: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1145: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1146: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1147: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1140: --
1141: IF l_debug_on THEN
1142: WSH_DEBUG_SV.push(l_module_name);
1143: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1144: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1145: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1146: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1147: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1148: END IF;
1141: IF l_debug_on THEN
1142: WSH_DEBUG_SV.push(l_module_name);
1143: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1144: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1145: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1146: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1147: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1148: END IF;
1149:
1142: WSH_DEBUG_SV.push(l_module_name);
1143: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1144: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1145: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1146: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1147: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1148: END IF;
1149:
1150:
1143: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1144: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1145: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1146: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1147: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1148: END IF;
1149:
1150:
1151: -- Need to validate the input action.
1175: IF p_attr_tab(p_attr_tab.FIRST).entity_type = 'DELIVERY_DETAIL'
1176: THEN
1177: --{
1178: IF l_debug_on THEN
1179: wsh_debug_sv.log(l_module_name, 'entity id', p_attr_tab(p_attr_tab.FIRST).entity_id);
1180: END IF;
1181:
1182: OPEN c_check_lpn(p_attr_tab(p_attr_tab.FIRST).entity_id);
1183: FETCH c_check_lpn INTO l_container_flag, l_organization_id,
1184: l_ship_from_loc_id, l_customer_id;
1185: CLOSE c_check_lpn;
1186:
1187: IF l_debug_on THEN
1188: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1189: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1190: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1191: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1192: END IF;
1185: CLOSE c_check_lpn;
1186:
1187: IF l_debug_on THEN
1188: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1189: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1190: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1191: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1192: END IF;
1193:
1186:
1187: IF l_debug_on THEN
1188: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1189: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1190: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1191: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1192: END IF;
1193:
1194: IF nvl(l_container_flag, 'N') = 'Y'
1187: IF l_debug_on THEN
1188: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1189: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1190: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1191: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1192: END IF;
1193:
1194: IF nvl(l_container_flag, 'N') = 'Y'
1195: THEN
1203: RAISE fnd_api.g_exc_error;
1204: END IF;
1205:
1206: IF l_debug_on THEN
1207: wsh_debug_sv.log(l_module_name, 'l_empty_container', l_empty_container);
1208: END IF;
1209: --}
1210: END IF;
1211: --}
1215: --BUG 3383843
1216:
1217:
1218: IF l_debug_on THEN
1219: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Create_Hash',WSH_DEBUG_SV.C_PROC_LEVEL);
1220: END IF;
1221: Create_Hash(p_grouping_attributes => p_attr_tab,
1222: p_group_by_header => p_action_rec.group_by_header_flag,
1223: p_action_code => p_action_rec.action,
1238: l_check_one_group := 'N';
1239:
1240: END IF;
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Create_Groupings',WSH_DEBUG_SV.C_PROC_LEVEL);
1243: END IF;
1244:
1245: Create_Groupings(p_attr_tab => p_attr_tab,
1246: p_group_tab => p_group_tab,
1258:
1259: x_out_rec.single_group := 'N';
1260:
1261: IF l_debug_on THEN
1262: WSH_DEBUG_SV.pop(l_module_name);
1263: END IF;
1264:
1265: RETURN;
1266:
1291: FETCH c_dlvy_for_cont BULK COLLECT INTO l_matched_entities;
1292: CLOSE c_dlvy_for_cont;
1293: --
1294: IF l_debug_on THEN
1295: wsh_debug_sv.log(l_module_name, 'Empty container match count=' || l_matched_entities.count);
1296: END IF;
1297: ELSE
1298: -- Find all matching deliveries
1299: -- Populate the following variables used to find matching deliveries.
1315: x_group_by_flags => group_by_info,
1316: x_return_status => x_return_status
1317: );
1318: IF l_debug_on THEN
1319: wsh_debug_sv.log(l_Module_name , 'group by ship method ', group_by_info.ship_method);
1320: END IF;
1321:
1322: IF group_by_info.customer = 'N' THEN
1323: l_customer_id := NULL;
1380:
1381: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1382:
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.pop(l_module_name);
1385: END IF;
1386:
1387: RETURN;
1388:
1394:
1395: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1396:
1397: IF l_debug_on THEN
1398: WSH_DEBUG_SV.pop(l_module_name);
1399: END IF;
1400:
1401: RETURN;
1402:
1448:
1449: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1450:
1451: IF l_debug_on THEN
1452: WSH_DEBUG_SV.pop(l_module_name);
1453: END IF;
1454:
1455: RETURN;
1456:
1460: END IF;
1461:
1462:
1463: IF l_debug_on THEN
1464: WSH_DEBUG_SV.pop(l_module_name);
1465: END IF;
1466:
1467: EXCEPTION
1468: WHEN fnd_api.g_exc_error THEN
1468: WHEN fnd_api.g_exc_error THEN
1469: x_return_status := fnd_api.g_ret_sts_error;
1470: --
1471: IF l_debug_on THEN
1472: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
1473: END IF;
1474: --
1475: WHEN DELIVERY_NOT_MATCH THEN
1476: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1479: --
1480: -- Debug Statements
1481: --
1482: IF l_debug_on THEN
1483: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_NOT_MATCH exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1484: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELIVERY_NOT_MATCH');
1485: END IF;
1486: --
1487: WHEN FAIL_CREATE_GROUP THEN
1480: -- Debug Statements
1481: --
1482: IF l_debug_on THEN
1483: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_NOT_MATCH exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1484: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELIVERY_NOT_MATCH');
1485: END IF;
1486: --
1487: WHEN FAIL_CREATE_GROUP THEN
1488: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1491: --
1492: -- Debug Statements
1493: --
1494: IF l_debug_on THEN
1495: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1496: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_GROUP');
1497: END IF;
1498: --
1499: WHEN FAIL_CREATE_HASH THEN
1492: -- Debug Statements
1493: --
1494: IF l_debug_on THEN
1495: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1496: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_GROUP');
1497: END IF;
1498: --
1499: WHEN FAIL_CREATE_HASH THEN
1500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1503: --
1504: -- Debug Statements
1505: --
1506: IF l_debug_on THEN
1507: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1508:
1509: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
1510: END IF;
1511: --
1505: --
1506: IF l_debug_on THEN
1507: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1508:
1509: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
1510: END IF;
1511: --
1512:
1513: WHEN Others THEN
1524: --
1525: -- Debug Statements
1526: --
1527: IF l_debug_on THEN
1528: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1529: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1530: END IF;
1531:
1532: END;
1525: -- Debug Statements
1526: --
1527: IF l_debug_on THEN
1528: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1529: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1530: END IF;
1531:
1532: END;
1533:
1566: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1567: --
1568: IF l_debug_on IS NULL
1569: THEN
1570: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1571: END IF;
1572: --
1573: IF l_debug_on THEN
1574: WSH_DEBUG_SV.push(l_module_name);
1570: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1571: END IF;
1572: --
1573: IF l_debug_on THEN
1574: WSH_DEBUG_SV.push(l_module_name);
1575: --
1576: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1577: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1578: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1572: --
1573: IF l_debug_on THEN
1574: WSH_DEBUG_SV.push(l_module_name);
1575: --
1576: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1577: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1578: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1579: END IF;
1580: --
1573: IF l_debug_on THEN
1574: WSH_DEBUG_SV.push(l_module_name);
1575: --
1576: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1577: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1578: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1579: END IF;
1580: --
1581: --
1574: WSH_DEBUG_SV.push(l_module_name);
1575: --
1576: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1577: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1578: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1579: END IF;
1580: --
1581: --
1582: -- Debug Statements
1581: --
1582: -- Debug Statements
1583: --
1584: IF l_debug_on THEN
1585: WSH_DEBUG_SV.pop(l_module_name);
1586: END IF;
1587: --
1588: RETURN TRUE;
1589:
1615: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1616: --
1617: IF l_debug_on IS NULL
1618: THEN
1619: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1620: END IF;
1621: --
1622: IF l_debug_on THEN
1623: WSH_DEBUG_SV.push(l_module_name);
1619: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1620: END IF;
1621: --
1622: IF l_debug_on THEN
1623: WSH_DEBUG_SV.push(l_module_name);
1624: --
1625: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1626: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1627: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1621: --
1622: IF l_debug_on THEN
1623: WSH_DEBUG_SV.push(l_module_name);
1624: --
1625: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1626: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1627: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1628: END IF;
1629: --
1622: IF l_debug_on THEN
1623: WSH_DEBUG_SV.push(l_module_name);
1624: --
1625: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1626: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1627: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1628: END IF;
1629: --
1630: --
1623: WSH_DEBUG_SV.push(l_module_name);
1624: --
1625: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1626: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1627: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1628: END IF;
1629: --
1630: --
1631: -- Debug Statements
1630: --
1631: -- Debug Statements
1632: --
1633: IF l_debug_on THEN
1634: WSH_DEBUG_SV.pop(l_module_name);
1635: END IF;
1636: --
1637: RETURN TRUE;
1638:
1664: BEGIN
1665:
1666: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1667: IF l_debug_on IS NULL THEN
1668: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1669: END IF;
1670:
1671: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1672:
1670:
1671: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1672:
1673: IF l_debug_on THEN
1674: WSH_DEBUG_SV.push(l_module_name);
1675: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1676: END IF;
1677: WSH_NEW_DELIVERIES_PVT.Create_Delivery(p_delivery_info, x_rowid, x_delivery_id, x_delivery_name, x_return_status);
1678: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1671: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1672:
1673: IF l_debug_on THEN
1674: WSH_DEBUG_SV.push(l_module_name);
1675: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1676: END IF;
1677: WSH_NEW_DELIVERIES_PVT.Create_Delivery(p_delivery_info, x_rowid, x_delivery_id, x_delivery_name, x_return_status);
1678: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1679: IF l_debug_on THEN
1676: END IF;
1677: WSH_NEW_DELIVERIES_PVT.Create_Delivery(p_delivery_info, x_rowid, x_delivery_id, x_delivery_name, x_return_status);
1678: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1679: IF l_debug_on THEN
1680: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY ');
1681: END IF;
1682: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1683: IF l_debug_on THEN
1684: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
1680: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY ');
1681: END IF;
1682: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1683: IF l_debug_on THEN
1684: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
1685: END IF;
1686: RAISE OTHERS;
1687: ELSE
1688: IF l_debug_on THEN
1685: END IF;
1686: RAISE OTHERS;
1687: ELSE
1688: IF l_debug_on THEN
1689: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED ERROR');
1690: WSH_DEBUG_SV.pop(l_module_name);
1691: END IF;
1692: ROLLBACK;
1693: RETURN;
1686: RAISE OTHERS;
1687: ELSE
1688: IF l_debug_on THEN
1689: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED ERROR');
1690: WSH_DEBUG_SV.pop(l_module_name);
1691: END IF;
1692: ROLLBACK;
1693: RETURN;
1694: END IF;
1694: END IF;
1695: END IF;
1696:
1697: IF l_debug_on THEN
1698: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED DELIVERY # '||X_DELIVERY_NAME );
1699: END IF;
1700:
1701: IF l_debug_on THEN
1702: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
1698: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED DELIVERY # '||X_DELIVERY_NAME );
1699: END IF;
1700:
1701: IF l_debug_on THEN
1702: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
1703: END IF;
1704: wsh_flexfield_utils.WRITE_DFF_ATTRIBUTES
1705: (p_table_name => 'WSH_NEW_DELIVERIES',
1706: p_primary_id => x_delivery_id,
1707: x_return_status => x_return_status);
1708:
1709: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1710: IF l_debug_on THEN
1711: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
1712: WSH_DEBUG_SV.pop(l_module_name);
1713: END IF;
1714: ROLLBACK;
1715: RETURN;
1708:
1709: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1710: IF l_debug_on THEN
1711: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
1712: WSH_DEBUG_SV.pop(l_module_name);
1713: END IF;
1714: ROLLBACK;
1715: RETURN;
1716: END IF;
1715: RETURN;
1716: END IF;
1717:
1718: IF l_debug_on THEN
1719: WSH_DEBUG_SV.log(l_module_name,'Autonomous Return status ', x_return_status);
1720: END IF;
1721:
1722: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1723: COMMIT;
1725: ROLLBACK;
1726: END IF;
1727:
1728: IF l_debug_on THEN
1729: WSH_DEBUG_SV.pop(l_module_name);
1730: END IF;
1731:
1732: EXCEPTION
1733: WHEN OTHERS THEN
1733: WHEN OTHERS THEN
1734: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTONOMOUS_CREATE_DELIVERY');
1735: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1736: IF l_debug_on THEN
1737: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1738: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1739: END IF;
1740: ROLLBACK;
1741: END Autonomous_Create_Delivery;
1734: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTONOMOUS_CREATE_DELIVERY');
1735: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1736: IF l_debug_on THEN
1737: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1738: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1739: END IF;
1740: ROLLBACK;
1741: END Autonomous_Create_Delivery;
1742:
1887:
1888: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1889: --
1890: IF l_debug_on IS NULL THEN
1891: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1892: END IF;
1893: --
1894: IF l_debug_on THEN
1895: WSH_DEBUG_SV.push(l_module_name);
1891: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1892: END IF;
1893: --
1894: IF l_debug_on THEN
1895: WSH_DEBUG_SV.push(l_module_name);
1896: --
1897: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
1898: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
1899: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
1893: --
1894: IF l_debug_on THEN
1895: WSH_DEBUG_SV.push(l_module_name);
1896: --
1897: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
1898: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
1899: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
1900: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
1901: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
1894: IF l_debug_on THEN
1895: WSH_DEBUG_SV.push(l_module_name);
1896: --
1897: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
1898: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
1899: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
1900: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
1901: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
1902: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
1895: WSH_DEBUG_SV.push(l_module_name);
1896: --
1897: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
1898: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
1899: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
1900: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
1901: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
1902: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
1903: END IF;
1896: --
1897: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
1898: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
1899: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
1900: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
1901: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
1902: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
1903: END IF;
1904: --
1897: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
1898: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
1899: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
1900: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
1901: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
1902: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
1903: END IF;
1904: --
1905: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1898: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
1899: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
1900: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
1901: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
1902: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
1903: END IF;
1904: --
1905: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1906:
1906:
1907:
1908: IF (p_line_rows.count = 0) THEN
1909: IF l_debug_on THEN
1910: WSH_DEBUG_SV.logmsg(l_module_name, 'RAISING EXCEPTION WHEN OTHERS BECAUSE P_LINE_ROWS.COUNT IS 0' );
1911: END IF;
1912: --
1913: raise others;
1914: END IF;
1913: raise others;
1914: END IF;
1915:
1916: IF l_debug_on THEN
1917: WSH_DEBUG_SV.logmsg(l_module_name, 'INITIALIZING AUTO_DEL_IDS...' );
1918: END IF;
1919: --
1920:
1921: FOR i IN 1..p_line_rows.count LOOP
1919: --
1920:
1921: FOR i IN 1..p_line_rows.count LOOP
1922: IF l_debug_on THEN
1923: WSH_DEBUG_SV.logmsg(l_module_name, '**** PROCESSING DELIVERY DETAIL ID '||P_LINE_ROWS ( I ) ||' ****' );
1924: END IF;
1925: --
1926: l_attr_tab(i).entity_id := p_line_rows(i);
1927: l_attr_tab(i).entity_type := 'DELIVERY_DETAIL';
1931:
1932: l_action_rec.group_by_header_flag := p_pick_release_flag;
1933:
1934: IF l_debug_on THEN
1935: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling Find_Matching_Groups' );
1936: END IF;
1937: Find_Matching_Groups(p_attr_tab => l_attr_tab,
1938: p_action_rec => l_action_rec,
1939: p_target_rec => l_target_rec,
1946: raise e_return_excp;
1947: END IF;
1948:
1949: IF l_debug_on THEN
1950: WSH_DEBUG_SV.log(l_module_name, 'l_group_info.COUNT', l_group_info.COUNT);
1951: END IF;
1952:
1953: j := 0;
1954:
1974: FETCH c_cont into l_attr_tab(i).container_flag;
1975: CLOSE c_cont;
1976:
1977: IF l_debug_on THEN
1978: WSH_DEBUG_SV.log(l_module_name,'container flag is',l_attr_tab(i).container_flag);
1979: END IF;
1980:
1981: IF l_attr_tab(i).container_flag = 'Y' THEN --{
1982: WSH_CONTAINER_UTILITIES.Is_Empty (p_container_instance_id => l_attr_tab(i).entity_id,
1986: IF (l_return_status IN(WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1987: x_return_status := l_return_status;
1988: wsh_util_core.add_message(x_return_status);
1989: IF l_debug_on THEN
1990: WSH_DEBUG_SV.logmsg(l_module_name,'Error returned from WSH_CONTAINER_UTILITIES.Is_Empty');
1991: END IF;
1992: raise e_return_excp; -- LPN CONV. rv
1993: END IF;
1994:
1992: raise e_return_excp; -- LPN CONV. rv
1993: END IF;
1994:
1995: IF l_debug_on THEN
1996: WSH_DEBUG_SV.log(l_module_name, 'l_detail_is_empty_cont',l_detail_is_empty_cont );
1997: END IF;
1998:
1999: IF l_detail_is_empty_cont = 'Y' then
2000: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_EMPTY');
2000: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_EMPTY');
2001: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2002: wsh_util_core.add_message(x_return_status);
2003: IF l_debug_on THEN
2004: WSH_DEBUG_SV.logmsg(l_module_name, 'container empty,autocreate delivery not allowed');
2005: WSH_DEBUG_SV.pop(l_module_name);
2006: END IF;
2007: raise e_return_excp; -- LPN CONV. rv
2008: ELSE
2001: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2002: wsh_util_core.add_message(x_return_status);
2003: IF l_debug_on THEN
2004: WSH_DEBUG_SV.logmsg(l_module_name, 'container empty,autocreate delivery not allowed');
2005: WSH_DEBUG_SV.pop(l_module_name);
2006: END IF;
2007: raise e_return_excp; -- LPN CONV. rv
2008: ELSE
2009: FND_MESSAGE.SET_NAME('WSH','WSH_ULT_DROPOFF_LOC_ID_NOT_FND');
2010: FND_MESSAGE.SET_TOKEN('LINE_LPN_ID',l_line_lpn_id);
2011: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2012: wsh_util_core.add_message(x_return_status);
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIPTO LOCATION NOT FOUND FOR '||P_LINE_ROWS ( I ) );
2015: END IF;
2016: raise e_return_excp; -- LPN CONV. rv
2017: END IF;
2018: ELSE
2020: FND_MESSAGE.SET_TOKEN('LINE_LPN_ID',l_line_lpn_id);
2021: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2022: wsh_util_core.add_message(x_return_status);
2023: IF l_debug_on THEN
2024: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIPTO LOCATION NOT FOUND FOR '||P_LINE_ROWS ( I ) );
2025: END IF;
2026: raise e_return_excp; -- LPN CONV. rv
2027: END IF;
2028: -- the code will not continue; the above IFs and ELSEs
2032: IF l_attr_tab(i).delivery_id IS NOT NULL THEN
2033:
2034: -- Use this flag to set a warning message at the end of the procedure
2035: IF l_debug_on THEN
2036: WSH_DEBUG_SV.logmsg(l_module_name, 'THE LINE IS ASSIGNED TO DELIVERY '||l_attr_tab(i).DELIVERY_ID );
2037: END IF;
2038: --
2039: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_ASSIGNED_DEL');
2040: FND_MESSAGE.SET_TOKEN('DET_NAME', l_attr_tab(i).entity_id);
2059: l_group_index := l_group_index + 1;
2060: END LOOP;
2061:
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').source_header_id', l_group_info(l_group_index).source_header_id);
2064: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2065: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2066: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2067: END IF;
2060: END LOOP;
2061:
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').source_header_id', l_group_info(l_group_index).source_header_id);
2064: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2065: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2066: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2067: END IF;
2068:
2061:
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').source_header_id', l_group_info(l_group_index).source_header_id);
2064: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2065: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2066: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2067: END IF;
2068:
2069: IF l_attr_tab(i).group_id IS NOT NULL
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').source_header_id', l_group_info(l_group_index).source_header_id);
2064: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2065: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2066: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2067: END IF;
2068:
2069: IF l_attr_tab(i).group_id IS NOT NULL
2070: AND NOT (l_delivery_tab.exists(l_attr_tab(i).group_id)) THEN --{
2102: l_delivery_info.hash_value := l_group_info(l_group_index).l1_hash_value;
2103: l_delivery_info.hash_string := l_group_info(l_group_index).l1_hash_string;
2104:
2105: IF l_debug_on THEN
2106: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.GET_DEFAULT_UOMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2107: END IF;
2108:
2109: wsh_wv_utils.get_default_uoms(l_group_info(l_group_index).organization_id, l_weight_uom_code, l_volume_uom_code, l_dummy);
2110:
2116:
2117: IF WSH_PICK_LIST.G_BATCH_ID IS NOT NULL
2118: AND WSH_PICK_LIST.G_PICK_REL_PARALLEL THEN --{
2119: IF l_debug_on THEN
2120: WSH_DEBUG_SV.logmsg(l_module_name,'Acquiring lock on :'||l_delivery_info.hash_value||'-'||l_delivery_info.batch_id);
2121: END IF;
2122: DBMS_LOCK.Allocate_Unique(lockname => l_delivery_info.hash_value||'-'||l_delivery_info.batch_id,
2123: lockhandle => l_lock_handle);
2124: l_lock_status := DBMS_LOCK.Request(lockhandle => l_lock_handle,
2126: IF l_lock_status = 0 THEN --{
2127: -- Successfully locked, so check if a delivery
2128: -- has been created in between acquiring the lock
2129: IF l_debug_on THEN
2130: WSH_DEBUG_SV.log(l_module_name,'p_header_id', l_delivery_info.source_header_id);
2131: END IF;
2132:
2133: OPEN c_matching_delivery(
2134: p_hash_value => l_delivery_info.hash_value,
2146: CLOSE c_matching_delivery;
2147:
2148: IF l_notfound THEN --{
2149: IF l_debug_on THEN
2150: WSH_DEBUG_SV.logmsg(l_module_name,'Matching delivery is not found, so create a new delivery ');
2151: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Autonomous_Create_Delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
2152: END IF;
2153: Autonomous_Create_Delivery(l_delivery_info, l_rowid,
2154: l_delivery_id, l_delivery_name, x_return_status);
2147:
2148: IF l_notfound THEN --{
2149: IF l_debug_on THEN
2150: WSH_DEBUG_SV.logmsg(l_module_name,'Matching delivery is not found, so create a new delivery ');
2151: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Autonomous_Create_Delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
2152: END IF;
2153: Autonomous_Create_Delivery(l_delivery_info, l_rowid,
2154: l_delivery_id, l_delivery_name, x_return_status);
2155: IF l_debug_on THEN
2152: END IF;
2153: Autonomous_Create_Delivery(l_delivery_info, l_rowid,
2154: l_delivery_id, l_delivery_name, x_return_status);
2155: IF l_debug_on THEN
2156: WSH_DEBUG_SV.log(l_module_name,'Return from Autonomous_Create_Delivery, Return status', x_return_status);
2157: END IF;
2158: l_lock_status := DBMS_LOCK.Release(l_lock_handle);
2159: l_lock_handle := NULL;
2160:
2162: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2163: raise others;
2164: ELSE
2165: IF l_debug_on THEN
2166: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_DELIVERY_AUTOCREATE.Autonomous_Create_Delivery RETURNED ERROR');
2167: END IF;
2168: raise e_return_excp;
2169: END IF;
2170: ELSE
2174: ELSE --{
2175: l_lock_status := DBMS_LOCK.Release(l_lock_handle);
2176: l_lock_handle := NULL;
2177: IF l_debug_on THEN
2178: WSH_DEBUG_SV.logmsg(l_module_name,'Matching delivery '||l_delivery_name||' already exists , so skip creating a new delivery ');
2179: END IF;
2180:
2181: l_group_info(l_group_index).delivery_id := l_delivery_id;
2182: GOTO SKIP_ITM_EXISTING_DEL;
2189: -- This can happen only if there's a timeout issue
2190: -- or unexpected error
2191: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2192: IF l_debug_on THEN
2193: WSH_DEBUG_SV.logmsg(l_module_name, 'Error when trying to acquire User Lock, Lock Status :'||l_lock_status );
2194: END IF;
2195: raise e_return_excp;
2196: END IF; --}
2197: --}
2197: --}
2198: ELSE
2199: --{ non-parallel-pick case
2200: IF l_debug_on THEN
2201: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
2202: END IF;
2203: wsh_new_deliveries_pvt.create_delivery(l_delivery_info, l_rowid, l_delivery_id, l_delivery_name, x_return_status);
2204: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2205: IF l_debug_on THEN
2202: END IF;
2203: wsh_new_deliveries_pvt.create_delivery(l_delivery_info, l_rowid, l_delivery_id, l_delivery_name, x_return_status);
2204: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2205: IF l_debug_on THEN
2206: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY FOR '||P_LINE_ROWS ( I ) );
2207: END IF;
2208: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2209: IF l_debug_on THEN
2210: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
2206: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY FOR '||P_LINE_ROWS ( I ) );
2207: END IF;
2208: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2209: IF l_debug_on THEN
2210: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
2211: END IF;
2212: raise others;
2213: ELSE
2214: IF l_debug_on THEN
2211: END IF;
2212: raise others;
2213: ELSE
2214: IF l_debug_on THEN
2215: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED ERROR');
2216: END IF;
2217: raise e_return_excp;
2218: END IF;
2219: END IF;
2218: END IF;
2219: END IF;
2220:
2221: IF l_debug_on THEN
2222: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED DELIVERY # '||L_DELIVERY_NAME );
2223: END IF;
2224:
2225: l_group_info(l_group_index).delivery_id := l_delivery_id;
2226:
2224:
2225: l_group_info(l_group_index).delivery_id := l_delivery_id;
2226:
2227: IF l_debug_on THEN
2228: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
2229: END IF;
2230: wsh_flexfield_utils.WRITE_DFF_ATTRIBUTES
2231: (p_table_name => 'WSH_NEW_DELIVERIES',
2232: p_primary_id => l_delivery_id,
2233: x_return_status => x_return_status);
2234:
2235: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2236: IF l_debug_on THEN
2237: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
2238: END IF;
2239: raise e_return_excp;
2240: END IF;
2241:
2245: -- following code is common for parallel and non-parallel cases
2246: -- of creating a new delivery, up to the label SKIP_ITM_EXISTING_DEL.
2247:
2248: IF l_debug_on THEN
2249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT.Get',WSH_DEBUG_SV.C_PROC_LEVEL);
2250: END IF;
2251:
2252: WSH_SHIPPING_PARAMS_PVT.Get(
2253: p_organization_id => l_delivery_info.organization_id,
2280: -- call Check_ITM_Required to see if the delivery criteria
2281: -- requires ITM screening and log exception.
2282:
2283: IF l_debug_on THEN
2284: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.Check_ITM_Required',WSH_DEBUG_SV.C_PROC_LEVEL);
2285: END IF;
2286:
2287: l_log_itm_exc := WSH_DELIVERY_VALIDATIONS.Check_ITM_Required
2288: (p_delivery_id => l_delivery_id,
2287: l_log_itm_exc := WSH_DELIVERY_VALIDATIONS.Check_ITM_Required
2288: (p_delivery_id => l_delivery_id,
2289: x_return_status => l_return_status);
2290: IF l_debug_on THEN
2291: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_DELIVERY_VALIDATIONS.Check_ITM_Required',l_return_status);
2292: END IF;
2293:
2294: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2295: x_return_status := l_return_status;
2297: END IF;
2298:
2299: IF l_log_itm_exc = 'Y' THEN
2300: IF l_debug_on THEN
2301: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception',WSH_DEBUG_SV.C_PROC_LEVEL);
2302: END IF;
2303: WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception (
2304: p_delivery_id => l_delivery_id,
2305: p_action_type => 'CREATE_DELIVERY',
2305: p_action_type => 'CREATE_DELIVERY',
2306: p_ship_from_location_id => l_delivery_info.initial_pickup_location_id,
2307: x_return_status => l_return_status);
2308: IF l_debug_on THEN
2309: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception',l_return_status);
2310: END IF;
2311:
2312: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2313: x_return_status := l_return_status;
2330: p_caller <> 'FTE_LINE_TO_TRIP') OR p_caller IS NULL)) THEN
2331: -- auto apply routing rule at delivery creation
2332: l_del_select_carrier(l_del_select_carrier.count+1) := l_delivery_id;
2333: IF l_debug_on THEN
2334: wsh_debug_sv.log(l_module_name,'calling routing_guide',p_caller);
2335: END IF;
2336: END IF;
2337:
2338: -- Hiding project
2364:
2365:
2366: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2367: IF l_debug_on THEN
2368: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY FOR '||P_LINE_ROWS ( I ) || ' TO '||L_DELIVERY_ID );
2369: END IF;
2370: --
2371: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2372: IF l_debug_on THEN
2369: END IF;
2370: --
2371: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2372: IF l_debug_on THEN
2373: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY RETURNED UNEXPECTED ERROR' );
2374: END IF;
2375: --
2376: raise others;
2377: ELSE
2375: --
2376: raise others;
2377: ELSE
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY RETURNED ERROR' );
2380: END IF;
2381: raise e_return_excp; -- LPN CONV. rv
2382: END IF;
2383:
2399: END IF;
2400:
2401: IF (l_group_info.count = 0) THEN
2402: IF l_debug_on THEN
2403: WSH_DEBUG_SV.logmsg(l_module_name, 'NO DELIVERIES ARE CREATED IN THIS CALL. RAISING EXCEPTION' );
2404: END IF;
2405: --
2406: raise cannot_autocreate_del;
2407: END IF;
2449: l_caller := p_caller;
2450: END IF;
2451:
2452: IF l_debug_on THEN
2453: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.PROCESS_CARRIER_SELECTION',WSH_DEBUG_SV.C_PROC_LEVEL);
2454: END IF;
2455: --
2456:
2457: WSH_NEW_DELIVERY_ACTIONS.PROCESS_CARRIER_SELECTION(p_delivery_id_tab => l_del_select_carrier,
2465: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2466: raise others;
2467: ELSE
2468: IF l_debug_on THEN
2469: WSH_DEBUG_SV.log(l_module_name, 'Return status from WSH_NEW_DELIVERY_ACTIONS.Process_Carrier_Selection', l_return_status );
2470: END IF;
2471: --
2472: END IF;
2473: l_warn_num := l_warn_num + 1;
2500: x_msg_count => l_msg_count,
2501: x_msg_data => l_msg_data);
2502: --
2503: IF l_debug_on THEN
2504: wsh_debug_sv.log(l_module_name,'Return Status from WSH_FTE_INTEGRATION.Rate_Delivery' ,l_return_status);
2505: END IF;
2506:
2507: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2508: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2546: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2547: --{
2548:
2549: IF l_debug_on THEN
2550: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2551: END IF;
2552: --
2553: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2554: (
2557: x_out_rec => l_lpn_out_sync_comm_rec
2558: );
2559: --
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2562: END IF;
2563: --
2564: WSH_UTIL_CORE.API_POST_CALL
2565: (
2581: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
2582: END IF;
2583:
2584: IF l_debug_on THEN
2585: WSH_DEBUG_SV.log(l_module_name, 'Return status from WSH_DELIVERY_AUTOCREATE.autocreate_deliveries', x_return_status);
2586: WSH_DEBUG_SV.pop(l_module_name);
2587: END IF;
2588: --
2589:
2582: END IF;
2583:
2584: IF l_debug_on THEN
2585: WSH_DEBUG_SV.log(l_module_name, 'Return status from WSH_DELIVERY_AUTOCREATE.autocreate_deliveries', x_return_status);
2586: WSH_DEBUG_SV.pop(l_module_name);
2587: END IF;
2588: --
2589:
2590: EXCEPTION
2598: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2599: --{
2600: --
2601: IF l_debug_on THEN
2602: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2603: END IF;
2604: --
2605: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2606: (
2609: x_out_rec => l_lpn_out_sync_comm_rec
2610: );
2611: --
2612: IF l_debug_on THEN
2613: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2614: WSH_DEBUG_SV.pop(l_module_name);
2615: END IF;
2616: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2617: x_return_status := l_return_status;
2610: );
2611: --
2612: IF l_debug_on THEN
2613: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2614: WSH_DEBUG_SV.pop(l_module_name);
2615: END IF;
2616: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2617: x_return_status := l_return_status;
2618: END IF;
2639: -- LPN CONV. rv
2640: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2641: --{
2642: IF l_debug_on THEN
2643: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2644: END IF;
2645: --
2646: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2647: (
2650: x_out_rec => l_lpn_out_sync_comm_rec
2651: );
2652: --
2653: IF l_debug_on THEN
2654: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2655: END IF;
2656: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2657: x_return_status := l_return_status;
2658: END IF;
2660: --}
2661: END IF;
2662: -- LPN CONV. rv
2663: IF l_debug_on THEN
2664: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION CANNOT_AUTOCREATE_DEL RAISED' );
2665: END IF;
2666: --
2667: IF l_debug_on THEN
2668: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_AUTOCREATE_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2664: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION CANNOT_AUTOCREATE_DEL RAISED' );
2665: END IF;
2666: --
2667: IF l_debug_on THEN
2668: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_AUTOCREATE_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2669: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_AUTOCREATE_DEL');
2670: END IF;
2671: --
2672: IF c_cont%ISOPEN THEN
2665: END IF;
2666: --
2667: IF l_debug_on THEN
2668: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_AUTOCREATE_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2669: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_AUTOCREATE_DEL');
2670: END IF;
2671: --
2672: IF c_cont%ISOPEN THEN
2673: CLOSE c_cont;
2696: --
2697: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2698: --{
2699: IF l_debug_on THEN
2700: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2701: END IF;
2702: --
2703: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2704: (
2707: x_out_rec => l_lpn_out_sync_comm_rec
2708: );
2709: --
2710: IF l_debug_on THEN
2711: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2712: END IF;
2713: --}
2714: END IF;
2715: --
2715: --
2716: -- LPN CONV. rv
2717: --
2718: IF l_debug_on THEN
2719: WSH_DEBUG_SV.logmsg(l_module_name, 'THE UNEXPECTED ERROR FROM WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES IS ' || L_ERROR_TEXT );
2720: END IF;
2721: --
2722: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES');
2723: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2722: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES');
2723: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2724:
2725: IF l_debug_on THEN
2726: WSH_DEBUG_SV.pop(l_module_name);
2727: END IF;
2728: --
2729: END autocreate_deliveries;
2730:
2805: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2806: --
2807: IF l_debug_on IS NULL
2808: THEN
2809: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2810: END IF;
2811: --
2812: IF l_debug_on THEN
2813: WSH_DEBUG_SV.push(l_module_name);
2809: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2810: END IF;
2811: --
2812: IF l_debug_on THEN
2813: WSH_DEBUG_SV.push(l_module_name);
2814: --
2815: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
2816: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
2817: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2811: --
2812: IF l_debug_on THEN
2813: WSH_DEBUG_SV.push(l_module_name);
2814: --
2815: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
2816: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
2817: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2818: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
2819: END IF;
2812: IF l_debug_on THEN
2813: WSH_DEBUG_SV.push(l_module_name);
2814: --
2815: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
2816: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
2817: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2818: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
2819: END IF;
2820: --
2813: WSH_DEBUG_SV.push(l_module_name);
2814: --
2815: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
2816: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
2817: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2818: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
2819: END IF;
2820: --
2821: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2814: --
2815: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
2816: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
2817: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2818: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
2819: END IF;
2820: --
2821: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2822:
2827: --
2828: -- Debug Statements
2829: --
2830: IF l_debug_on THEN
2831: WSH_DEBUG_SV.pop(l_module_name);
2832: END IF;
2833: --
2834: RETURN;
2835: END IF;
3044:
3045: --BUG 3379499
3046: --Handle return status using l_err_num and l_warn_num
3047: IF l_debug_on THEN
3048: wsh_debug_sv.log(l_module_name, 'l_ac_dlvy_count', l_ac_dlvy_count);
3049: wsh_debug_sv.log(l_module_name, 'l_err_num', l_err_num);
3050: wsh_debug_sv.log(l_module_name, 'l_warn_num', l_warn_num);
3051: END IF;
3052: IF l_err_num > 0 THEN
3045: --BUG 3379499
3046: --Handle return status using l_err_num and l_warn_num
3047: IF l_debug_on THEN
3048: wsh_debug_sv.log(l_module_name, 'l_ac_dlvy_count', l_ac_dlvy_count);
3049: wsh_debug_sv.log(l_module_name, 'l_err_num', l_err_num);
3050: wsh_debug_sv.log(l_module_name, 'l_warn_num', l_warn_num);
3051: END IF;
3052: IF l_err_num > 0 THEN
3053: IF l_err_num < l_ac_dlvy_count
3046: --Handle return status using l_err_num and l_warn_num
3047: IF l_debug_on THEN
3048: wsh_debug_sv.log(l_module_name, 'l_ac_dlvy_count', l_ac_dlvy_count);
3049: wsh_debug_sv.log(l_module_name, 'l_err_num', l_err_num);
3050: wsh_debug_sv.log(l_module_name, 'l_warn_num', l_warn_num);
3051: END IF;
3052: IF l_err_num > 0 THEN
3053: IF l_err_num < l_ac_dlvy_count
3054: THEN
3063: --
3064: -- Debug Statements
3065: --
3066: IF l_debug_on THEN
3067: WSH_DEBUG_SV.log(l_module_name,'x_del_rows ',x_del_rows.COUNT);
3068: WSH_DEBUG_SV.pop(l_module_name);
3069: END IF;
3070:
3071:
3064: -- Debug Statements
3065: --
3066: IF l_debug_on THEN
3067: WSH_DEBUG_SV.log(l_module_name,'x_del_rows ',x_del_rows.COUNT);
3068: WSH_DEBUG_SV.pop(l_module_name);
3069: END IF;
3070:
3071:
3072:
3079: --
3080: -- Debug Statements
3081: --
3082: IF l_debug_on THEN
3083: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3084: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3085: END IF;
3086: --
3087: END autocreate_del_across_orgs;
3080: -- Debug Statements
3081: --
3082: IF l_debug_on THEN
3083: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3084: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3085: END IF;
3086: --
3087: END autocreate_del_across_orgs;
3088:
3113: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3114: --
3115: IF l_debug_on IS NULL
3116: THEN
3117: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3118: END IF;
3119: --
3120: IF l_debug_on THEN
3121: WSH_DEBUG_SV.push(l_module_name);
3117: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3118: END IF;
3119: --
3120: IF l_debug_on THEN
3121: WSH_DEBUG_SV.push(l_module_name);
3122: --
3123: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
3124: END IF;
3125: --
3119: --
3120: IF l_debug_on THEN
3121: WSH_DEBUG_SV.push(l_module_name);
3122: --
3123: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
3124: END IF;
3125: --
3126: --
3127: -- Debug Statements
3126: --
3127: -- Debug Statements
3128: --
3129: IF l_debug_on THEN
3130: WSH_DEBUG_SV.logmsg(l_module_name, 'DELETING EMPTY DELIVERIES FOR BATCH '||P_BATCH_ID );
3131: END IF;
3132: --
3133: --OTM R12
3134: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED; -- this is global variable
3139: --
3140:
3141: IF (p_batch_id is NOT NULL and p_batch_id > 0) THEN
3142: IF l_debug_on IS NULL THEN
3143: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3144: END IF;
3145:
3146: --OTM R12, allow delete of 'NS' deliveries
3147: IF (l_gc3_is_installed = 'Y') THEN
3167: --
3168: -- Debug Statements
3169: --
3170: IF l_debug_on THEN
3171: WSH_DEBUG_SV.logmsg(l_module_name, 'DELETED '||SQL%ROWCOUNT||' EMPTY DELIVERIES AFTER PICK RELEASE' );
3172: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3173: END IF;
3174: --
3175:
3168: -- Debug Statements
3169: --
3170: IF l_debug_on THEN
3171: WSH_DEBUG_SV.logmsg(l_module_name, 'DELETED '||SQL%ROWCOUNT||' EMPTY DELIVERIES AFTER PICK RELEASE' );
3172: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3173: END IF;
3174: --
3175:
3176: END IF;
3179: --
3180: -- Debug Statements
3181: --
3182: IF l_debug_on THEN
3183: WSH_DEBUG_SV.pop(l_module_name);
3184: END IF;
3185: --
3186: EXCEPTION
3187: WHEN OTHERS THEN
3190: --
3191: -- Debug Statements
3192: --
3193: IF l_debug_on THEN
3194: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3195: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3196: END IF;
3197: --
3198: END DELETE_EMPTY_DELIVERIES;
3191: -- Debug Statements
3192: --
3193: IF l_debug_on THEN
3194: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3195: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3196: END IF;
3197: --
3198: END DELETE_EMPTY_DELIVERIES;
3199:
3263: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3264: --
3265: IF l_debug_on IS NULL
3266: THEN
3267: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3268: END IF;
3269: --
3270: IF l_debug_on THEN
3271: WSH_DEBUG_SV.push(l_module_name);
3267: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3268: END IF;
3269: --
3270: IF l_debug_on THEN
3271: WSH_DEBUG_SV.push(l_module_name);
3272: END IF;
3273: --
3274: IF (p_delivery_ids.count > 0) THEN
3275: --
3275: --
3276: -- Debug Statements
3277: --
3278: IF l_debug_on THEN
3279: WSH_DEBUG_SV.logmsg(l_module_name, 'UNASSIGNING EMPTY CONTAINERS FROM DELIVERIES' );
3280: END IF;
3281: --
3282: FOR i in p_delivery_ids.FIRST .. p_delivery_ids.LAST LOOP
3283: --
3283: --
3284: -- Debug Statements
3285: --
3286: IF l_debug_on THEN
3287: WSH_DEBUG_SV.logmsg(l_module_name, I );
3288: END IF;
3289: --
3290: END LOOP;
3291: END IF;
3289: --
3290: END LOOP;
3291: END IF;
3292: IF l_debug_on THEN
3293: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3294: END IF;
3295: IF (p_delivery_ids.count > 0) THEN
3296: -- Bug 2543667 : Grouping Attributes of LPN are retained after backordering at Pick Release
3297: -- Empty Containers should not have any grouping attributes
3329: --
3330: -- Debug Statements
3331: --
3332: IF l_debug_on THEN
3333: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATED '||SQL%ROWCOUNT||' RECORDS IN WSH_DELIVERY_DETAILS' );
3334: END IF;
3335: --
3336: -- LPN CONV. rv
3337: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3379:
3380: -- LPN CONV. rv
3381: --
3382: IF l_debug_on THEN
3383: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_wms_recTbl', l_sync_tmp_wms_recTbl.delivery_detail_id_tbl.count);
3384: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_inv_recTbl', l_sync_tmp_inv_recTbl.delivery_detail_id_tbl.count);
3385: END IF;
3386: --
3387: --
3380: -- LPN CONV. rv
3381: --
3382: IF l_debug_on THEN
3383: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_wms_recTbl', l_sync_tmp_wms_recTbl.delivery_detail_id_tbl.count);
3384: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_inv_recTbl', l_sync_tmp_inv_recTbl.delivery_detail_id_tbl.count);
3385: END IF;
3386: --
3387: --
3388: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3399: THEN
3400: --{
3401: --
3402: IF l_debug_on THEN
3403: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3404: END IF;
3405: --
3406: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3407: (
3410: p_operation_type => l_operation_type
3411: );
3412: --
3413: IF l_debug_on THEN
3414: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3415: END IF;
3416: --
3417: WSH_UTIL_CORE.API_POST_CALL
3418: (
3429: THEN
3430: --{
3431: --
3432: IF l_debug_on THEN
3433: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3434: END IF;
3435: --
3436: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3437: (
3441: );
3442:
3443: --
3444: IF l_debug_on THEN
3445: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3446: END IF;
3447: --
3448: WSH_UTIL_CORE.API_POST_CALL
3449: (
3473: THEN
3474: --{
3475: --
3476: IF l_debug_on THEN
3477: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3478: END IF;
3479: --
3480: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3481: (
3484: p_operation_type => l_operation_type
3485: );
3486: --
3487: IF l_debug_on THEN
3488: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3489: END IF;
3490: --
3491: WSH_UTIL_CORE.API_POST_CALL
3492: (
3502: THEN
3503: --{
3504: --
3505: IF l_debug_on THEN
3506: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3507: END IF;
3508: --
3509: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3510: (
3514: );
3515:
3516: --
3517: IF l_debug_on THEN
3518: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3519: END IF;
3520: --
3521: WSH_UTIL_CORE.API_POST_CALL
3522: (
3536: --
3537: IF l_del_det_id_tbl.COUNT > 0 THEN
3538: --{
3539: IF l_debug_on THEN
3540: wsh_debug_sv.log(l_module_name, 'l_del_det_id_tbl.COUNT', l_del_det_id_tbl.COUNT);
3541: END IF;
3542: --
3543: FOR l_counter in l_del_det_id_tbl.FIRST .. l_del_det_id_tbl.LAST LOOP
3544: IF l_debug_on THEN
3541: END IF;
3542: --
3543: FOR l_counter in l_del_det_id_tbl.FIRST .. l_del_det_id_tbl.LAST LOOP
3544: IF l_debug_on THEN
3545: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3546: END IF;
3547:
3548: WSH_WV_UTILS.DD_WV_Post_Process(
3549: p_delivery_detail_id => l_del_det_id_tbl(l_counter),
3557: --
3558: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3559: WSH_UTIL_CORE.Add_Message(x_return_status);
3560: IF l_debug_on THEN
3561: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3562: WSH_DEBUG_SV.pop(l_module_name);
3563: END IF;
3564: return;
3565: END IF;
3558: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3559: WSH_UTIL_CORE.Add_Message(x_return_status);
3560: IF l_debug_on THEN
3561: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3562: WSH_DEBUG_SV.pop(l_module_name);
3563: END IF;
3564: return;
3565: END IF;
3566: END LOOP;
3607: --
3608: -- Debug Statements
3609: --
3610: IF l_debug_on THEN
3611: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATED '||SQL%ROWCOUNT||' RECORDS IN WSH_DELIVERY_ASSIGNMENTS' );
3612: END IF;
3613: --
3614: END IF;
3615: IF l_debug_on THEN
3612: END IF;
3613: --
3614: END IF;
3615: IF l_debug_on THEN
3616: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3617: END IF;
3618:
3619: -- LPN CONV. rv
3620: --
3622: THEN
3623: --{
3624:
3625: IF l_debug_on THEN
3626: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
3627: END IF;
3628: --
3629: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3630: (
3633: x_out_rec => l_lpn_out_sync_comm_rec
3634: );
3635: --
3636: IF l_debug_on THEN
3637: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
3638: END IF;
3639: --
3640: WSH_UTIL_CORE.API_POST_CALL
3641: (
3661: --
3662: -- Debug Statements
3663: --
3664: IF l_debug_on THEN
3665: WSH_DEBUG_SV.logmsg(l_module_name, 'END OF API FOR UNASSIGNING EMPTY CONTAINERS FROM DELIVERIES' );
3666: END IF;
3667: --
3668: --x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS; LPN CONV. rv
3669:
3670: --
3671: -- Debug Statements
3672: --
3673: IF l_debug_on THEN
3674: WSH_DEBUG_SV.pop(l_module_name);
3675: END IF;
3676: --
3677: EXCEPTION
3678: WHEN FND_API.G_EXC_ERROR THEN
3679: --
3680: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3681: --
3682: IF l_debug_on THEN
3683: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS FROM FND_API.G_EXC_ERROR',WSH_DEBUG_SV.C_PROC_LEVEL);
3684: END IF;
3685: --
3686: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3687: THEN
3686: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3687: THEN
3688: --{
3689: IF l_debug_on THEN
3690: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
3691: END IF;
3692: --
3693: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3694: (
3697: x_out_rec => l_lpn_out_sync_comm_rec
3698: );
3699: --
3700: IF l_debug_on THEN
3701: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
3702: END IF;
3703: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3704: x_return_status := l_return_status;
3705: END IF;
3708: --
3709: -- LPN CONV. rv
3710: --
3711: IF l_debug_on THEN
3712: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3714: END IF;
3715: --
3716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3709: -- LPN CONV. rv
3710: --
3711: IF l_debug_on THEN
3712: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3714: END IF;
3715: --
3716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3717: --
3717: --
3718: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3719: --
3720: IF l_debug_on THEN
3721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS FROM FND_API.G_EXC_UNEXPECTED_ERROR',WSH_DEBUG_SV.C_PROC_LEVEL);
3722: END IF;
3723: --
3724: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3725: THEN
3725: THEN
3726: --{
3727:
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
3730: END IF;
3731: --
3732:
3733: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3737: x_out_rec => l_lpn_out_sync_comm_rec
3738: );
3739: --
3740: IF l_debug_on THEN
3741: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
3742: END IF;
3743: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3744: x_return_status := l_return_status;
3745: END IF;
3748: --
3749: -- LPN CONV. rv
3750: --
3751: IF l_debug_on THEN
3752: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3753: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3754: END IF;
3755: --
3756: WHEN OTHERS THEN
3749: -- LPN CONV. rv
3750: --
3751: IF l_debug_on THEN
3752: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3753: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3754: END IF;
3755: --
3756: WHEN OTHERS THEN
3757: --
3755: --
3756: WHEN OTHERS THEN
3757: --
3758: IF l_debug_on THEN
3759: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS FROM WHEN OTHERS',WSH_DEBUG_SV.C_PROC_LEVEL);
3760: END IF;
3761: --
3762: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3763: THEN
3762: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3763: THEN
3764: --{
3765: IF l_debug_on THEN
3766: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
3767: END IF;
3768: --
3769:
3770: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3774: x_out_rec => l_lpn_out_sync_comm_rec
3775: );
3776: --
3777: IF l_debug_on THEN
3778: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
3779: END IF;
3780: --}
3781: END IF;
3782: --
3787: --
3788: -- Debug Statements
3789: --
3790: IF l_debug_on THEN
3791: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3792: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3793: END IF;
3794: --
3795: END unassign_empty_containers;
3788: -- Debug Statements
3789: --
3790: IF l_debug_on THEN
3791: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3792: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3793: END IF;
3794: --
3795: END unassign_empty_containers;
3796:
3905: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3906: --
3907: IF l_debug_on IS NULL
3908: THEN
3909: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3910: END IF;
3911: --
3912: IF l_debug_on THEN
3913: wsh_debug_sv.push (l_module_name);
3909: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3910: END IF;
3911: --
3912: IF l_debug_on THEN
3913: wsh_debug_sv.push (l_module_name);
3914: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
3915: WSH_DEBUG_SV.log(l_module_name,'p_trip_prefix', p_trip_prefix);
3916: END IF;
3917:
3910: END IF;
3911: --
3912: IF l_debug_on THEN
3913: wsh_debug_sv.push (l_module_name);
3914: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
3915: WSH_DEBUG_SV.log(l_module_name,'p_trip_prefix', p_trip_prefix);
3916: END IF;
3917:
3918: --OTM R12, initialize
3911: --
3912: IF l_debug_on THEN
3913: wsh_debug_sv.push (l_module_name);
3914: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
3915: WSH_DEBUG_SV.log(l_module_name,'p_trip_prefix', p_trip_prefix);
3916: END IF;
3917:
3918: --OTM R12, initialize
3919: l_non_trip_del_count := 1;
3950: END IF;
3951: k := k+1;
3952: l_trip_del_tab(k) := p_del_attributes_tab(i).delivery_id;
3953: IF l_debug_on THEN
3954: WSH_DEBUG_SV.log(l_module_name,'l_trip_del_tab: '||k,l_trip_del_tab(k));
3955: END IF;
3956: END IF;
3957:
3958: --OTM R12, get the non trip deliveries for ignore for planning action
3959: IF (c_trip_info%NOTFOUND OR l_trip_id_temp IS NULL) THEN
3960: l_non_trip_del_tab(l_non_trip_del_count) := p_del_attributes_tab(i).delivery_id;
3961:
3962: IF l_debug_on THEN
3963: WSH_DEBUG_SV.log(l_module_name,'l_non_trip_del_tab: '||l_non_trip_del_count,l_non_trip_del_tab(l_non_trip_del_count));
3964: END IF;
3965:
3966: l_non_trip_del_count := l_non_trip_del_count + 1;
3967: END IF;
3974:
3975: -- Check if we can consolidate the deliveries together
3976:
3977: IF l_debug_on THEN
3978: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_COMP_CONSTRAINT_GRP.is_valid_consol',WSH_DEBUG_SV.C_PROC_LEVEL);
3979: END IF;
3980:
3981: WSH_FTE_COMP_CONSTRAINT_GRP.is_valid_consol(
3982: p_init_msg_list => fnd_api.g_false,
3996: );
3997:
3998: l_del_tab.delete;
3999: IF l_debug_on THEN
4000: WSH_DEBUG_SV.log(l_module_name,'l_intermediate_loc_id', l_intermediate_loc_id);
4001: END IF;
4002:
4003:
4004:
4005: END IF;
4006:
4007:
4008: IF l_debug_on THEN
4009: WSH_DEBUG_SV.log(l_module_name,'l_trip_id', l_trip_id);
4010: WSH_DEBUG_SV.log(l_module_name,'l_trip_ignore', l_trip_ignore);
4011: END IF;
4012:
4013: --OTM R12, changing the trip and deliveries to ignore for planning
4006:
4007:
4008: IF l_debug_on THEN
4009: WSH_DEBUG_SV.log(l_module_name,'l_trip_id', l_trip_id);
4010: WSH_DEBUG_SV.log(l_module_name,'l_trip_ignore', l_trip_ignore);
4011: END IF;
4012:
4013: --OTM R12, changing the trip and deliveries to ignore for planning
4014: IF (l_gc3_is_installed = 'Y'
4017:
4018: l_otm_trip_tab(1) := l_trip_id;
4019:
4020: IF l_debug_on THEN
4021: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TP_RELEASE.change_ignoreplan_status',WSH_DEBUG_SV.C_PROC_LEVEL);
4022: END IF;
4023:
4024: WSH_TP_RELEASE.change_ignoreplan_status
4025: (p_entity => 'TRIP',
4036:
4037: --now call for the deliveries
4038: IF (l_non_trip_del_tab.COUNT > 0) THEN
4039: IF l_debug_on THEN
4040: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TP_RELEASE.change_ignoreplan_status',WSH_DEBUG_SV.C_PROC_LEVEL);
4041: END IF;
4042:
4043: WSH_TP_RELEASE.change_ignoreplan_status
4044: (p_entity => 'DLVY',
4060: l_del_attributes.initial_pickup_date := p_del_attributes_tab(p_del_attributes_tab.FIRST).initial_pickup_date;
4061: l_del_attributes.ultimate_dropoff_date := p_del_attributes_tab(p_del_attributes_tab.FIRST).ultimate_dropoff_date;
4062: WHILE i is not NULL LOOP
4063: IF l_debug_on THEN
4064: WSH_DEBUG_SV.log(l_module_name,'delivery: '|| i, p_del_attributes_tab(i).delivery_id);
4065: END IF;
4066: l_del_attributes.initial_pickup_date := GREATEST(l_del_attributes.initial_pickup_date, p_del_attributes_tab(i).initial_pickup_date);
4067: l_deconsol_do_date := GREATEST(LEAST(l_del_attributes.ultimate_dropoff_date,
4068: p_del_attributes_tab(i).ultimate_dropoff_date),
4124: END IF;
4125: IF l_transit_time IS NOT NULL
4126: AND (l_deconsol_do_date > l_del_attributes.initial_pickup_date + l_transit_time) THEN
4127: IF l_debug_on THEN
4128: WSH_DEBUG_SV.log(l_module_name,'l_transit_time',l_transit_time);
4129: END IF;
4130:
4131: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date + l_transit_time;
4132: IF l_debug_on THEN
4129: END IF;
4130:
4131: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date + l_transit_time;
4132: IF l_debug_on THEN
4133: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4134: END IF;
4135:
4136: ELSE
4137: IF l_debug_on THEN
4134: END IF;
4135:
4136: ELSE
4137: IF l_debug_on THEN
4138: WSH_DEBUG_SV.log(l_module_name,'l_transit_time',l_transit_time);
4139: END IF;
4140:
4141: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date +
4142: ((l_deconsol_do_date - l_del_attributes.initial_pickup_date)/2);
4141: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date +
4142: ((l_deconsol_do_date - l_del_attributes.initial_pickup_date)/2);
4143:
4144: IF l_debug_on THEN
4145: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_date',l_del_attributes.initial_pickup_date);
4146: WSH_DEBUG_SV.log(l_module_name,'l_deconsol_do_date',l_deconsol_do_date);
4147: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4148: END IF;
4149: END IF;
4142: ((l_deconsol_do_date - l_del_attributes.initial_pickup_date)/2);
4143:
4144: IF l_debug_on THEN
4145: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_date',l_del_attributes.initial_pickup_date);
4146: WSH_DEBUG_SV.log(l_module_name,'l_deconsol_do_date',l_deconsol_do_date);
4147: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4148: END IF;
4149: END IF;
4150:
4143:
4144: IF l_debug_on THEN
4145: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_date',l_del_attributes.initial_pickup_date);
4146: WSH_DEBUG_SV.log(l_module_name,'l_deconsol_do_date',l_deconsol_do_date);
4147: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4148: END IF;
4149: END IF;
4150:
4151: IF l_debug_on THEN
4148: END IF;
4149: END IF;
4150:
4151: IF l_debug_on THEN
4152: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_wv_utils.get_default_uoms',WSH_DEBUG_SV.C_PROC_LEVEL);
4153: END IF;
4154: wsh_wv_utils.get_default_uoms(l_del_attributes.organization_id, l_weight_uom_code, l_volume_uom_code, l_dummy);
4155:
4156: l_del_attributes.weight_uom_code := l_weight_uom_code;
4156: l_del_attributes.weight_uom_code := l_weight_uom_code;
4157: l_del_attributes.volume_uom_code := l_volume_uom_code;
4158:
4159: IF l_debug_on THEN
4160: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',l_weight_uom_code);
4161: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',l_volume_uom_code);
4162: END IF;
4163:
4164: -- Create the delivery
4157: l_del_attributes.volume_uom_code := l_volume_uom_code;
4158:
4159: IF l_debug_on THEN
4160: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',l_weight_uom_code);
4161: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',l_volume_uom_code);
4162: END IF;
4163:
4164: -- Create the delivery
4165:
4163:
4164: -- Create the delivery
4165:
4166: IF l_debug_on THEN
4167: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_new_deliveries_pvt.create_delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
4168: END IF;
4169:
4170: wsh_new_deliveries_pvt.create_delivery(l_del_attributes, l_rowid, l_delivery_id, l_delivery_name, l_return_status);
4171:
4184:
4185: IF l_trip_id IS NOT NULL THEN
4186:
4187: IF l_debug_on THEN
4188: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TRIPS_ACTIONS.Unassign_Trip',WSH_DEBUG_SV.C_PROC_LEVEL);
4189: END IF;
4190: WSH_TRIPS_ACTIONS.Unassign_Trip(p_del_rows => l_trip_del_tab,
4191: p_trip_id => l_trip_id,
4192: x_return_status => l_return_status);
4205:
4206: IF l_empty_stops_tab.count > 0 THEN
4207: IF l_debug_on THEN
4208: FOR i in 1 .. l_empty_stops_tab.count LOOP
4209: WSH_DEBUG_SV.log(l_module_name,'empty stop '||i,l_empty_stops_tab(i));
4210: END LOOP;
4211: END IF;
4212:
4213: WSH_UTIL_CORE.Delete(p_type => 'STOP',
4223:
4224: END IF;
4225:
4226: IF l_debug_on THEN
4227: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TRIPS_ACTIONS.assign_Trip',WSH_DEBUG_SV.C_PROC_LEVEL);
4228: END IF;
4229: WSH_TRIPS_ACTIONS.assign_trip(
4230: p_del_rows => l_delivery_id_tab,
4231: p_trip_id => l_trip_id,
4249: -- Autocreate trip for consol del
4250: l_trip_name_tab(1) := p_trip_prefix;
4251:
4252: IF l_debug_on THEN
4253: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TRIPS_ACTIONS.autocreate_trip_multi',WSH_DEBUG_SV.C_PROC_LEVEL);
4254: END IF;
4255: WSH_TRIPS_ACTIONS.autocreate_trip_multi(
4256: p_del_rows => l_delivery_id_tab,
4257: x_trip_ids => l_trip_id_tab,
4280: END IF;
4281:
4282:
4283: IF l_debug_on THEN
4284: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_NEW_DELIVERY_ACTIONS.Assign_Del_to_Consol_Del',WSH_DEBUG_SV.C_PROC_LEVEL);
4285: END IF;
4286: WSH_NEW_DELIVERY_ACTIONS.Assign_Del_to_Consol_Del(
4287: p_del_tab => p_del_attributes_tab,
4288: p_parent_del_id => l_delivery_id,
4316: x_parent_del_id := l_delivery_id;
4317: x_parent_trip_id := l_trip_id;
4318: --
4319: IF l_debug_on THEN
4320: wsh_debug_sv.pop(l_module_name);
4321: END IF;
4322: EXCEPTION
4323: WHEN FND_API.G_EXC_ERROR THEN
4324: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4325: --
4326: -- Debug Statements
4327: --
4328: IF l_debug_on THEN
4329: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4330: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4331: END IF;
4332: --
4333: WHEN WSH_INVALID_TRIPS THEN
4326: -- Debug Statements
4327: --
4328: IF l_debug_on THEN
4329: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4330: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4331: END IF;
4332: --
4333: WHEN WSH_INVALID_TRIPS THEN
4334: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4337: --
4338: -- Debug Statements
4339: --
4340: IF l_debug_on THEN
4341: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_TRIPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4342:
4343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_TRIPS');
4344: END IF;
4345: --
4339: --
4340: IF l_debug_on THEN
4341: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_TRIPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4342:
4343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_TRIPS');
4344: END IF;
4345: --
4346:
4347: WHEN OTHERS THEN
4347: WHEN OTHERS THEN
4348: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.Autocreate_Consol_Delivery',l_module_name);
4349: --
4350: IF l_debug_on THEN
4351: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
4352: END IF;
4353:
4354: END Autocreate_Consol_Delivery;
4355: