144:
145: EXCEPTION
146:
147: WHEN OTHERS THEN
148: wsh_util_core.default_handler (
149: 'WSH_TRIP_STOPS_GRP.Rtrim_delivery', l_module_name);
150: IF l_debug_on THEN
151: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.'||
152: ' Oracle error message is '|| SQLERRM,
178:
179: BEGIN
180: --
181: --
182: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
183:
184: IF (p_action_code <> 'CREATE') THEN
185:
186: IF (p_delivery_info.delivery_id <> FND_API.G_MISS_NUM) OR (p_delivery_info.name <> FND_API.G_MISS_CHAR) THEN
193: p_delivery_info.delivery_id,
194: p_delivery_info.name,
195: x_return_status);
196:
197: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
198: RETURN;
199: END IF;
200:
201: END IF;
212: p_delivery_info.organization_id,
213: p_delivery_info.organization_code,
214: x_return_status);
215:
216: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
217: RETURN;
218: END IF;
219: END IF;
220:
233: p_delivery_info.loading_order_flag,
234: p_delivery_info.loading_order_desc,
235: x_return_status);
236:
237: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
238: RETURN;
239: END IF;
240: END IF;
241:
249: p_delivery_info.initial_pickup_location_id,
250: p_delivery_info.initial_pickup_location_code,
251: x_return_status);
252:
253: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
254: RETURN;
255: END IF;
256: END IF;
257:
265: p_delivery_info.ultimate_dropoff_location_id,
266: p_delivery_info.ultimate_dropoff_location_code,
267: x_return_status);
268:
269: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
270: RETURN;
271: END IF;
272: END IF;
273:
281: p_delivery_info.intmed_ship_to_location_id,
282: p_delivery_info.intmed_ship_to_location_code,
283: x_return_status);
284:
285: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
286: RETURN;
287: END IF;
288: END IF;
289:
297: p_delivery_info.pooled_ship_to_location_id,
298: p_delivery_info.pooled_ship_to_location_code,
299: x_return_status);
300:
301: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
302: RETURN;
303: END IF;
304: END IF;
305:
313: p_delivery_info.customer_id,
314: p_delivery_info.customer_number,
315: x_return_status);
316:
317: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
318: RETURN;
319: END IF;
320: END IF;
321:
331: p_delivery_info.ship_method_code,
332: p_delivery_info.ship_method_name,
333: x_return_status);
334:
335: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
336: RETURN;
337: END IF;
338: END IF;
339:
347: p_delivery_info.freight_terms_code,
348: p_delivery_info.freight_terms_name,
349: x_return_status);
350:
351: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
352: RETURN;
353: END IF;
354: END IF;
355:
363: p_delivery_info.fob_code,
364: p_delivery_info.fob_name,
365: x_return_status);
366:
367: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
368: RETURN;
369: END IF;
370: END IF;
371:
379: p_delivery_info.fob_location_id,
380: p_delivery_info.fob_location_code,
381: x_return_status);
382:
383: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
384: RETURN;
385: END IF;
386: END IF;
387:
397: p_delivery_info.weight_uom_code,
398: p_delivery_info.weight_uom_desc,
399: x_return_status);
400:
401: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
402: RETURN;
403: END IF;
404: END IF;
405:
415: p_delivery_info.volume_uom_code,
416: p_delivery_info.volume_uom_desc,
417: x_return_status);
418:
419: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
420: RETURN;
421: END IF;
422: END IF;
423:
434: p_amount => NULL,
435: x_return_status => x_return_status,
436: x_adjusted_amount => l_adjusted_amount); -- OTM R12,glog project
437:
438: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
439: RETURN;
440: END IF;
441: END IF;
442:
454: l_assigned_to_trip := WSH_Delivery_Validations.Del_Assigned_To_Trip
455: (p_delivery_id => p_delivery_info.delivery_id,
456: x_return_status => x_return_status);
457:
458: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
459:
460: RETURN;
461:
462: ELSIF l_assigned_to_trip = 'Y' THEN
461:
462: ELSIF l_assigned_to_trip = 'Y' THEN
463: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGNED_ERROR');
464: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_info.delivery_id));
465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
466: wsh_util_core.add_message(x_return_status);
467: RETURN;
468: END IF;
469: END IF;
462: ELSIF l_assigned_to_trip = 'Y' THEN
463: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGNED_ERROR');
464: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_info.delivery_id));
465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
466: wsh_util_core.add_message(x_return_status);
467: RETURN;
468: END IF;
469: END IF;
470:
470:
471:
472: EXCEPTION
473: WHEN others THEN
474: wsh_util_core.default_handler('WSH_DELIVERIES_PUB.Validate_Delivery');
475: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
476:
477: END Validate_Delivery;
478:
471:
472: EXCEPTION
473: WHEN others THEN
474: wsh_util_core.default_handler('WSH_DELIVERIES_PUB.Validate_Delivery');
475: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
476:
477: END Validate_Delivery;
478:
479: /* I Harmonization -- rvishnuv */
497: --
498: IF l_debug_on THEN
499: WSH_DEBUG_SV.push(l_module_name);
500: END IF;
501: x_return_status := wsh_util_core.g_ret_sts_success;
502: --
503: x_pvt_rec.DELIVERY_ID := p_pub_rec.DELIVERY_ID;
504: x_pvt_rec.NAME := p_pub_rec.NAME;
505: x_pvt_rec.DELIVERY_TYPE := p_pub_rec.DELIVERY_TYPE;
643: x_pvt_rec.DESCRIPTION := p_pub_rec.DESCRIPTION;
644: -- Non Database field added for "Proration of weight from Delivery to delivery lines" Project(Bug#4254552).
645: IF p_pub_rec.prorate_wt_flag = FND_API.G_MISS_CHAR THEN
646: --{
647: x_pvt_rec.prorate_wt_flag := WSH_UTIL_CORE.FTE_Is_Installed ;
648: ELSIF p_pub_rec.prorate_wt_flag = 'Y' THEN
649: x_pvt_rec.prorate_wt_flag := 'Y';
650: ELSE
651: x_pvt_rec.prorate_wt_flag := 'N';
657: WSH_DEBUG_SV.pop(l_module_name);
658: END IF;
659: EXCEPTION
660: WHEN OTHERS THEN
661: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_DELIVERIES_PUB.map_pub_to_pvt',l_module_name);
662: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
663: --
664: IF l_debug_on THEN
665: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
658: END IF;
659: EXCEPTION
660: WHEN OTHERS THEN
661: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_DELIVERIES_PUB.map_pub_to_pvt',l_module_name);
662: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
663: --
664: IF l_debug_on THEN
665: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
666: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
753: END IF;
754: ELSIF ( p_action_code <> 'CREATE' ) THEN
755: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
756: FND_MESSAGE.SET_TOKEN('ACTION_CODE',p_action_code);
757: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
758: wsh_util_core.add_message(x_return_status);
759: END IF;
760: --
761: map_pub_to_pvt(
754: ELSIF ( p_action_code <> 'CREATE' ) THEN
755: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
756: FND_MESSAGE.SET_TOKEN('ACTION_CODE',p_action_code);
757: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
758: wsh_util_core.add_message(x_return_status);
759: END IF;
760: --
761: map_pub_to_pvt(
762: p_pub_rec => p_delivery_info,
766: IF l_debug_on THEN
767: wsh_debug_sv.log(l_module_name,'Return Status After Calling map_pub_to_pvt',l_return_status);
768: END IF;
769: --
770: wsh_util_core.api_post_call(
771: p_return_status => l_return_status,
772: x_num_errors => l_num_errors,
773: x_num_warnings => l_num_warnings);
774: --
782: IF l_debug_on THEN
783: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_delivery_name',l_return_status);
784: END IF;
785: --
786: wsh_util_core.api_post_call(
787: p_return_status => l_return_status,
788: x_num_errors => l_num_errors,
789: x_num_warnings => l_num_warnings);
790: --
816: IF l_debug_on THEN
817: wsh_debug_sv.log(l_module_name,'Return Status After Calling create_update_delivery',l_return_status);
818: END IF;
819: --
820: wsh_util_core.api_post_call(
821: p_return_status => l_return_status,
822: x_num_errors => l_num_errors,
823: x_num_warnings => l_num_warnings,
824: p_msg_data => x_msg_data);
831: --
832: END IF;
833: --
834: IF l_num_warnings > 0 THEN
835: x_return_status := wsh_util_core.g_ret_sts_warning;
836: ELSE
837: x_return_status := wsh_util_core.g_ret_sts_success; --bug 2398628
838: END IF;
839: --
833: --
834: IF l_num_warnings > 0 THEN
835: x_return_status := wsh_util_core.g_ret_sts_warning;
836: ELSE
837: x_return_status := wsh_util_core.g_ret_sts_success; --bug 2398628
838: END IF;
839: --
840: FND_MSG_PUB.Count_And_Get
841: ( p_count => x_msg_count
946: --
947: --
948: l_action_prms wsh_deliveries_grp.action_parameters_rectype;
949: l_del_action_out_rec wsh_deliveries_grp.Delivery_Action_Out_Rec_Type;
950: l_delivery_id_tab wsh_util_core.id_tab_type;
951: --
952: l_delivery_id NUMBER := p_delivery_id;
953: --
954: l_num_errors NUMBER := 0;
995: IF l_debug_on THEN
996: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_delivery_name',l_return_status);
997: END IF;
998: --
999: wsh_util_core.api_post_call(
1000: p_return_status => l_return_status,
1001: x_num_errors => l_num_errors,
1002: x_num_warnings => l_num_warnings);
1003: --
1053: IF l_debug_on THEN
1054: wsh_debug_sv.log(l_module_name,'Return Status After Calling Delivery_Action Wrapper',x_return_status);
1055: END IF;
1056: --
1057: wsh_util_core.api_post_call(
1058: p_return_status => x_return_status,
1059: x_num_errors => l_num_errors,
1060: x_num_warnings => l_num_warnings);
1061: --
1069: END IF;
1070: END IF;
1071: --
1072: IF l_num_warnings > 0 THEN
1073: x_return_status := wsh_util_core.g_ret_sts_warning;
1074: ELSE
1075: x_return_status := wsh_util_core.g_ret_sts_success; --bug 2398628
1076: END IF;
1077: --
1071: --
1072: IF l_num_warnings > 0 THEN
1073: x_return_status := wsh_util_core.g_ret_sts_warning;
1074: ELSE
1075: x_return_status := wsh_util_core.g_ret_sts_success; --bug 2398628
1076: END IF;
1077: --
1078: FND_MSG_PUB.Count_And_Get
1079: ( p_count => x_msg_count
1158:
1159: PROCEDURE Generate_Documents
1160: ( p_report_set_name IN VARCHAR2,
1161: p_organization_code IN VARCHAR2,
1162: p_delivery_name IN WSH_UTIL_CORE.Column_Tab_Type,
1163: x_msg_count OUT NOCOPY NUMBER,
1164: x_msg_data OUT NOCOPY VARCHAR2,
1165: x_return_status OUT NOCOPY VARCHAR2
1166: ) IS
1185: l_trip_name WSH_TRIPS.Name%TYPE;
1186: l_msg_count NUMBER;
1187: l_msg_data VARCHAR2(500);
1188: l_return_status VARCHAR2(1);
1189: l_delivery_ids WSH_UTIL_CORE.Id_Tab_Type;
1190: l_document_param_info WSH_DOCUMENT_SETS.Document_Set_Tab_Type;
1191:
1192: -- Exception
1193: WSH_INVALID_ORGANIZATION EXCEPTION;
1214: END IF;
1215: END IF;
1216:
1217: -- Assigning Success to x_return_status Initially
1218: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1219: l_count := 0;
1220:
1221: -- Validation of Organization_Code
1222: WSH_UTIL_VALIDATE.Validate_Org(
1226: IF l_debug_on THEN
1227: WSH_DEBUG_SV.Logmsg(l_module_name, 'Return status from Validate_Org : ' || x_return_status);
1228: END IF;
1229:
1230: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1231: RAISE WSH_INVALID_ORGANIZATION;
1232: END IF;
1233:
1234: -- Validation of Delivery Names
1248: WSH_DEBUG_SV.Logmsg(l_module_name, 'Return status for Delivery Name (' ||
1249: l_delivery_name || ') : ' || x_return_status);
1250: END IF;
1251:
1252: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1253: FND_MESSAGE.Set_Name('WSH', 'WSH_INVALID_DELIVERY');
1254: FND_MESSAGE.Set_Token('DELIVERY', l_delivery_name);
1255: WSH_UTIL_CORE.Add_Message(x_return_status);
1256: ELSE
1251:
1252: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1253: FND_MESSAGE.Set_Name('WSH', 'WSH_INVALID_DELIVERY');
1254: FND_MESSAGE.Set_Token('DELIVERY', l_delivery_name);
1255: WSH_UTIL_CORE.Add_Message(x_return_status);
1256: ELSE
1257: l_count := l_count + 1;
1258: l_delivery_ids(l_count) := l_delivery_id;
1259: END IF;
1280: x_trip_id => l_trip_id ,
1281: x_trip_name => l_trip_name,
1282: x_return_status => l_return_status);
1283:
1284: WSH_UTIL_CORE.Api_Post_Call(
1285: p_return_status => l_return_status,
1286: x_num_errors => l_num_errors ,
1287: x_num_warnings => l_num_warnings );
1288:
1293:
1294: END LOOP; -- } l_Count For Loop.
1295:
1296: IF l_num_warnings > 0 THEN
1297: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1298: ELSE
1299: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1300: END IF;
1301:
1295:
1296: IF l_num_warnings > 0 THEN
1297: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1298: ELSE
1299: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1300: END IF;
1301:
1302: ELSE
1303: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1299: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1300: END IF;
1301:
1302: ELSE
1303: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1304: IF l_debug_on THEN
1305: WSH_DEBUG_SV.Logmsg(l_module_name,
1306: 'Deliveries passed are Invalid for generating ' || upper(p_report_set_name));
1307: END IF;
1342: p_count => x_msg_count,
1343: p_data => x_msg_data );
1344:
1345: WHEN WSH_INVALID_ORGANIZATION THEN
1346: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1347: IF l_debug_on THEN
1348: WSH_DEBUG_SV.Logmsg(l_module_name, 'WSH_INVALID_ORGANIZATION : ' || x_return_status);
1349: END IF;
1350: FND_MSG_PUB.Count_And_Get(
1352: p_data => x_msg_data );
1353:
1354: WHEN WSH_INVALID_DELIVERY THEN
1355: FND_MESSAGE.Set_Name('WSH', 'WSH_DOC_INVALID_DELIVERY');
1356: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1357: IF l_debug_on THEN
1358: WSH_DEBUG_SV.Logmsg(l_module_name, 'WSH_INVALID_DELIVERY : ' || x_return_status);
1359: END IF;
1360: WSH_UTIL_CORE.Add_Message(x_return_status);
1356: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1357: IF l_debug_on THEN
1358: WSH_DEBUG_SV.Logmsg(l_module_name, 'WSH_INVALID_DELIVERY : ' || x_return_status);
1359: END IF;
1360: WSH_UTIL_CORE.Add_Message(x_return_status);
1361: FND_MSG_PUB.Count_And_Get(
1362: p_count => x_msg_count,
1363: p_data => x_msg_data );
1364:
1362: p_count => x_msg_count,
1363: p_data => x_msg_data );
1364:
1365: WHEN OTHERS THEN
1366: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERIES_PUB.GENEREATE_DOCUMENTS');
1367: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1368: IF l_debug_on THEN
1369: WSH_DEBUG_SV.Logmsg(l_module_name, 'Unexpected Error : ' || x_return_status);
1370: WSH_DEBUG_SV.Logmsg(l_module_name, 'Error Message : ' || SQLERRM);
1363: p_data => x_msg_data );
1364:
1365: WHEN OTHERS THEN
1366: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERIES_PUB.GENEREATE_DOCUMENTS');
1367: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1368: IF l_debug_on THEN
1369: WSH_DEBUG_SV.Logmsg(l_module_name, 'Unexpected Error : ' || x_return_status);
1370: WSH_DEBUG_SV.Logmsg(l_module_name, 'Error Message : ' || SQLERRM);
1371: END IF;