[Home] [Help]
48: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
49: --
50: IF l_debug_on IS NULL
51: THEN
52: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
53: END IF;
54: --
55: IF l_debug_on THEN
56: WSH_DEBUG_SV.push(l_module_name);
52: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
53: END IF;
54: --
55: IF l_debug_on THEN
56: WSH_DEBUG_SV.push(l_module_name);
57: --
58: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
59: -- LSP PROJECT
60: WSH_DEBUG_SV.log(l_module_name,'P_CLIENT_ID',p_client_id);
54: --
55: IF l_debug_on THEN
56: WSH_DEBUG_SV.push(l_module_name);
57: --
58: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
59: -- LSP PROJECT
60: WSH_DEBUG_SV.log(l_module_name,'P_CLIENT_ID',p_client_id);
61: WSH_DEBUG_SV.log(l_module_name,'P_GROUP_BY_HEADER_FLAG',p_group_by_header_flag);
62: -- LSP PROJECT
56: WSH_DEBUG_SV.push(l_module_name);
57: --
58: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
59: -- LSP PROJECT
60: WSH_DEBUG_SV.log(l_module_name,'P_CLIENT_ID',p_client_id);
61: WSH_DEBUG_SV.log(l_module_name,'P_GROUP_BY_HEADER_FLAG',p_group_by_header_flag);
62: -- LSP PROJECT
63: END IF;
64: --
57: --
58: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
59: -- LSP PROJECT
60: WSH_DEBUG_SV.log(l_module_name,'P_CLIENT_ID',p_client_id);
61: WSH_DEBUG_SV.log(l_module_name,'P_GROUP_BY_HEADER_FLAG',p_group_by_header_flag);
62: -- LSP PROJECT
63: END IF;
64: --
65: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
69: --
70: -- Debug Statements
71: --
72: IF l_debug_on THEN
73: WSH_DEBUG_SV.pop(l_module_name);
74: END IF;
75: --
76: RETURN;
77: END IF;
80: IF ( p_client_id IS NOT NULL AND WMS_DEPLOY.WMS_DEPLOYMENT_MODE = 'L' ) THEN
81: --{
82: -- Call to get client specific parameters.
83: IF l_debug_on THEN
84: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling INV_CACHE.GET_CLIENT_DEFAULT_PARAMETERS', WSH_DEBUG_SV.C_PROC_LEVEL);
85: END IF;
86: inv_cache.get_client_default_parameters (
87: p_client_id => p_client_id,
88: x_client_parameters_rec => l_client_params,
94: --
95: -- Debug Statements
96: --
97: IF l_debug_on THEN
98: WSH_DEBUG_SV.pop(l_module_name);
99: END IF;
100: --
101: RETURN;
102: --}
132: --
133: --
134: x_group_by_flags := group_by_info;
135: IF l_debug_on THEN
136: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
137: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
138: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
133: --
134: x_group_by_flags := group_by_info;
135: IF l_debug_on THEN
136: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
137: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
138: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
134: x_group_by_flags := group_by_info;
135: IF l_debug_on THEN
136: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
137: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
138: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
135: IF l_debug_on THEN
136: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
137: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
138: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
143: WSH_DEBUG_SV.pop(l_module_name);
136: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
137: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
138: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
143: WSH_DEBUG_SV.pop(l_module_name);
144: END IF;
137: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
138: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
143: WSH_DEBUG_SV.pop(l_module_name);
144: END IF;
145: RETURN;
138: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
143: WSH_DEBUG_SV.pop(l_module_name);
144: END IF;
145: RETURN;
146: END IF;
139: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
140: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
141: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
142: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
143: WSH_DEBUG_SV.pop(l_module_name);
144: END IF;
145: RETURN;
146: END IF;
147: --
155: --
156: -- Debug Statements
157: --
158: IF l_debug_on THEN
159: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
160: END IF;
161: --
162: FND_MESSAGE.SET_TOKEN('ORG_NAME',wsh_util_core.get_org_name(p_organization_id));
163: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
165: --
166: -- Debug Statements
167: --
168: IF l_debug_on THEN
169: WSH_DEBUG_SV.pop(l_module_name);
170: END IF;
171: --
172: RETURN;
173: END IF;
186: --}
187: END IF;
188: --
189: IF l_debug_on THEN
190: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
191: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
192: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
193: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
194: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
187: END IF;
188: --
189: IF l_debug_on THEN
190: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
191: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
192: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
193: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
194: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
195: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
188: --
189: IF l_debug_on THEN
190: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
191: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
192: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
193: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
194: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
195: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
196: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
189: IF l_debug_on THEN
190: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
191: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
192: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
193: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
194: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
195: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
196: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
197: END IF;
190: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
191: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
192: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
193: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
194: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
195: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
196: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
197: END IF;
198: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
191: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
192: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
193: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
194: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
195: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
196: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
197: END IF;
198: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
199: --
192: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
193: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
194: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
195: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
196: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
197: END IF;
198: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
199: --
200: -- Debug Statements
199: --
200: -- Debug Statements
201: --
202: IF l_debug_on THEN
203: WSH_DEBUG_SV.pop(l_module_name);
204: END IF;
205: --
206: EXCEPTION
207: WHEN Others THEN
210: --
211: -- Debug Statements
212: --
213: IF l_debug_on THEN
214: WSH_DEBUG_SV.logmsg(l_module_name, 'THE UNEXPECTED ERROR FROM GET_GROUP_BY_ATTR IS ' || L_ERROR_TEXT );
215: END IF;
216: --
217: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR');
218: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
220: --
221: -- Debug Statements
222: --
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
225: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
226: END IF;
227: --
228: END get_group_by_attr;
221: -- Debug Statements
222: --
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
225: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
226: END IF;
227: --
228: END get_group_by_attr;
229:
337: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
338: --
339: IF l_debug_on IS NULL
340: THEN
341: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
342: END IF;
343: --
344: IF l_debug_on THEN
345: WSH_DEBUG_SV.push(l_module_name);
341: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
342: END IF;
343: --
344: IF l_debug_on THEN
345: WSH_DEBUG_SV.push(l_module_name);
346: WSH_DEBUG_SV.logmsg(l_module_name, 'attributes count: '|| p_grouping_attributes.count);
347: END IF;
348:
349: i := p_grouping_attributes.FIRST;
342: END IF;
343: --
344: IF l_debug_on THEN
345: WSH_DEBUG_SV.push(l_module_name);
346: WSH_DEBUG_SV.logmsg(l_module_name, 'attributes count: '|| p_grouping_attributes.count);
347: END IF;
348:
349: i := p_grouping_attributes.FIRST;
350: WHILE i is NOT NULL LOOP
349: i := p_grouping_attributes.FIRST;
350: WHILE i is NOT NULL LOOP
351:
352: IF l_debug_on THEN
353: WSH_DEBUG_SV.logmsg(l_module_name, 'entity: '|| p_grouping_attributes(i).entity_type);
354: WSH_DEBUG_SV.logmsg(l_module_name, 'entity_id: '|| p_grouping_attributes(i).entity_id);
355: WSH_DEBUG_SV.logmsg(l_module_name, 'index: '||i);
356: END IF;
357:
350: WHILE i is NOT NULL LOOP
351:
352: IF l_debug_on THEN
353: WSH_DEBUG_SV.logmsg(l_module_name, 'entity: '|| p_grouping_attributes(i).entity_type);
354: WSH_DEBUG_SV.logmsg(l_module_name, 'entity_id: '|| p_grouping_attributes(i).entity_id);
355: WSH_DEBUG_SV.logmsg(l_module_name, 'index: '||i);
356: END IF;
357:
358: IF p_grouping_attributes(i).ship_to_location_id IS NULL OR p_grouping_attributes(i).ship_from_location_id IS NULL THEN
351:
352: IF l_debug_on THEN
353: WSH_DEBUG_SV.logmsg(l_module_name, 'entity: '|| p_grouping_attributes(i).entity_type);
354: WSH_DEBUG_SV.logmsg(l_module_name, 'entity_id: '|| p_grouping_attributes(i).entity_id);
355: WSH_DEBUG_SV.logmsg(l_module_name, 'index: '||i);
356: END IF;
357:
358: IF p_grouping_attributes(i).ship_to_location_id IS NULL OR p_grouping_attributes(i).ship_from_location_id IS NULL THEN
359:
360: IF p_grouping_attributes(i).entity_type = 'DELIVERY'
361: AND p_grouping_attributes(i).entity_id IS NOT NULL THEN
362:
363: IF l_debug_on THEN
364: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Calling c_delivery_group');
365: END IF;
366:
367: OPEN c_delivery_group(p_grouping_attributes(i).entity_id);
368: FETCH c_delivery_group INTO l_grouping_attributes;
371: ELSIF p_grouping_attributes(i).entity_type = 'DELIVERY_DETAIL'
372: AND p_grouping_attributes(i).entity_id IS NOT NULL THEN
373:
374: IF l_debug_on THEN
375: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Calling c_detail_group');
376: END IF;
377:
378:
379: OPEN c_detail_group(p_grouping_attributes(i).entity_id);
392: END IF;
393:
394:
395: IF l_debug_on THEN
396: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || p_group_by_header );
397: END IF;
398:
399: -- LSP PROJECT : For matching groups at the time of pick release (action code ='MATCH_GROUPS_AT_PICK')
400: -- ,defualt the "auto create delivery criteria" value from ORG/CLIENT defaults if
411: END IF;
412:
413: END IF;
414: IF l_debug_on THEN
415: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || l_group_by_header );
416: END IF;
417: -- LSP PROJECT : Added client_id parameter.
418: get_group_by_attr (
419: p_organization_id => l_grouping_attributes.organization_id,
422: x_return_status => x_return_status,
423: p_group_by_header_flag => l_group_by_header);
424:
425: IF l_debug_on THEN
426: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || group_by_info.header );
427: END IF;
428:
429: --
430: -- Line direction is also a mandatory grouping attribute.
497:
498: IF l_grouping_attributes.line_direction IN ('O','IO') -- J-IB-NPARIKH
499: THEN
500: IF l_debug_on THEN
501: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
502: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
503: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
504: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
505: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
498: IF l_grouping_attributes.line_direction IN ('O','IO') -- J-IB-NPARIKH
499: THEN
500: IF l_debug_on THEN
501: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
502: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
503: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
504: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
505: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
506: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
499: THEN
500: IF l_debug_on THEN
501: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
502: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
503: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
504: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
505: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
506: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
507: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
500: IF l_debug_on THEN
501: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
502: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
503: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
504: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
505: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
506: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
507: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
508: END IF;
501: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.customer );
502: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
503: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
504: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
505: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
506: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
507: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
508: END IF;
509: --{
502: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.intmed ' || group_by_info.intmed );
503: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
504: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
505: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
506: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
507: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
508: END IF;
509: --{
510: IF (group_by_info.customer = 'Y') THEN
503: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.fob ' || group_by_info.fob );
504: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.freight_terms ' || group_by_info.freight_terms );
505: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.ship_method ' || group_by_info.ship_method );
506: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.carrier ' || group_by_info.carrier );
507: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.customer ' || group_by_info.header );
508: END IF;
509: --{
510: IF (group_by_info.customer = 'Y') THEN
511: l1_hash_string := l1_hash_string ||'-'||to_char(l_grouping_attributes.customer_id);
555:
556: IF (NVL(p_group_by_header, group_by_info.header) = 'Y'
557: AND l_grouping_attributes.line_direction IN ('O','IO') ) THEN
558: IF l_debug_on THEN
559: WSH_DEBUG_SV.logmsg(l_module_name, 'group_by_info.header ' || NVL(p_group_by_header, group_by_info.header) );
560: END IF;
561: p_grouping_attributes(i).source_header_id := l_grouping_attributes.source_header_id;
562: ELSE
563: p_grouping_attributes(i).source_header_id := NULL;
615: -- Debug Statements
616:
617: --
618: IF l_debug_on THEN
619: WSH_DEBUG_SV.logmsg(l_module_name, 'L1_HASH_STRING '||L1_HASH_STRING ||' VALUE '||L1_HASH_VALUE );
620: END IF;
621:
622:
623: --
637:
638: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
639:
640: IF l_debug_on THEN
641: WSH_DEBUG_SV.pop(l_module_name);
642: END IF;
643:
644: EXCEPTION
645:
649: --
650: -- Debug Statements
651: --
652: IF l_debug_on THEN
653: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
654: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
655: END IF;
656:
657:
650: -- Debug Statements
651: --
652: IF l_debug_on THEN
653: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
654: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
655: END IF;
656:
657:
658:
676: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
677: --
678: IF l_debug_on IS NULL
679: THEN
680: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
681: END IF;
682: --
683: IF l_debug_on THEN
684: WSH_DEBUG_SV.push(l_module_name);
680: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
681: END IF;
682: --
683: IF l_debug_on THEN
684: WSH_DEBUG_SV.push(l_module_name);
685: END IF;
686: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
687:
688: l_grp_attr_tab(1).ship_to_location_id := p_delivery_rec.ultimate_dropoff_location_id;
724: p_delivery_rec.hash_string := l_grp_attr_tab(1).l1_hash_string;
725:
726:
727: IF l_debug_on THEN
728: WSH_DEBUG_SV.pop(l_module_name);
729: END IF;
730:
731: EXCEPTION
732:
737: --
738: -- Debug Statements
739: --
740: IF l_debug_on THEN
741: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
742: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
743: END IF;
744: --
745:
738: -- Debug Statements
739: --
740: IF l_debug_on THEN
741: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
742: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
743: END IF;
744: --
745:
746: WHEN Others THEN
750: -- Debug Statements
751: --
752: IF l_debug_on THEN
753:
754: WSH_DEBUG_SV.logmsg(l_module_name,'OTHERS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
756: END IF;
757: --
758:
751: --
752: IF l_debug_on THEN
753:
754: WSH_DEBUG_SV.logmsg(l_module_name,'OTHERS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
756: END IF;
757: --
758:
759:
791: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
792: --
793: IF l_debug_on IS NULL
794: THEN
795: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
796: END IF;
797: --
798: IF l_debug_on THEN
799: WSH_DEBUG_SV.push(l_module_name);
795: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
796: END IF;
797: --
798: IF l_debug_on THEN
799: WSH_DEBUG_SV.push(l_module_name);
800: END IF;
801: --
802: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
803:
905: -- Add this record to the group.
906: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
907:
908: IF l_debug_on THEN
909: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
906: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
907:
908: IF l_debug_on THEN
909: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
907:
908: IF l_debug_on THEN
909: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
908: IF l_debug_on THEN
909: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
916: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
909: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
916: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
917: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
910: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
911: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
916: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
917: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
918: 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, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
916: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
917: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
918: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
919: END IF;
912: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
916: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
917: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
918: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
919: END IF;
920:
913: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
916: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
917: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
918: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
919: END IF;
920:
921: ELSE
914: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
915: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
916: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
917: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
918: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
919: END IF;
920:
921: ELSE
922:
921: ELSE
922:
923: -- Index exists but the hash strings/attributes do not match.
924: IF l_debug_on THEN
925: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
926: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
927: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
922:
923: -- Index exists but the hash strings/attributes do not match.
924: IF l_debug_on THEN
925: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
926: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
927: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
923: -- Index exists but the hash strings/attributes do not match.
924: IF l_debug_on THEN
925: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
926: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
927: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
924: IF l_debug_on THEN
925: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
926: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
927: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
932: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
925: WSH_DEBUG_SV.logmsg(l_module_name, 'Attribute: Hash String: '||p_attr_tab(i).l1_hash_value);
926: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
927: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
932: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
933: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
926: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_attr_tab(i).service_level);
927: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
932: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
933: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
934: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_attr_tab(i).client_id);
927: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_attr_tab(i).mode_of_transport);
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
932: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
933: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
934: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_attr_tab(i).client_id);
935: END IF;
928: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_attr_tab(i).ship_method_code);
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
932: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
933: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
934: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_attr_tab(i).client_id);
935: END IF;
936:
929: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_attr_tab(i).carrier_id);
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
932: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
933: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
934: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_attr_tab(i).client_id);
935: END IF;
936:
937: IF p_check_one_group = 'Y' THEN
930: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_attr_tab(i).delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_attr_tab(i).source_header_id);
932: WSH_DEBUG_SV.logmsg(l_module_name, 'batch_id: '||p_attr_tab(i).batch_id);
933: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_attr_tab(i).group_id);
934: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_attr_tab(i).client_id);
935: END IF;
936:
937: IF p_check_one_group = 'Y' THEN
938:
975: select WSH_MATCH_GROUP_S.nextval into p_group_tab(l_group_index).group_id from dual;
976: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
977:
978: IF l_debug_on THEN
979: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
980: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
976: p_attr_tab(i).group_id := p_group_tab(l_group_index).group_id;
977:
978: IF l_debug_on THEN
979: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
980: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
977:
978: IF l_debug_on THEN
979: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
980: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
978: IF l_debug_on THEN
979: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
980: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
979: WSH_DEBUG_SV.logmsg(l_module_name, 'Group: Hash String: '||p_group_tab(l_group_index).l1_hash_value);
980: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
987: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
980: WSH_DEBUG_SV.logmsg(l_module_name, 'service_level: '||p_group_tab(l_group_index).service_level);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
987: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
988: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'mode_of_transport: '||p_group_tab(l_group_index).mode_of_transport);
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
987: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
988: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
989: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_group_tab(l_group_index).client_id); -- LSP PROJECT
982: WSH_DEBUG_SV.logmsg(l_module_name, 'ship_method_code: '||p_group_tab(l_group_index).ship_method_code);
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
987: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
988: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
989: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_group_tab(l_group_index).client_id); -- LSP PROJECT
990: END IF;
983: WSH_DEBUG_SV.logmsg(l_module_name, 'carrier_id: '||p_group_tab(l_group_index).carrier_id);
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
987: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
988: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
989: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_group_tab(l_group_index).client_id); -- LSP PROJECT
990: END IF;
991:
984: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery_id: '||p_group_tab(l_group_index).delivery_id);
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
987: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
988: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
989: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_group_tab(l_group_index).client_id); -- LSP PROJECT
990: END IF;
991:
992: l_hashval_exists := TRUE;
985: WSH_DEBUG_SV.logmsg(l_module_name, 'source_header_id: '||p_group_tab(l_group_index).source_header_id);
986: WSH_DEBUG_SV.logmsg(l_module_name, 'group_id: '||p_group_tab(l_group_index).group_id);
987: WSH_DEBUG_SV.logmsg(l_module_name, 'date_requested: '||p_group_tab(l_group_index).date_requested);
988: WSH_DEBUG_SV.logmsg(l_module_name, 'date_scheduled: '||p_group_tab(l_group_index).date_scheduled);
989: WSH_DEBUG_SV.logmsg(l_module_name, 'client_id: '||p_group_tab(l_group_index).client_id); -- LSP PROJECT
990: END IF;
991:
992: l_hashval_exists := TRUE;
993:
1014: --
1015: -- Debug Statements
1016: --
1017: IF l_debug_on THEN
1018: WSH_DEBUG_SV.pop(l_module_name);
1019: END IF;
1020: --
1021:
1022:
1028: --
1029: -- Debug Statements
1030: --
1031: IF l_debug_on THEN
1032: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1033: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_MULTIPE_GROUPS');
1034: END IF;
1035: --
1036:
1029: -- Debug Statements
1030: --
1031: IF l_debug_on THEN
1032: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1033: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_MULTIPE_GROUPS');
1034: END IF;
1035: --
1036:
1037: WHEN Others THEN
1040: --
1041: -- Debug Statements
1042: --
1043: IF l_debug_on THEN
1044: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.
1045: C_UNEXPEC_ERR_LEVEL);
1046: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1047: END IF;
1048:
1042: --
1043: IF l_debug_on THEN
1044: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.
1045: C_UNEXPEC_ERR_LEVEL);
1046: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1047: END IF;
1048:
1049: END;
1050:
1301: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1302: --
1303: IF l_debug_on IS NULL
1304: THEN
1305: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1306: END IF;
1307: --
1308: IF l_debug_on THEN
1309: WSH_DEBUG_SV.push(l_module_name);
1305: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1306: END IF;
1307: --
1308: IF l_debug_on THEN
1309: WSH_DEBUG_SV.push(l_module_name);
1310: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1311: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1312: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1313: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1306: END IF;
1307: --
1308: IF l_debug_on THEN
1309: WSH_DEBUG_SV.push(l_module_name);
1310: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1311: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1312: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1313: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1314: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1307: --
1308: IF l_debug_on THEN
1309: WSH_DEBUG_SV.push(l_module_name);
1310: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1311: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1312: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1313: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1314: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1315: END IF;
1308: IF l_debug_on THEN
1309: WSH_DEBUG_SV.push(l_module_name);
1310: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1311: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1312: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1313: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1314: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1315: END IF;
1316:
1309: WSH_DEBUG_SV.push(l_module_name);
1310: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1311: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1312: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1313: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1314: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1315: END IF;
1316:
1317:
1310: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.action', p_action_rec.action);
1311: WSH_DEBUG_SV.log(l_module_name, 'p_action_rec.output_format_type', p_action_rec.output_format_type);
1312: WSH_DEBUG_SV.log(l_module_name, 'p_attr_tab count' , p_attr_tab.count);
1313: WSH_DEBUG_SV.log(l_module_name, 'p_group_tab count', p_group_tab.count);
1314: WSH_DEBUG_SV.log(l_module_name, 'p_target_rec.entity_type', p_target_rec.entity_type);
1315: END IF;
1316:
1317:
1318: -- Need to validate the input action.
1345: IF p_attr_tab(p_attr_tab.FIRST).entity_type = 'DELIVERY_DETAIL'
1346: THEN
1347: --{
1348: IF l_debug_on THEN
1349: wsh_debug_sv.log(l_module_name, 'entity id', p_attr_tab(p_attr_tab.FIRST).entity_id);
1350: END IF;
1351: -- LSP PROJECT : Added client_id
1352: OPEN c_check_lpn(p_attr_tab(p_attr_tab.FIRST).entity_id);
1353: FETCH c_check_lpn INTO l_container_flag, l_organization_id,
1354: l_ship_from_loc_id, l_customer_id,l_client_id;
1355: CLOSE c_check_lpn;
1356:
1357: IF l_debug_on THEN
1358: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1359: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1360: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1361: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1362: wsh_debug_sv.log(l_Module_Name, 'l_client_id ', l_client_id); -- LSP PROJECT
1355: CLOSE c_check_lpn;
1356:
1357: IF l_debug_on THEN
1358: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1359: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1360: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1361: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1362: wsh_debug_sv.log(l_Module_Name, 'l_client_id ', l_client_id); -- LSP PROJECT
1363: END IF;
1356:
1357: IF l_debug_on THEN
1358: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1359: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1360: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1361: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1362: wsh_debug_sv.log(l_Module_Name, 'l_client_id ', l_client_id); -- LSP PROJECT
1363: END IF;
1364:
1357: IF l_debug_on THEN
1358: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1359: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1360: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1361: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1362: wsh_debug_sv.log(l_Module_Name, 'l_client_id ', l_client_id); -- LSP PROJECT
1363: END IF;
1364:
1365: IF nvl(l_container_flag, 'N') = 'Y'
1358: wsh_debug_sv.log(l_Module_name, 'Container Flag', l_container_flag);
1359: wsh_debug_sv.log(l_Module_name , 'l_organization_id', l_organization_id);
1360: wsh_debug_sv.log(l_Module_Name, 'l_ship_from_loc_id', l_ship_from_loc_id);
1361: wsh_debug_sv.log(l_Module_Name, 'l_customer_id ', l_customer_id);
1362: wsh_debug_sv.log(l_Module_Name, 'l_client_id ', l_client_id); -- LSP PROJECT
1363: END IF;
1364:
1365: IF nvl(l_container_flag, 'N') = 'Y'
1366: THEN
1374: RAISE fnd_api.g_exc_error;
1375: END IF;
1376:
1377: IF l_debug_on THEN
1378: wsh_debug_sv.log(l_module_name, 'l_empty_container', l_empty_container);
1379: END IF;
1380: --}
1381: END IF;
1382: --}
1386: --BUG 3383843
1387:
1388:
1389: IF l_debug_on THEN
1390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Create_Hash',WSH_DEBUG_SV.C_PROC_LEVEL);
1391: END IF;
1392: Create_Hash(p_grouping_attributes => p_attr_tab,
1393: p_group_by_header => p_action_rec.group_by_header_flag,
1394: p_action_code => p_action_rec.action,
1409: l_check_one_group := 'N';
1410:
1411: END IF;
1412: IF l_debug_on THEN
1413: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Create_Groupings',WSH_DEBUG_SV.C_PROC_LEVEL);
1414: END IF;
1415:
1416: Create_Groupings(p_attr_tab => p_attr_tab,
1417: p_group_tab => p_group_tab,
1429:
1430: x_out_rec.single_group := 'N';
1431:
1432: IF l_debug_on THEN
1433: WSH_DEBUG_SV.pop(l_module_name);
1434: END IF;
1435:
1436: RETURN;
1437:
1462: FETCH c_dlvy_for_cont BULK COLLECT INTO l_matched_entities;
1463: CLOSE c_dlvy_for_cont;
1464: --
1465: IF l_debug_on THEN
1466: wsh_debug_sv.log(l_module_name, 'Empty container match count=' || l_matched_entities.count);
1467: END IF;
1468: ELSE
1469: -- Find all matching deliveries
1470: -- Populate the following variables used to find matching deliveries.
1488: x_group_by_flags => group_by_info,
1489: x_return_status => x_return_status
1490: );
1491: IF l_debug_on THEN
1492: wsh_debug_sv.log(l_Module_name , 'group by ship method ', group_by_info.ship_method);
1493: END IF;
1494:
1495: IF group_by_info.customer = 'N' THEN
1496: l_customer_id := NULL;
1605:
1606: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1607:
1608: IF l_debug_on THEN
1609: WSH_DEBUG_SV.pop(l_module_name);
1610: END IF;
1611:
1612: RETURN;
1613:
1619:
1620: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1621:
1622: IF l_debug_on THEN
1623: WSH_DEBUG_SV.pop(l_module_name);
1624: END IF;
1625:
1626: RETURN;
1627:
1678:
1679: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1680:
1681: IF l_debug_on THEN
1682: WSH_DEBUG_SV.pop(l_module_name);
1683: END IF;
1684:
1685: RETURN;
1686:
1690: END IF;
1691:
1692:
1693: IF l_debug_on THEN
1694: WSH_DEBUG_SV.pop(l_module_name);
1695: END IF;
1696:
1697: EXCEPTION
1698: WHEN fnd_api.g_exc_error THEN
1698: WHEN fnd_api.g_exc_error THEN
1699: x_return_status := fnd_api.g_ret_sts_error;
1700: --
1701: IF l_debug_on THEN
1702: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
1703: END IF;
1704: --
1705: WHEN DELIVERY_NOT_MATCH THEN
1706: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1709: --
1710: -- Debug Statements
1711: --
1712: IF l_debug_on THEN
1713: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_NOT_MATCH exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELIVERY_NOT_MATCH');
1715: END IF;
1716: --
1717: WHEN FAIL_CREATE_GROUP THEN
1710: -- Debug Statements
1711: --
1712: IF l_debug_on THEN
1713: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_NOT_MATCH exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELIVERY_NOT_MATCH');
1715: END IF;
1716: --
1717: WHEN FAIL_CREATE_GROUP THEN
1718: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1721: --
1722: -- Debug Statements
1723: --
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1726: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_GROUP');
1727: END IF;
1728: --
1729: WHEN FAIL_CREATE_HASH THEN
1722: -- Debug Statements
1723: --
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.logmsg(l_module_name,'MULTIPE_GROUPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1726: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_GROUP');
1727: END IF;
1728: --
1729: WHEN FAIL_CREATE_HASH THEN
1730: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1733: --
1734: -- Debug Statements
1735: --
1736: IF l_debug_on THEN
1737: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1738:
1739: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
1740: END IF;
1741: --
1735: --
1736: IF l_debug_on THEN
1737: WSH_DEBUG_SV.logmsg(l_module_name,'FAIL_CREATE_GROUP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1738:
1739: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FAIL_CREATE_HASH');
1740: END IF;
1741: --
1742:
1743: WHEN Others THEN
1754: --
1755: -- Debug Statements
1756: --
1757: IF l_debug_on THEN
1758: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1759: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1760: END IF;
1761:
1762: END;
1755: -- Debug Statements
1756: --
1757: IF l_debug_on THEN
1758: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1759: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1760: END IF;
1761:
1762: END;
1763:
1796: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1797: --
1798: IF l_debug_on IS NULL
1799: THEN
1800: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1801: END IF;
1802: --
1803: IF l_debug_on THEN
1804: WSH_DEBUG_SV.push(l_module_name);
1800: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1801: END IF;
1802: --
1803: IF l_debug_on THEN
1804: WSH_DEBUG_SV.push(l_module_name);
1805: --
1806: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1807: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1808: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1802: --
1803: IF l_debug_on THEN
1804: WSH_DEBUG_SV.push(l_module_name);
1805: --
1806: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1807: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1808: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1809: END IF;
1810: --
1803: IF l_debug_on THEN
1804: WSH_DEBUG_SV.push(l_module_name);
1805: --
1806: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1807: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1808: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1809: END IF;
1810: --
1811: --
1804: WSH_DEBUG_SV.push(l_module_name);
1805: --
1806: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1807: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1808: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1809: END IF;
1810: --
1811: --
1812: -- Debug Statements
1811: --
1812: -- Debug Statements
1813: --
1814: IF l_debug_on THEN
1815: WSH_DEBUG_SV.pop(l_module_name);
1816: END IF;
1817: --
1818: RETURN TRUE;
1819:
1845: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1846: --
1847: IF l_debug_on IS NULL
1848: THEN
1849: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1850: END IF;
1851: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1849: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1850: END IF;
1851: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1857: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1851: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1857: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1858: END IF;
1859: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1857: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1858: END IF;
1859: --
1860: --
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_DEL_DATE',P_DEL_DATE);
1857: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_DATE',P_DETAIL_DATE);
1858: END IF;
1859: --
1860: --
1861: -- Debug Statements
1860: --
1861: -- Debug Statements
1862: --
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.pop(l_module_name);
1865: END IF;
1866: --
1867: RETURN TRUE;
1868:
1894: BEGIN
1895:
1896: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1897: IF l_debug_on IS NULL THEN
1898: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1899: END IF;
1900:
1901: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1902:
1900:
1901: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1902:
1903: IF l_debug_on THEN
1904: WSH_DEBUG_SV.push(l_module_name);
1905: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1906: END IF;
1907: WSH_NEW_DELIVERIES_PVT.Create_Delivery(p_delivery_info, x_rowid, x_delivery_id, x_delivery_name, x_return_status);
1908: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1901: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1902:
1903: IF l_debug_on THEN
1904: WSH_DEBUG_SV.push(l_module_name);
1905: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1906: END IF;
1907: WSH_NEW_DELIVERIES_PVT.Create_Delivery(p_delivery_info, x_rowid, x_delivery_id, x_delivery_name, x_return_status);
1908: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1909: IF l_debug_on THEN
1906: END IF;
1907: WSH_NEW_DELIVERIES_PVT.Create_Delivery(p_delivery_info, x_rowid, x_delivery_id, x_delivery_name, x_return_status);
1908: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1909: IF l_debug_on THEN
1910: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY ');
1911: END IF;
1912: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
1910: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY ');
1911: END IF;
1912: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
1915: END IF;
1916: RAISE OTHERS;
1917: ELSE
1918: IF l_debug_on THEN
1915: END IF;
1916: RAISE OTHERS;
1917: ELSE
1918: IF l_debug_on THEN
1919: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED ERROR');
1920: WSH_DEBUG_SV.pop(l_module_name);
1921: END IF;
1922: ROLLBACK;
1923: RETURN;
1916: RAISE OTHERS;
1917: ELSE
1918: IF l_debug_on THEN
1919: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED ERROR');
1920: WSH_DEBUG_SV.pop(l_module_name);
1921: END IF;
1922: ROLLBACK;
1923: RETURN;
1924: END IF;
1924: END IF;
1925: END IF;
1926:
1927: IF l_debug_on THEN
1928: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED DELIVERY # '||X_DELIVERY_NAME );
1929: END IF;
1930:
1931: IF l_debug_on THEN
1932: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
1928: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED DELIVERY # '||X_DELIVERY_NAME );
1929: END IF;
1930:
1931: IF l_debug_on THEN
1932: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
1933: END IF;
1934: wsh_flexfield_utils.WRITE_DFF_ATTRIBUTES
1935: (p_table_name => 'WSH_NEW_DELIVERIES',
1936: p_primary_id => x_delivery_id,
1937: x_return_status => x_return_status);
1938:
1939: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
1942: WSH_DEBUG_SV.pop(l_module_name);
1943: END IF;
1944: ROLLBACK;
1945: RETURN;
1938:
1939: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
1942: WSH_DEBUG_SV.pop(l_module_name);
1943: END IF;
1944: ROLLBACK;
1945: RETURN;
1946: END IF;
1945: RETURN;
1946: END IF;
1947:
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.log(l_module_name,'Autonomous Return status ', x_return_status);
1950: END IF;
1951:
1952: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1953: COMMIT;
1955: ROLLBACK;
1956: END IF;
1957:
1958: IF l_debug_on THEN
1959: WSH_DEBUG_SV.pop(l_module_name);
1960: END IF;
1961:
1962: EXCEPTION
1963: WHEN OTHERS THEN
1963: WHEN OTHERS THEN
1964: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTONOMOUS_CREATE_DELIVERY');
1965: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1966: IF l_debug_on THEN
1967: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1968: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1969: END IF;
1970: ROLLBACK;
1971: END Autonomous_Create_Delivery;
1964: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTONOMOUS_CREATE_DELIVERY');
1965: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1966: IF l_debug_on THEN
1967: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1968: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1969: END IF;
1970: ROLLBACK;
1971: END Autonomous_Create_Delivery;
1972:
2122:
2123: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2124: --
2125: IF l_debug_on IS NULL THEN
2126: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2127: END IF;
2128: --
2129: IF l_debug_on THEN
2130: WSH_DEBUG_SV.push(l_module_name);
2126: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2127: END IF;
2128: --
2129: IF l_debug_on THEN
2130: WSH_DEBUG_SV.push(l_module_name);
2131: --
2132: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
2133: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
2134: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
2128: --
2129: IF l_debug_on THEN
2130: WSH_DEBUG_SV.push(l_module_name);
2131: --
2132: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
2133: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
2134: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
2135: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
2136: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2129: IF l_debug_on THEN
2130: WSH_DEBUG_SV.push(l_module_name);
2131: --
2132: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
2133: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
2134: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
2135: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
2136: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2137: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
2130: WSH_DEBUG_SV.push(l_module_name);
2131: --
2132: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
2133: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
2134: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
2135: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
2136: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2137: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
2138: END IF;
2131: --
2132: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
2133: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
2134: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
2135: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
2136: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2137: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
2138: END IF;
2139: --
2132: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG', P_INIT_FLAG);
2133: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
2134: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
2135: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
2136: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2137: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
2138: END IF;
2139: --
2140: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2133: WSH_DEBUG_SV.log(l_module_name,'P_PICK_RELEASE_FLAG',P_PICK_RELEASE_FLAG);
2134: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG', P_CONTAINER_FLAG);
2135: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG', P_CHECK_FLAG);
2136: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
2137: WSH_DEBUG_SV.log(l_module_name,'P_CALLER', P_CALLER);
2138: END IF;
2139: --
2140: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2141:
2141:
2142:
2143: IF (p_line_rows.count = 0) THEN
2144: IF l_debug_on THEN
2145: WSH_DEBUG_SV.logmsg(l_module_name, 'RAISING EXCEPTION WHEN OTHERS BECAUSE P_LINE_ROWS.COUNT IS 0' );
2146: END IF;
2147: --
2148: raise others;
2149: END IF;
2148: raise others;
2149: END IF;
2150:
2151: IF l_debug_on THEN
2152: WSH_DEBUG_SV.logmsg(l_module_name, 'INITIALIZING AUTO_DEL_IDS...' );
2153: END IF;
2154: --
2155:
2156: FOR i IN 1..p_line_rows.count LOOP
2154: --
2155:
2156: FOR i IN 1..p_line_rows.count LOOP
2157: IF l_debug_on THEN
2158: WSH_DEBUG_SV.logmsg(l_module_name, '**** PROCESSING DELIVERY DETAIL ID '||P_LINE_ROWS ( I ) ||' ****' );
2159: END IF;
2160: --
2161: l_attr_tab(i).entity_id := p_line_rows(i);
2162: l_attr_tab(i).entity_type := 'DELIVERY_DETAIL';
2166:
2167: l_action_rec.group_by_header_flag := p_pick_release_flag;
2168:
2169: IF l_debug_on THEN
2170: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling Find_Matching_Groups' );
2171: END IF;
2172: Find_Matching_Groups(p_attr_tab => l_attr_tab,
2173: p_action_rec => l_action_rec,
2174: p_target_rec => l_target_rec,
2181: raise e_return_excp;
2182: END IF;
2183:
2184: IF l_debug_on THEN
2185: WSH_DEBUG_SV.log(l_module_name, 'l_group_info.COUNT', l_group_info.COUNT);
2186: END IF;
2187:
2188: j := 0;
2189:
2209: FETCH c_cont into l_attr_tab(i).container_flag;
2210: CLOSE c_cont;
2211:
2212: IF l_debug_on THEN
2213: WSH_DEBUG_SV.log(l_module_name,'container flag is',l_attr_tab(i).container_flag);
2214: END IF;
2215:
2216: IF l_attr_tab(i).container_flag = 'Y' THEN --{
2217: WSH_CONTAINER_UTILITIES.Is_Empty (p_container_instance_id => l_attr_tab(i).entity_id,
2221: IF (l_return_status IN(WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2222: x_return_status := l_return_status;
2223: wsh_util_core.add_message(x_return_status);
2224: IF l_debug_on THEN
2225: WSH_DEBUG_SV.logmsg(l_module_name,'Error returned from WSH_CONTAINER_UTILITIES.Is_Empty');
2226: END IF;
2227: raise e_return_excp; -- LPN CONV. rv
2228: END IF;
2229:
2227: raise e_return_excp; -- LPN CONV. rv
2228: END IF;
2229:
2230: IF l_debug_on THEN
2231: WSH_DEBUG_SV.log(l_module_name, 'l_detail_is_empty_cont',l_detail_is_empty_cont );
2232: END IF;
2233:
2234: IF l_detail_is_empty_cont = 'Y' then
2235: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_EMPTY');
2235: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_EMPTY');
2236: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2237: wsh_util_core.add_message(x_return_status);
2238: IF l_debug_on THEN
2239: WSH_DEBUG_SV.logmsg(l_module_name, 'container empty,autocreate delivery not allowed');
2240: WSH_DEBUG_SV.pop(l_module_name);
2241: END IF;
2242: raise e_return_excp; -- LPN CONV. rv
2243: ELSE
2236: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2237: wsh_util_core.add_message(x_return_status);
2238: IF l_debug_on THEN
2239: WSH_DEBUG_SV.logmsg(l_module_name, 'container empty,autocreate delivery not allowed');
2240: WSH_DEBUG_SV.pop(l_module_name);
2241: END IF;
2242: raise e_return_excp; -- LPN CONV. rv
2243: ELSE
2244: FND_MESSAGE.SET_NAME('WSH','WSH_ULT_DROPOFF_LOC_ID_NOT_FND');
2245: FND_MESSAGE.SET_TOKEN('LINE_LPN_ID',l_line_lpn_id);
2246: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2247: wsh_util_core.add_message(x_return_status);
2248: IF l_debug_on THEN
2249: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIPTO LOCATION NOT FOUND FOR '||P_LINE_ROWS ( I ) );
2250: END IF;
2251: raise e_return_excp; -- LPN CONV. rv
2252: END IF;
2253: ELSE
2255: FND_MESSAGE.SET_TOKEN('LINE_LPN_ID',l_line_lpn_id);
2256: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2257: wsh_util_core.add_message(x_return_status);
2258: IF l_debug_on THEN
2259: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIPTO LOCATION NOT FOUND FOR '||P_LINE_ROWS ( I ) );
2260: END IF;
2261: raise e_return_excp; -- LPN CONV. rv
2262: END IF;
2263: -- the code will not continue; the above IFs and ELSEs
2267: IF l_attr_tab(i).delivery_id IS NOT NULL THEN
2268:
2269: -- Use this flag to set a warning message at the end of the procedure
2270: IF l_debug_on THEN
2271: WSH_DEBUG_SV.logmsg(l_module_name, 'THE LINE IS ASSIGNED TO DELIVERY '||l_attr_tab(i).DELIVERY_ID );
2272: END IF;
2273: --
2274: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_ASSIGNED_DEL');
2275: FND_MESSAGE.SET_TOKEN('DET_NAME', l_attr_tab(i).entity_id);
2294: l_group_index := l_group_index + 1;
2295: END LOOP;
2296:
2297: IF l_debug_on THEN
2298: 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);
2299: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2300: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2301: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2302: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').consignee_flag ', l_attr_tab(i).consignee_flag); --RTV changes
2295: END LOOP;
2296:
2297: IF l_debug_on THEN
2298: 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);
2299: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2300: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2301: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2302: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').consignee_flag ', l_attr_tab(i).consignee_flag); --RTV changes
2303: END IF;
2296:
2297: IF l_debug_on THEN
2298: 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);
2299: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2300: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2301: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2302: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').consignee_flag ', l_attr_tab(i).consignee_flag); --RTV changes
2303: END IF;
2304:
2297: IF l_debug_on THEN
2298: 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);
2299: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2300: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2301: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2302: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').consignee_flag ', l_attr_tab(i).consignee_flag); --RTV changes
2303: END IF;
2304:
2305: IF l_attr_tab(i).group_id IS NOT NULL
2298: 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);
2299: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').source_header_id', l_attr_tab(i).source_header_id);
2300: WSH_DEBUG_SV.log(l_module_name, 'l_group_info(' || l_group_index || ').group_id', l_group_info(l_group_index).group_id);
2301: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(=).group_id', l_attr_tab(i).group_id);
2302: WSH_DEBUG_SV.log(l_module_name, 'l_attr_tab(' || i || ').consignee_flag ', l_attr_tab(i).consignee_flag); --RTV changes
2303: END IF;
2304:
2305: IF l_attr_tab(i).group_id IS NOT NULL
2306: AND NOT (l_delivery_tab.exists(l_attr_tab(i).group_id)) THEN --{
2341: l_delivery_info.consignee_flag := l_group_info(l_group_index).consignee_flag; -- RTV changes
2342:
2343:
2344: IF l_debug_on THEN
2345: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.GET_DEFAULT_UOMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2346: END IF;
2347:
2348: wsh_wv_utils.get_default_uoms(l_group_info(l_group_index).organization_id, l_weight_uom_code, l_volume_uom_code, x_return_status);
2349: -- Bug8727903 (begin): Now the get_default_uoms API can return error status also.
2348: wsh_wv_utils.get_default_uoms(l_group_info(l_group_index).organization_id, l_weight_uom_code, l_volume_uom_code, x_return_status);
2349: -- Bug8727903 (begin): Now the get_default_uoms API can return error status also.
2350: --
2351: IF l_debug_on THEN
2352: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WV_UTILS.GET_DEFAULT_UOMS',x_return_status);
2353: END IF;
2354: --
2355: WSH_UTIL_CORE.api_post_call(
2356: p_return_status => x_return_status,
2366:
2367: IF WSH_PICK_LIST.G_BATCH_ID IS NOT NULL
2368: AND WSH_PICK_LIST.G_PICK_REL_PARALLEL THEN --{
2369: IF l_debug_on THEN
2370: WSH_DEBUG_SV.logmsg(l_module_name,'Acquiring lock on :'||l_delivery_info.hash_value||'-'||l_delivery_info.batch_id);
2371: END IF;
2372: DBMS_LOCK.Allocate_Unique(lockname => l_delivery_info.hash_value||'-'||l_delivery_info.batch_id,
2373: lockhandle => l_lock_handle);
2374: l_lock_status := DBMS_LOCK.Request(lockhandle => l_lock_handle,
2376: IF l_lock_status = 0 THEN --{
2377: -- Successfully locked, so check if a delivery
2378: -- has been created in between acquiring the lock
2379: IF l_debug_on THEN
2380: WSH_DEBUG_SV.log(l_module_name,'p_header_id', l_delivery_info.source_header_id);
2381: END IF;
2382:
2383: OPEN c_matching_delivery(
2384: p_hash_value => l_delivery_info.hash_value,
2396: CLOSE c_matching_delivery;
2397:
2398: IF l_notfound THEN --{
2399: IF l_debug_on THEN
2400: WSH_DEBUG_SV.logmsg(l_module_name,'Matching delivery is not found, so create a new delivery ');
2401: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Autonomous_Create_Delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
2402: END IF;
2403: Autonomous_Create_Delivery(l_delivery_info, l_rowid,
2404: l_delivery_id, l_delivery_name, x_return_status);
2397:
2398: IF l_notfound THEN --{
2399: IF l_debug_on THEN
2400: WSH_DEBUG_SV.logmsg(l_module_name,'Matching delivery is not found, so create a new delivery ');
2401: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Autonomous_Create_Delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
2402: END IF;
2403: Autonomous_Create_Delivery(l_delivery_info, l_rowid,
2404: l_delivery_id, l_delivery_name, x_return_status);
2405: IF l_debug_on THEN
2402: END IF;
2403: Autonomous_Create_Delivery(l_delivery_info, l_rowid,
2404: l_delivery_id, l_delivery_name, x_return_status);
2405: IF l_debug_on THEN
2406: WSH_DEBUG_SV.log(l_module_name,'Return from Autonomous_Create_Delivery, Return status', x_return_status);
2407: END IF;
2408: l_lock_status := DBMS_LOCK.Release(l_lock_handle);
2409: l_lock_handle := NULL;
2410:
2412: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2413: raise others;
2414: ELSE
2415: IF l_debug_on THEN
2416: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_DELIVERY_AUTOCREATE.Autonomous_Create_Delivery RETURNED ERROR');
2417: END IF;
2418: raise e_return_excp;
2419: END IF;
2420: ELSE
2424: ELSE --{
2425: l_lock_status := DBMS_LOCK.Release(l_lock_handle);
2426: l_lock_handle := NULL;
2427: IF l_debug_on THEN
2428: WSH_DEBUG_SV.logmsg(l_module_name,'Matching delivery '||l_delivery_name||' already exists , so skip creating a new delivery ');
2429: END IF;
2430:
2431: l_group_info(l_group_index).delivery_id := l_delivery_id;
2432: GOTO SKIP_ITM_EXISTING_DEL;
2439: -- This can happen only if there's a timeout issue
2440: -- or unexpected error
2441: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2442: IF l_debug_on THEN
2443: WSH_DEBUG_SV.logmsg(l_module_name, 'Error when trying to acquire User Lock, Lock Status :'||l_lock_status );
2444: END IF;
2445: raise e_return_excp;
2446: END IF; --}
2447: --}
2447: --}
2448: ELSE
2449: --{ non-parallel-pick case
2450: IF l_debug_on THEN
2451: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
2452: END IF;
2453: wsh_new_deliveries_pvt.create_delivery(l_delivery_info, l_rowid, l_delivery_id, l_delivery_name, x_return_status);
2454: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2455: IF l_debug_on THEN
2452: END IF;
2453: wsh_new_deliveries_pvt.create_delivery(l_delivery_info, l_rowid, l_delivery_id, l_delivery_name, x_return_status);
2454: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2455: IF l_debug_on THEN
2456: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY FOR '||P_LINE_ROWS ( I ) );
2457: END IF;
2458: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2459: IF l_debug_on THEN
2460: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
2456: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR IN WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY FOR '||P_LINE_ROWS ( I ) );
2457: END IF;
2458: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2459: IF l_debug_on THEN
2460: WSH_DEBUG_SV.logmsg(l_module_name,'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED UNEXPECTED ERROR');
2461: END IF;
2462: raise others;
2463: ELSE
2464: IF l_debug_on THEN
2461: END IF;
2462: raise others;
2463: ELSE
2464: IF l_debug_on THEN
2465: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY RETURNED ERROR');
2466: END IF;
2467: raise e_return_excp;
2468: END IF;
2469: END IF;
2468: END IF;
2469: END IF;
2470:
2471: IF l_debug_on THEN
2472: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED DELIVERY # '||L_DELIVERY_NAME );
2473: END IF;
2474:
2475: l_group_info(l_group_index).delivery_id := l_delivery_id;
2476:
2474:
2475: l_group_info(l_group_index).delivery_id := l_delivery_id;
2476:
2477: IF l_debug_on THEN
2478: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
2479: END IF;
2480: wsh_flexfield_utils.WRITE_DFF_ATTRIBUTES
2481: (p_table_name => 'WSH_NEW_DELIVERIES',
2482: p_primary_id => l_delivery_id,
2483: x_return_status => x_return_status);
2484:
2485: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2486: IF l_debug_on THEN
2487: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
2488: END IF;
2489: raise e_return_excp;
2490: END IF;
2491:
2495: -- following code is common for parallel and non-parallel cases
2496: -- of creating a new delivery, up to the label SKIP_ITM_EXISTING_DEL.
2497:
2498: IF l_debug_on THEN
2499: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT.Get',WSH_DEBUG_SV.C_PROC_LEVEL);
2500: END IF;
2501:
2502: WSH_SHIPPING_PARAMS_PVT.Get(
2503: p_organization_id => l_delivery_info.organization_id,
2530: -- call Check_ITM_Required to see if the delivery criteria
2531: -- requires ITM screening and log exception.
2532:
2533: IF l_debug_on THEN
2534: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.Check_ITM_Required',WSH_DEBUG_SV.C_PROC_LEVEL);
2535: END IF;
2536:
2537: l_log_itm_exc := WSH_DELIVERY_VALIDATIONS.Check_ITM_Required
2538: (p_delivery_id => l_delivery_id,
2537: l_log_itm_exc := WSH_DELIVERY_VALIDATIONS.Check_ITM_Required
2538: (p_delivery_id => l_delivery_id,
2539: x_return_status => l_return_status);
2540: IF l_debug_on THEN
2541: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_DELIVERY_VALIDATIONS.Check_ITM_Required',l_return_status);
2542: END IF;
2543:
2544: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2545: x_return_status := l_return_status;
2547: END IF;
2548:
2549: IF l_log_itm_exc = 'Y' THEN
2550: IF l_debug_on THEN
2551: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception',WSH_DEBUG_SV.C_PROC_LEVEL);
2552: END IF;
2553: WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception (
2554: p_delivery_id => l_delivery_id,
2555: p_action_type => 'CREATE_DELIVERY',
2555: p_action_type => 'CREATE_DELIVERY',
2556: p_ship_from_location_id => l_delivery_info.initial_pickup_location_id,
2557: x_return_status => l_return_status);
2558: IF l_debug_on THEN
2559: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception',l_return_status);
2560: END IF;
2561:
2562: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2563: x_return_status := l_return_status;
2580: p_caller <> 'FTE_LINE_TO_TRIP') OR p_caller IS NULL)) THEN
2581: -- auto apply routing rule at delivery creation
2582: l_del_select_carrier(l_del_select_carrier.count+1) := l_delivery_id;
2583: IF l_debug_on THEN
2584: wsh_debug_sv.log(l_module_name,'calling routing_guide',p_caller);
2585: END IF;
2586: END IF;
2587:
2588: -- Hiding project
2614:
2615:
2616: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2617: IF l_debug_on THEN
2618: 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 );
2619: END IF;
2620: --
2621: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2622: IF l_debug_on THEN
2619: END IF;
2620: --
2621: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2622: IF l_debug_on THEN
2623: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY RETURNED UNEXPECTED ERROR' );
2624: END IF;
2625: --
2626: raise others;
2627: ELSE
2625: --
2626: raise others;
2627: ELSE
2628: IF l_debug_on THEN
2629: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY RETURNED ERROR' );
2630: END IF;
2631: raise e_return_excp; -- LPN CONV. rv
2632: END IF;
2633:
2649: END IF;
2650:
2651: IF (l_group_info.count = 0) THEN
2652: IF l_debug_on THEN
2653: WSH_DEBUG_SV.logmsg(l_module_name, 'NO DELIVERIES ARE CREATED IN THIS CALL. RAISING EXCEPTION' );
2654: END IF;
2655: --
2656: raise cannot_autocreate_del;
2657: END IF;
2699: l_caller := p_caller;
2700: END IF;
2701:
2702: IF l_debug_on THEN
2703: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.PROCESS_CARRIER_SELECTION',WSH_DEBUG_SV.C_PROC_LEVEL);
2704: END IF;
2705: --
2706:
2707: WSH_NEW_DELIVERY_ACTIONS.PROCESS_CARRIER_SELECTION(p_delivery_id_tab => l_del_select_carrier,
2715: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2716: raise others;
2717: ELSE
2718: IF l_debug_on THEN
2719: WSH_DEBUG_SV.log(l_module_name, 'Return status from WSH_NEW_DELIVERY_ACTIONS.Process_Carrier_Selection', l_return_status );
2720: END IF;
2721: --
2722: END IF;
2723: l_warn_num := l_warn_num + 1;
2750: x_msg_count => l_msg_count,
2751: x_msg_data => l_msg_data);
2752: --
2753: IF l_debug_on THEN
2754: wsh_debug_sv.log(l_module_name,'Return Status from WSH_FTE_INTEGRATION.Rate_Delivery' ,l_return_status);
2755: END IF;
2756:
2757: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2758: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2796: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2797: --{
2798:
2799: IF l_debug_on THEN
2800: 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);
2801: END IF;
2802: --
2803: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2804: (
2807: x_out_rec => l_lpn_out_sync_comm_rec
2808: );
2809: --
2810: IF l_debug_on THEN
2811: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2812: END IF;
2813: --
2814: WSH_UTIL_CORE.API_POST_CALL
2815: (
2831: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
2832: END IF;
2833:
2834: IF l_debug_on THEN
2835: WSH_DEBUG_SV.log(l_module_name, 'Return status from WSH_DELIVERY_AUTOCREATE.autocreate_deliveries', x_return_status);
2836: WSH_DEBUG_SV.pop(l_module_name);
2837: END IF;
2838: --
2839:
2832: END IF;
2833:
2834: IF l_debug_on THEN
2835: WSH_DEBUG_SV.log(l_module_name, 'Return status from WSH_DELIVERY_AUTOCREATE.autocreate_deliveries', x_return_status);
2836: WSH_DEBUG_SV.pop(l_module_name);
2837: END IF;
2838: --
2839:
2840: EXCEPTION
2848: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2849: --{
2850: --
2851: IF l_debug_on THEN
2852: 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);
2853: END IF;
2854: --
2855: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2856: (
2859: x_out_rec => l_lpn_out_sync_comm_rec
2860: );
2861: --
2862: IF l_debug_on THEN
2863: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2864: WSH_DEBUG_SV.pop(l_module_name);
2865: END IF;
2866: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2867: x_return_status := l_return_status;
2860: );
2861: --
2862: IF l_debug_on THEN
2863: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2864: WSH_DEBUG_SV.pop(l_module_name);
2865: END IF;
2866: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2867: x_return_status := l_return_status;
2868: END IF;
2889: -- LPN CONV. rv
2890: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2891: --{
2892: IF l_debug_on THEN
2893: 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);
2894: END IF;
2895: --
2896: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2897: (
2900: x_out_rec => l_lpn_out_sync_comm_rec
2901: );
2902: --
2903: IF l_debug_on THEN
2904: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2905: END IF;
2906: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2907: x_return_status := l_return_status;
2908: END IF;
2910: --}
2911: END IF;
2912: -- LPN CONV. rv
2913: IF l_debug_on THEN
2914: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION CANNOT_AUTOCREATE_DEL RAISED' );
2915: END IF;
2916: --
2917: IF l_debug_on THEN
2918: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_AUTOCREATE_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2914: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION CANNOT_AUTOCREATE_DEL RAISED' );
2915: END IF;
2916: --
2917: IF l_debug_on THEN
2918: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_AUTOCREATE_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2919: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_AUTOCREATE_DEL');
2920: END IF;
2921: --
2922: IF c_cont%ISOPEN THEN
2915: END IF;
2916: --
2917: IF l_debug_on THEN
2918: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_AUTOCREATE_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2919: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_AUTOCREATE_DEL');
2920: END IF;
2921: --
2922: IF c_cont%ISOPEN THEN
2923: CLOSE c_cont;
2946: --
2947: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y' THEN
2948: --{
2949: IF l_debug_on THEN
2950: 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);
2951: END IF;
2952: --
2953: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2954: (
2957: x_out_rec => l_lpn_out_sync_comm_rec
2958: );
2959: --
2960: IF l_debug_on THEN
2961: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2962: END IF;
2963: --}
2964: END IF;
2965: --
2965: --
2966: -- LPN CONV. rv
2967: --
2968: IF l_debug_on THEN
2969: WSH_DEBUG_SV.logmsg(l_module_name, 'THE UNEXPECTED ERROR FROM WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES IS ' || L_ERROR_TEXT );
2970: END IF;
2971: --
2972: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES');
2973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2972: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES');
2973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2974:
2975: IF l_debug_on THEN
2976: WSH_DEBUG_SV.pop(l_module_name);
2977: END IF;
2978: --
2979: END autocreate_deliveries;
2980:
3055: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3056: --
3057: IF l_debug_on IS NULL
3058: THEN
3059: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3060: END IF;
3061: --
3062: IF l_debug_on THEN
3063: WSH_DEBUG_SV.push(l_module_name);
3059: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3060: END IF;
3061: --
3062: IF l_debug_on THEN
3063: WSH_DEBUG_SV.push(l_module_name);
3064: --
3065: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
3066: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
3067: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3061: --
3062: IF l_debug_on THEN
3063: WSH_DEBUG_SV.push(l_module_name);
3064: --
3065: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
3066: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
3067: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3068: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
3069: END IF;
3062: IF l_debug_on THEN
3063: WSH_DEBUG_SV.push(l_module_name);
3064: --
3065: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
3066: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
3067: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3068: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
3069: END IF;
3070: --
3063: WSH_DEBUG_SV.push(l_module_name);
3064: --
3065: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
3066: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
3067: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3068: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
3069: END IF;
3070: --
3071: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3064: --
3065: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
3066: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_FLAG',P_CHECK_FLAG);
3067: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3068: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
3069: END IF;
3070: --
3071: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3072:
3077: --
3078: -- Debug Statements
3079: --
3080: IF l_debug_on THEN
3081: WSH_DEBUG_SV.pop(l_module_name);
3082: END IF;
3083: --
3084: RETURN;
3085: END IF;
3302:
3303: --BUG 3379499
3304: --Handle return status using l_err_num and l_warn_num
3305: IF l_debug_on THEN
3306: wsh_debug_sv.log(l_module_name, 'l_ac_dlvy_count', l_ac_dlvy_count);
3307: wsh_debug_sv.log(l_module_name, 'l_err_num', l_err_num);
3308: wsh_debug_sv.log(l_module_name, 'l_warn_num', l_warn_num);
3309: END IF;
3310: IF l_err_num > 0 THEN
3303: --BUG 3379499
3304: --Handle return status using l_err_num and l_warn_num
3305: IF l_debug_on THEN
3306: wsh_debug_sv.log(l_module_name, 'l_ac_dlvy_count', l_ac_dlvy_count);
3307: wsh_debug_sv.log(l_module_name, 'l_err_num', l_err_num);
3308: wsh_debug_sv.log(l_module_name, 'l_warn_num', l_warn_num);
3309: END IF;
3310: IF l_err_num > 0 THEN
3311: IF l_err_num < l_ac_dlvy_count
3304: --Handle return status using l_err_num and l_warn_num
3305: IF l_debug_on THEN
3306: wsh_debug_sv.log(l_module_name, 'l_ac_dlvy_count', l_ac_dlvy_count);
3307: wsh_debug_sv.log(l_module_name, 'l_err_num', l_err_num);
3308: wsh_debug_sv.log(l_module_name, 'l_warn_num', l_warn_num);
3309: END IF;
3310: IF l_err_num > 0 THEN
3311: IF l_err_num < l_ac_dlvy_count
3312: THEN
3321: --
3322: -- Debug Statements
3323: --
3324: IF l_debug_on THEN
3325: WSH_DEBUG_SV.log(l_module_name,'x_del_rows ',x_del_rows.COUNT);
3326: WSH_DEBUG_SV.pop(l_module_name);
3327: END IF;
3328:
3329:
3322: -- Debug Statements
3323: --
3324: IF l_debug_on THEN
3325: WSH_DEBUG_SV.log(l_module_name,'x_del_rows ',x_del_rows.COUNT);
3326: WSH_DEBUG_SV.pop(l_module_name);
3327: END IF;
3328:
3329:
3330:
3337: --
3338: -- Debug Statements
3339: --
3340: IF l_debug_on THEN
3341: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3342: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3343: END IF;
3344: --
3345: END autocreate_del_across_orgs;
3338: -- Debug Statements
3339: --
3340: IF l_debug_on THEN
3341: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3342: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3343: END IF;
3344: --
3345: END autocreate_del_across_orgs;
3346:
3371: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3372: --
3373: IF l_debug_on IS NULL
3374: THEN
3375: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3376: END IF;
3377: --
3378: IF l_debug_on THEN
3379: WSH_DEBUG_SV.push(l_module_name);
3375: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3376: END IF;
3377: --
3378: IF l_debug_on THEN
3379: WSH_DEBUG_SV.push(l_module_name);
3380: --
3381: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
3382: END IF;
3383: --
3377: --
3378: IF l_debug_on THEN
3379: WSH_DEBUG_SV.push(l_module_name);
3380: --
3381: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
3382: END IF;
3383: --
3384: --
3385: -- Debug Statements
3384: --
3385: -- Debug Statements
3386: --
3387: IF l_debug_on THEN
3388: WSH_DEBUG_SV.logmsg(l_module_name, 'DELETING EMPTY DELIVERIES FOR BATCH '||P_BATCH_ID );
3389: END IF;
3390: --
3391: --OTM R12
3392: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED; -- this is global variable
3397: --
3398:
3399: IF (p_batch_id is NOT NULL and p_batch_id > 0) THEN
3400: IF l_debug_on IS NULL THEN
3401: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3402: END IF;
3403:
3404: --OTM R12, allow delete of 'NS' deliveries
3405: IF (l_gc3_is_installed = 'Y') THEN
3425: --
3426: -- Debug Statements
3427: --
3428: IF l_debug_on THEN
3429: WSH_DEBUG_SV.logmsg(l_module_name, 'DELETED '||SQL%ROWCOUNT||' EMPTY DELIVERIES AFTER PICK RELEASE' );
3430: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3431: END IF;
3432: --
3433:
3426: -- Debug Statements
3427: --
3428: IF l_debug_on THEN
3429: WSH_DEBUG_SV.logmsg(l_module_name, 'DELETED '||SQL%ROWCOUNT||' EMPTY DELIVERIES AFTER PICK RELEASE' );
3430: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3431: END IF;
3432: --
3433:
3434: END IF;
3437: --
3438: -- Debug Statements
3439: --
3440: IF l_debug_on THEN
3441: WSH_DEBUG_SV.pop(l_module_name);
3442: END IF;
3443: --
3444: EXCEPTION
3445: WHEN OTHERS THEN
3448: --
3449: -- Debug Statements
3450: --
3451: IF l_debug_on THEN
3452: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3453: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3454: END IF;
3455: --
3456: END DELETE_EMPTY_DELIVERIES;
3449: -- Debug Statements
3450: --
3451: IF l_debug_on THEN
3452: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3453: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3454: END IF;
3455: --
3456: END DELETE_EMPTY_DELIVERIES;
3457:
3521: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3522: --
3523: IF l_debug_on IS NULL
3524: THEN
3525: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3526: END IF;
3527: --
3528: IF l_debug_on THEN
3529: WSH_DEBUG_SV.push(l_module_name);
3525: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3526: END IF;
3527: --
3528: IF l_debug_on THEN
3529: WSH_DEBUG_SV.push(l_module_name);
3530: END IF;
3531: --
3532: IF (p_delivery_ids.count > 0) THEN
3533: --
3533: --
3534: -- Debug Statements
3535: --
3536: IF l_debug_on THEN
3537: WSH_DEBUG_SV.logmsg(l_module_name, 'UNASSIGNING EMPTY CONTAINERS FROM DELIVERIES' );
3538: END IF;
3539: --
3540: FOR i in p_delivery_ids.FIRST .. p_delivery_ids.LAST LOOP
3541: --
3541: --
3542: -- Debug Statements
3543: --
3544: IF l_debug_on THEN
3545: WSH_DEBUG_SV.logmsg(l_module_name, I );
3546: END IF;
3547: --
3548: END LOOP;
3549: END IF;
3547: --
3548: END LOOP;
3549: END IF;
3550: IF l_debug_on THEN
3551: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3552: END IF;
3553: IF (p_delivery_ids.count > 0) THEN
3554: -- Bug 2543667 : Grouping Attributes of LPN are retained after backordering at Pick Release
3555: -- Empty Containers should not have any grouping attributes
3588: --
3589: -- Debug Statements
3590: --
3591: IF l_debug_on THEN
3592: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATED '||SQL%ROWCOUNT||' RECORDS IN WSH_DELIVERY_DETAILS' );
3593: END IF;
3594: --
3595: -- LPN CONV. rv
3596: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3638:
3639: -- LPN CONV. rv
3640: --
3641: IF l_debug_on THEN
3642: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_wms_recTbl', l_sync_tmp_wms_recTbl.delivery_detail_id_tbl.count);
3643: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_inv_recTbl', l_sync_tmp_inv_recTbl.delivery_detail_id_tbl.count);
3644: END IF;
3645: --
3646: --
3639: -- LPN CONV. rv
3640: --
3641: IF l_debug_on THEN
3642: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_wms_recTbl', l_sync_tmp_wms_recTbl.delivery_detail_id_tbl.count);
3643: wsh_debug_sv.LOG(l_module_name, 'Count of l_sync_tmp_inv_recTbl', l_sync_tmp_inv_recTbl.delivery_detail_id_tbl.count);
3644: END IF;
3645: --
3646: --
3647: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3658: THEN
3659: --{
3660: --
3661: IF l_debug_on THEN
3662: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3663: END IF;
3664: --
3665: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3666: (
3669: p_operation_type => l_operation_type
3670: );
3671: --
3672: IF l_debug_on THEN
3673: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3674: END IF;
3675: --
3676: WSH_UTIL_CORE.API_POST_CALL
3677: (
3688: THEN
3689: --{
3690: --
3691: IF l_debug_on THEN
3692: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3693: END IF;
3694: --
3695: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3696: (
3700: );
3701:
3702: --
3703: IF l_debug_on THEN
3704: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3705: END IF;
3706: --
3707: WSH_UTIL_CORE.API_POST_CALL
3708: (
3732: THEN
3733: --{
3734: --
3735: IF l_debug_on THEN
3736: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3737: END IF;
3738: --
3739: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3740: (
3743: p_operation_type => l_operation_type
3744: );
3745: --
3746: IF l_debug_on THEN
3747: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3748: END IF;
3749: --
3750: WSH_UTIL_CORE.API_POST_CALL
3751: (
3761: THEN
3762: --{
3763: --
3764: IF l_debug_on THEN
3765: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3766: END IF;
3767: --
3768: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3769: (
3773: );
3774:
3775: --
3776: IF l_debug_on THEN
3777: wsh_debug_sv.log(l_module_name, 'Return status after the call to WSH_WMS_SYNC_TMP_PKG.MERGE_BULK is ', l_return_status);
3778: END IF;
3779: --
3780: WSH_UTIL_CORE.API_POST_CALL
3781: (
3795: --
3796: IF l_del_det_id_tbl.COUNT > 0 THEN
3797: --{
3798: IF l_debug_on THEN
3799: wsh_debug_sv.log(l_module_name, 'l_del_det_id_tbl.COUNT', l_del_det_id_tbl.COUNT);
3800: END IF;
3801: --
3802: FOR l_counter in l_del_det_id_tbl.FIRST .. l_del_det_id_tbl.LAST LOOP
3803: IF l_debug_on THEN
3800: END IF;
3801: --
3802: FOR l_counter in l_del_det_id_tbl.FIRST .. l_del_det_id_tbl.LAST LOOP
3803: IF l_debug_on THEN
3804: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3805: END IF;
3806:
3807: WSH_WV_UTILS.DD_WV_Post_Process(
3808: p_delivery_detail_id => l_del_det_id_tbl(l_counter),
3816: --
3817: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3818: WSH_UTIL_CORE.Add_Message(x_return_status);
3819: IF l_debug_on THEN
3820: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3821: WSH_DEBUG_SV.pop(l_module_name);
3822: END IF;
3823: return;
3824: END IF;
3817: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3818: WSH_UTIL_CORE.Add_Message(x_return_status);
3819: IF l_debug_on THEN
3820: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3821: WSH_DEBUG_SV.pop(l_module_name);
3822: END IF;
3823: return;
3824: END IF;
3825: END LOOP;
3866: --
3867: -- Debug Statements
3868: --
3869: IF l_debug_on THEN
3870: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATED '||SQL%ROWCOUNT||' RECORDS IN WSH_DELIVERY_ASSIGNMENTS' );
3871: END IF;
3872: --
3873: END IF;
3874: IF l_debug_on THEN
3871: END IF;
3872: --
3873: END IF;
3874: IF l_debug_on THEN
3875: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3876: END IF;
3877:
3878: -- LPN CONV. rv
3879: --
3881: THEN
3882: --{
3883:
3884: IF l_debug_on THEN
3885: 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);
3886: END IF;
3887: --
3888: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3889: (
3892: x_out_rec => l_lpn_out_sync_comm_rec
3893: );
3894: --
3895: IF l_debug_on THEN
3896: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
3897: END IF;
3898: --
3899: WSH_UTIL_CORE.API_POST_CALL
3900: (
3920: --
3921: -- Debug Statements
3922: --
3923: IF l_debug_on THEN
3924: WSH_DEBUG_SV.logmsg(l_module_name, 'END OF API FOR UNASSIGNING EMPTY CONTAINERS FROM DELIVERIES' );
3925: END IF;
3926: --
3927: --x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS; LPN CONV. rv
3928:
3929: --
3930: -- Debug Statements
3931: --
3932: IF l_debug_on THEN
3933: WSH_DEBUG_SV.pop(l_module_name);
3934: END IF;
3935: --
3936: EXCEPTION
3937: WHEN FND_API.G_EXC_ERROR THEN
3938: --
3939: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3940: --
3941: IF l_debug_on THEN
3942: 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);
3943: END IF;
3944: --
3945: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3946: THEN
3945: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3946: THEN
3947: --{
3948: IF l_debug_on THEN
3949: 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);
3950: END IF;
3951: --
3952: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3953: (
3956: x_out_rec => l_lpn_out_sync_comm_rec
3957: );
3958: --
3959: IF l_debug_on THEN
3960: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
3961: END IF;
3962: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3963: x_return_status := l_return_status;
3964: END IF;
3967: --
3968: -- LPN CONV. rv
3969: --
3970: IF l_debug_on THEN
3971: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3972: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3973: END IF;
3974: --
3975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3968: -- LPN CONV. rv
3969: --
3970: IF l_debug_on THEN
3971: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3972: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3973: END IF;
3974: --
3975: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3976: --
3976: --
3977: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3978: --
3979: IF l_debug_on THEN
3980: 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);
3981: END IF;
3982: --
3983: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3984: THEN
3984: THEN
3985: --{
3986:
3987: IF l_debug_on THEN
3988: 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);
3989: END IF;
3990: --
3991:
3992: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3996: x_out_rec => l_lpn_out_sync_comm_rec
3997: );
3998: --
3999: IF l_debug_on THEN
4000: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
4001: END IF;
4002: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4003: x_return_status := l_return_status;
4004: END IF;
4007: --
4008: -- LPN CONV. rv
4009: --
4010: IF l_debug_on THEN
4011: 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);
4012: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4013: END IF;
4014: --
4015: WHEN OTHERS THEN
4008: -- LPN CONV. rv
4009: --
4010: IF l_debug_on THEN
4011: 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);
4012: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4013: END IF;
4014: --
4015: WHEN OTHERS THEN
4016: --
4014: --
4015: WHEN OTHERS THEN
4016: --
4017: IF l_debug_on THEN
4018: 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);
4019: END IF;
4020: --
4021: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4022: THEN
4021: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4022: THEN
4023: --{
4024: IF l_debug_on THEN
4025: 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);
4026: END IF;
4027: --
4028:
4029: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4033: x_out_rec => l_lpn_out_sync_comm_rec
4034: );
4035: --
4036: IF l_debug_on THEN
4037: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
4038: END IF;
4039: --}
4040: END IF;
4041: --
4046: --
4047: -- Debug Statements
4048: --
4049: IF l_debug_on THEN
4050: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4051: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4052: END IF;
4053: --
4054: END unassign_empty_containers;
4047: -- Debug Statements
4048: --
4049: IF l_debug_on THEN
4050: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4051: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4052: END IF;
4053: --
4054: END unassign_empty_containers;
4055:
4164: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4165: --
4166: IF l_debug_on IS NULL
4167: THEN
4168: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4169: END IF;
4170: --
4171: IF l_debug_on THEN
4172: wsh_debug_sv.push (l_module_name);
4168: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4169: END IF;
4170: --
4171: IF l_debug_on THEN
4172: wsh_debug_sv.push (l_module_name);
4173: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
4174: WSH_DEBUG_SV.log(l_module_name,'p_trip_prefix', p_trip_prefix);
4175: END IF;
4176:
4169: END IF;
4170: --
4171: IF l_debug_on THEN
4172: wsh_debug_sv.push (l_module_name);
4173: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
4174: WSH_DEBUG_SV.log(l_module_name,'p_trip_prefix', p_trip_prefix);
4175: END IF;
4176:
4177: --OTM R12, initialize
4170: --
4171: IF l_debug_on THEN
4172: wsh_debug_sv.push (l_module_name);
4173: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
4174: WSH_DEBUG_SV.log(l_module_name,'p_trip_prefix', p_trip_prefix);
4175: END IF;
4176:
4177: --OTM R12, initialize
4178: l_non_trip_del_count := 1;
4209: END IF;
4210: k := k+1;
4211: l_trip_del_tab(k) := p_del_attributes_tab(i).delivery_id;
4212: IF l_debug_on THEN
4213: WSH_DEBUG_SV.log(l_module_name,'l_trip_del_tab: '||k,l_trip_del_tab(k));
4214: END IF;
4215: END IF;
4216:
4217: --OTM R12, get the non trip deliveries for ignore for planning action
4218: IF (c_trip_info%NOTFOUND OR l_trip_id_temp IS NULL) THEN
4219: l_non_trip_del_tab(l_non_trip_del_count) := p_del_attributes_tab(i).delivery_id;
4220:
4221: IF l_debug_on THEN
4222: 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));
4223: END IF;
4224:
4225: l_non_trip_del_count := l_non_trip_del_count + 1;
4226: END IF;
4233:
4234: -- Check if we can consolidate the deliveries together
4235:
4236: IF l_debug_on THEN
4237: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_COMP_CONSTRAINT_GRP.is_valid_consol',WSH_DEBUG_SV.C_PROC_LEVEL);
4238: END IF;
4239:
4240: WSH_FTE_COMP_CONSTRAINT_GRP.is_valid_consol(
4241: p_init_msg_list => fnd_api.g_false,
4255: );
4256:
4257: l_del_tab.delete;
4258: IF l_debug_on THEN
4259: WSH_DEBUG_SV.log(l_module_name,'l_intermediate_loc_id', l_intermediate_loc_id);
4260: END IF;
4261:
4262:
4263:
4264: END IF;
4265:
4266:
4267: IF l_debug_on THEN
4268: WSH_DEBUG_SV.log(l_module_name,'l_trip_id', l_trip_id);
4269: WSH_DEBUG_SV.log(l_module_name,'l_trip_ignore', l_trip_ignore);
4270: END IF;
4271:
4272: --OTM R12, changing the trip and deliveries to ignore for planning
4265:
4266:
4267: IF l_debug_on THEN
4268: WSH_DEBUG_SV.log(l_module_name,'l_trip_id', l_trip_id);
4269: WSH_DEBUG_SV.log(l_module_name,'l_trip_ignore', l_trip_ignore);
4270: END IF;
4271:
4272: --OTM R12, changing the trip and deliveries to ignore for planning
4273: IF (l_gc3_is_installed = 'Y'
4276:
4277: l_otm_trip_tab(1) := l_trip_id;
4278:
4279: IF l_debug_on THEN
4280: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TP_RELEASE.change_ignoreplan_status',WSH_DEBUG_SV.C_PROC_LEVEL);
4281: END IF;
4282:
4283: WSH_TP_RELEASE.change_ignoreplan_status
4284: (p_entity => 'TRIP',
4295:
4296: --now call for the deliveries
4297: IF (l_non_trip_del_tab.COUNT > 0) THEN
4298: IF l_debug_on THEN
4299: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TP_RELEASE.change_ignoreplan_status',WSH_DEBUG_SV.C_PROC_LEVEL);
4300: END IF;
4301:
4302: WSH_TP_RELEASE.change_ignoreplan_status
4303: (p_entity => 'DLVY',
4319: l_del_attributes.initial_pickup_date := p_del_attributes_tab(p_del_attributes_tab.FIRST).initial_pickup_date;
4320: l_del_attributes.ultimate_dropoff_date := p_del_attributes_tab(p_del_attributes_tab.FIRST).ultimate_dropoff_date;
4321: WHILE i is not NULL LOOP
4322: IF l_debug_on THEN
4323: WSH_DEBUG_SV.log(l_module_name,'delivery: '|| i, p_del_attributes_tab(i).delivery_id);
4324: END IF;
4325: l_del_attributes.initial_pickup_date := GREATEST(l_del_attributes.initial_pickup_date, p_del_attributes_tab(i).initial_pickup_date);
4326: l_deconsol_do_date := GREATEST(LEAST(l_del_attributes.ultimate_dropoff_date,
4327: p_del_attributes_tab(i).ultimate_dropoff_date),
4383: END IF;
4384: IF l_transit_time IS NOT NULL
4385: AND (l_deconsol_do_date > l_del_attributes.initial_pickup_date + l_transit_time) THEN
4386: IF l_debug_on THEN
4387: WSH_DEBUG_SV.log(l_module_name,'l_transit_time',l_transit_time);
4388: END IF;
4389:
4390: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date + l_transit_time;
4391: IF l_debug_on THEN
4388: END IF;
4389:
4390: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date + l_transit_time;
4391: IF l_debug_on THEN
4392: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4393: END IF;
4394:
4395: ELSE
4396: IF l_debug_on THEN
4393: END IF;
4394:
4395: ELSE
4396: IF l_debug_on THEN
4397: WSH_DEBUG_SV.log(l_module_name,'l_transit_time',l_transit_time);
4398: END IF;
4399:
4400: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date +
4401: ((l_deconsol_do_date - l_del_attributes.initial_pickup_date)/2);
4400: l_del_attributes.ultimate_dropoff_date := l_del_attributes.initial_pickup_date +
4401: ((l_deconsol_do_date - l_del_attributes.initial_pickup_date)/2);
4402:
4403: IF l_debug_on THEN
4404: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_date',l_del_attributes.initial_pickup_date);
4405: WSH_DEBUG_SV.log(l_module_name,'l_deconsol_do_date',l_deconsol_do_date);
4406: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4407: END IF;
4408: END IF;
4401: ((l_deconsol_do_date - l_del_attributes.initial_pickup_date)/2);
4402:
4403: IF l_debug_on THEN
4404: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_date',l_del_attributes.initial_pickup_date);
4405: WSH_DEBUG_SV.log(l_module_name,'l_deconsol_do_date',l_deconsol_do_date);
4406: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4407: END IF;
4408: END IF;
4409:
4402:
4403: IF l_debug_on THEN
4404: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_date',l_del_attributes.initial_pickup_date);
4405: WSH_DEBUG_SV.log(l_module_name,'l_deconsol_do_date',l_deconsol_do_date);
4406: WSH_DEBUG_SV.log(l_module_name,'ultimate_dropoff_date',l_del_attributes.ultimate_dropoff_date);
4407: END IF;
4408: END IF;
4409:
4410: IF l_debug_on THEN
4407: END IF;
4408: END IF;
4409:
4410: IF l_debug_on THEN
4411: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_wv_utils.get_default_uoms',WSH_DEBUG_SV.C_PROC_LEVEL);
4412: END IF;
4413: wsh_wv_utils.get_default_uoms(l_del_attributes.organization_id, l_weight_uom_code, l_volume_uom_code, l_dummy);
4414:
4415: l_del_attributes.weight_uom_code := l_weight_uom_code;
4415: l_del_attributes.weight_uom_code := l_weight_uom_code;
4416: l_del_attributes.volume_uom_code := l_volume_uom_code;
4417:
4418: IF l_debug_on THEN
4419: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',l_weight_uom_code);
4420: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',l_volume_uom_code);
4421: END IF;
4422:
4423: -- Create the delivery
4416: l_del_attributes.volume_uom_code := l_volume_uom_code;
4417:
4418: IF l_debug_on THEN
4419: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',l_weight_uom_code);
4420: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',l_volume_uom_code);
4421: END IF;
4422:
4423: -- Create the delivery
4424:
4422:
4423: -- Create the delivery
4424:
4425: IF l_debug_on THEN
4426: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_new_deliveries_pvt.create_delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
4427: END IF;
4428:
4429: wsh_new_deliveries_pvt.create_delivery(l_del_attributes, l_rowid, l_delivery_id, l_delivery_name, l_return_status);
4430:
4443:
4444: IF l_trip_id IS NOT NULL THEN
4445:
4446: IF l_debug_on THEN
4447: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TRIPS_ACTIONS.Unassign_Trip',WSH_DEBUG_SV.C_PROC_LEVEL);
4448: END IF;
4449: WSH_TRIPS_ACTIONS.Unassign_Trip(p_del_rows => l_trip_del_tab,
4450: p_trip_id => l_trip_id,
4451: x_return_status => l_return_status);
4464:
4465: IF l_empty_stops_tab.count > 0 THEN
4466: IF l_debug_on THEN
4467: FOR i in 1 .. l_empty_stops_tab.count LOOP
4468: WSH_DEBUG_SV.log(l_module_name,'empty stop '||i,l_empty_stops_tab(i));
4469: END LOOP;
4470: END IF;
4471:
4472: WSH_UTIL_CORE.Delete(p_type => 'STOP',
4482:
4483: END IF;
4484:
4485: IF l_debug_on THEN
4486: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TRIPS_ACTIONS.assign_Trip',WSH_DEBUG_SV.C_PROC_LEVEL);
4487: END IF;
4488: WSH_TRIPS_ACTIONS.assign_trip(
4489: p_del_rows => l_delivery_id_tab,
4490: p_trip_id => l_trip_id,
4508: -- Autocreate trip for consol del
4509: l_trip_name_tab(1) := p_trip_prefix;
4510:
4511: IF l_debug_on THEN
4512: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TRIPS_ACTIONS.autocreate_trip_multi',WSH_DEBUG_SV.C_PROC_LEVEL);
4513: END IF;
4514: WSH_TRIPS_ACTIONS.autocreate_trip_multi(
4515: p_del_rows => l_delivery_id_tab,
4516: x_trip_ids => l_trip_id_tab,
4539: END IF;
4540:
4541:
4542: IF l_debug_on THEN
4543: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_NEW_DELIVERY_ACTIONS.Assign_Del_to_Consol_Del',WSH_DEBUG_SV.C_PROC_LEVEL);
4544: END IF;
4545: WSH_NEW_DELIVERY_ACTIONS.Assign_Del_to_Consol_Del(
4546: p_del_tab => p_del_attributes_tab,
4547: p_parent_del_id => l_delivery_id,
4575: x_parent_del_id := l_delivery_id;
4576: x_parent_trip_id := l_trip_id;
4577: --
4578: IF l_debug_on THEN
4579: wsh_debug_sv.pop(l_module_name);
4580: END IF;
4581: EXCEPTION
4582: WHEN FND_API.G_EXC_ERROR THEN
4583: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4584: --
4585: -- Debug Statements
4586: --
4587: IF l_debug_on THEN
4588: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4589: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4590: END IF;
4591: --
4592: WHEN WSH_INVALID_TRIPS THEN
4585: -- Debug Statements
4586: --
4587: IF l_debug_on THEN
4588: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4589: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4590: END IF;
4591: --
4592: WHEN WSH_INVALID_TRIPS THEN
4593: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4596: --
4597: -- Debug Statements
4598: --
4599: IF l_debug_on THEN
4600: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_TRIPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4601:
4602: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_TRIPS');
4603: END IF;
4604: --
4598: --
4599: IF l_debug_on THEN
4600: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_TRIPS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4601:
4602: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_TRIPS');
4603: END IF;
4604: --
4605:
4606: WHEN OTHERS THEN
4606: WHEN OTHERS THEN
4607: wsh_util_core.default_handler('WSH_DELIVERY_AUTOCREATE.Autocreate_Consol_Delivery',l_module_name);
4608: --
4609: IF l_debug_on THEN
4610: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
4611: END IF;
4612:
4613: END Autocreate_Consol_Delivery;
4614: