[Home] [Help]
61: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
62: --
63: IF l_debug_on IS NULL
64: THEN
65: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
66: END IF;
67: --
68: IF l_debug_on THEN
69: WSH_DEBUG_SV.push(l_module_name);
65: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
66: END IF;
67: --
68: IF l_debug_on THEN
69: WSH_DEBUG_SV.push(l_module_name);
70: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.delivery_detail_id',
71: p_delivery_details_info.delivery_detail_id);
72: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.container_name',
73: p_delivery_details_info.container_name);
66: END IF;
67: --
68: IF l_debug_on THEN
69: WSH_DEBUG_SV.push(l_module_name);
70: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.delivery_detail_id',
71: p_delivery_details_info.delivery_detail_id);
72: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.container_name',
73: p_delivery_details_info.container_name);
74: END IF;
68: IF l_debug_on THEN
69: WSH_DEBUG_SV.push(l_module_name);
70: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.delivery_detail_id',
71: p_delivery_details_info.delivery_detail_id);
72: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.container_name',
73: p_delivery_details_info.container_name);
74: END IF;
75: --
76: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
79: /* bmso take out this code once WMS code is ready*/
80: IF (p_delivery_details_info.container_flag = 'Y') THEN
81: l_container_name := p_delivery_details_info.container_name;
82: IF l_debug_on THEN
83: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECK TO SEE IF CONTAINER_NAME ALREADY EXISTS');
84: END IF;
85: OPEN Get_Exist_Cont(l_container_name,WSH_UTIL_VALIDATE.check_wms_org(p_delivery_details_info.organization_id));
86: FETCH Get_Exist_Cont INTO l_cont_cnt;
87: CLOSE Get_Exist_Cont;
90: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NAME_DUPLICATE');
91: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_container_name);
92: WSH_UTIL_CORE.Add_Message(x_return_status);
93: IF l_debug_on THEN
94: WSH_DEBUG_SV.pop(l_module_name);
95: END IF;
96: RETURN;
97: END IF;
98: END IF;
99: -- end bug 3022644
100:
101: --
102: IF l_debug_on THEN
103: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE DELIVERY DETAILS Calling BULK api' );
104: END IF;
105: --
106: --lpn conv
107: l_container_info_rec.lpn_ids(1) := p_delivery_details_info.lpn_id;
120: x_delivery_detail_id := l_dd_id_tab(1);
121:
122: --
123: IF l_debug_on THEN
124: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INSERTING INTO WSH_DELIVERY_DETAILS' );
125: END IF;
126: --
127: OPEN C_Del_Detail_Rowid;
128: FETCH C_Del_Detail_Rowid INTO x_rowid;
133: CLOSE C_Del_Detail_Rowid;
134:
135: --
136: IF l_debug_on THEN
137: WSH_DEBUG_SV.pop(l_module_name);
138: END IF;
139: --
140: EXCEPTION
141: WHEN others THEN
143: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
144: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_DETAILS',l_module_name);
145: --
146: IF l_debug_on THEN
147: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
148: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
149: END IF;
150: --
151: END Create_Delivery_Details;
144: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_DETAILS',l_module_name);
145: --
146: IF l_debug_on THEN
147: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
148: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
149: END IF;
150: --
151: END Create_Delivery_Details;
152:
234: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
235: --
236: IF l_debug_on IS NULL
237: THEN
238: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
239: END IF;
240: --
241: IF l_debug_on THEN
242: WSH_DEBUG_SV.push(l_module_name);
238: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
239: END IF;
240: --
241: IF l_debug_on THEN
242: WSH_DEBUG_SV.push(l_module_name);
243: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.delivery_detail_id',
244: p_delivery_details_info.delivery_detail_id);
245: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.container_name',
246: p_delivery_details_info.container_name);
239: END IF;
240: --
241: IF l_debug_on THEN
242: WSH_DEBUG_SV.push(l_module_name);
243: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.delivery_detail_id',
244: p_delivery_details_info.delivery_detail_id);
245: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.container_name',
246: p_delivery_details_info.container_name);
247: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE DELIVERY DETAILS_BULK' );
241: IF l_debug_on THEN
242: WSH_DEBUG_SV.push(l_module_name);
243: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.delivery_detail_id',
244: p_delivery_details_info.delivery_detail_id);
245: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.container_name',
246: p_delivery_details_info.container_name);
247: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE DELIVERY DETAILS_BULK' );
248: END IF;
249: --
243: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.delivery_detail_id',
244: p_delivery_details_info.delivery_detail_id);
245: WSH_DEBUG_SV.log(l_module_name,'p_delivery_details_info.container_name',
246: p_delivery_details_info.container_name);
247: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE DELIVERY DETAILS_BULK' );
248: END IF;
249: --
250:
251: --OTM R12 Start Org-Specific
253: IF l_gc3_is_installed IS NULL THEN
254: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
255: END IF;
256: IF l_debug_on THEN
257: wsh_debug_sv.log(l_module_name,'l_gc3_is_installed ',
258: l_gc3_is_installed);
259: END IF;
260: --OTM R12 End
261:
266: OR p_container_info_rec.container_names.count <> p_num_of_rec
267: OR p_container_info_rec.lpn_ids.count <> p_num_of_rec THEN
268:
269: IF l_debug_on THEN
270: WSH_DEBUG_SV.log(l_module_name,'lpn_ids.count',
271: p_container_info_rec.lpn_ids.COUNT);
272: WSH_DEBUG_SV.log(l_module_name,'container_names.count',
273: p_container_info_rec.container_names.count);
274: END IF;
268:
269: IF l_debug_on THEN
270: WSH_DEBUG_SV.log(l_module_name,'lpn_ids.count',
271: p_container_info_rec.lpn_ids.COUNT);
272: WSH_DEBUG_SV.log(l_module_name,'container_names.count',
273: p_container_info_rec.container_names.count);
274: END IF;
275: RAISE FND_API.G_EXC_ERROR;
276:
289: p_update_flag => l_dff_update_flag,
290: x_return_status => l_dff_ret_status);
291:
292: IF l_debug_on THEN
293: WSH_DEBUG_SV.log(l_module_name,' Get_DFF_Defaults,l_return_status',l_dff_tp_ret_status);
294: WSH_DEBUG_SV.log(l_module_name,' l_dff_tp_update_flag',l_dff_tp_update_flag);
295: END IF;
296:
297: IF ( l_dff_ret_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_dff_update_flag = 'Y' ) THEN
290: x_return_status => l_dff_ret_status);
291:
292: IF l_debug_on THEN
293: WSH_DEBUG_SV.log(l_module_name,' Get_DFF_Defaults,l_return_status',l_dff_tp_ret_status);
294: WSH_DEBUG_SV.log(l_module_name,' l_dff_tp_update_flag',l_dff_tp_update_flag);
295: END IF;
296:
297: IF ( l_dff_ret_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_dff_update_flag = 'Y' ) THEN
298: l_delivery_details_info.attribute_category :=
337: p_update_flag => l_dff_tp_update_flag,
338: x_return_status => l_dff_tp_ret_status);
339:
340: IF l_debug_on THEN
341: WSH_DEBUG_SV.log(l_module_name,' Get_DFF_Defaults,l_return_status',l_dff_tp_ret_status);
342: WSH_DEBUG_SV.log(l_module_name,' l_dff_tp_update_flag',l_dff_tp_update_flag);
343: END IF;
344:
345: IF ( l_dff_tp_ret_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_dff_tp_update_flag = 'Y' ) THEN
338: x_return_status => l_dff_tp_ret_status);
339:
340: IF l_debug_on THEN
341: WSH_DEBUG_SV.log(l_module_name,' Get_DFF_Defaults,l_return_status',l_dff_tp_ret_status);
342: WSH_DEBUG_SV.log(l_module_name,' l_dff_tp_update_flag',l_dff_tp_update_flag);
343: END IF;
344:
345: IF ( l_dff_tp_ret_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_dff_tp_update_flag = 'Y' ) THEN
346: l_delivery_details_info.tp_attribute_category :=
411: p_ship_method_code => l_delivery_details_info.ship_method_code,
412: p_msg_display => 'N',
413: x_return_status => l_return_status);
414: IF l_debug_on THEN
415: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type',
416: l_wh_type);
417: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_return_status',
418: l_return_status);
419: END IF;
413: x_return_status => l_return_status);
414: IF l_debug_on THEN
415: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type',
416: l_wh_type);
417: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_return_status',
418: l_return_status);
419: END IF;
420: IF (l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,
421: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
433: ,x_ignore_for_planning => l_ignore_for_planning
434: ,x_return_status => l_return_status
435: ,p_otm_installed => 'Y');
436: IF l_debug_on THEN
437: WSH_DEBUG_SV.log(l_module_name,'After call to WSH_UTIL_VALIDATE.CA'
438: ||'LC_IGNORE_FOR_PLANNING l_return_status',l_return_status);
439: WSH_DEBUG_SV.log(l_module_name,'l_ignore_for_planning ',
440: l_ignore_for_planning );
441: END IF;
435: ,p_otm_installed => 'Y');
436: IF l_debug_on THEN
437: WSH_DEBUG_SV.log(l_module_name,'After call to WSH_UTIL_VALIDATE.CA'
438: ||'LC_IGNORE_FOR_PLANNING l_return_status',l_return_status);
439: WSH_DEBUG_SV.log(l_module_name,'l_ignore_for_planning ',
440: l_ignore_for_planning );
441: END IF;
442: IF (l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,
443: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
467: ELSE
468: l_delivery_details_info.ignore_for_planning:='N';
469: END IF; --}
470: IF l_debug_on THEN
471: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.ignore_for_planning',
472: l_delivery_details_info.ignore_for_planning);
473: END IF; --}
474: --OTM R12 End
475:
889: RETURNING delivery_detail_id BULK COLLECT INTO x_dd_id_tab;
890:
891: --
892: IF l_debug_on THEN
893: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INSERTING INTO WSH_DELIVERY_DETAILS');
894: END IF;
895: --
896:
897: -- DBI Project
897: -- DBI Project
898: -- Insert of wsh_delivery_details, call DBI API after the insert.
899: -- This API will also check for DBI Installed or not
900: IF l_debug_on THEN
901: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail count-',x_dd_id_tab.count);
902: END IF;
903: WSH_INTEGRATION.DBI_Update_Detail_Log
904: (p_delivery_detail_id_tab => x_dd_id_tab,
905: p_dml_type => 'INSERT',
905: p_dml_type => 'INSERT',
906: x_return_status => l_dbi_rs);
907:
908: IF l_debug_on THEN
909: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
910: END IF;
911: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
912: x_return_status := l_dbi_rs;
913: -- just pass this return status to caller API
915: -- End of Code for DBI Project
916:
917: --
918: IF l_debug_on THEN
919: WSH_DEBUG_SV.pop(l_module_name);
920: END IF;
921: --
922: EXCEPTION
923: WHEN FND_API.G_EXC_ERROR THEN
924:
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
926: --
927: IF l_debug_on THEN
928: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
929: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
930: END IF;
931: --
932: WHEN others THEN
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
926: --
927: IF l_debug_on THEN
928: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
929: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
930: END IF;
931: --
932: WHEN others THEN
933: --
931: --
932: WHEN others THEN
933: --
934: IF l_debug_on THEN
935: WSH_DEBUG_SV.logmsg(l_module_name, 'WHEN OTHERS IN CREATE_DELIVERY_DETAILS_BULK ' || SQLERRM );
936: END IF;
937: --
938: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
939: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_DETAILS_BULK',l_module_name);
938: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
939: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_DETAILS_BULK',l_module_name);
940: --
941: IF l_debug_on THEN
942: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
944: END IF;
945: --
946: END Create_Delivery_Details_Bulk;
939: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_DETAILS_BULK',l_module_name);
940: --
941: IF l_debug_on THEN
942: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
944: END IF;
945: --
946: END Create_Delivery_Details_Bulk;
947:
992: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
993: --
994: IF l_debug_on IS NULL
995: THEN
996: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
997: END IF;
998: --
999: IF l_debug_on THEN
1000: WSH_DEBUG_SV.push(l_module_name);
996: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
997: END IF;
998: --
999: IF l_debug_on THEN
1000: WSH_DEBUG_SV.push(l_module_name);
1001: --
1002: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1003: END IF;
1004: --
998: --
999: IF l_debug_on THEN
1000: WSH_DEBUG_SV.push(l_module_name);
1001: --
1002: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1003: END IF;
1004: --
1005: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1006:
1005: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1006:
1007: --
1008: IF l_debug_on THEN
1009: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE DD FROM OLD_BULK' );
1010: END IF;
1011: --
1012: FOR i in 1..p_num_of_rec
1013: LOOP
1018:
1019: /* Note : J TP release : ignore_for_planning will be defaulted from the old record*/
1020: --
1021: IF l_debug_on THEN
1022: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE INSERTING INTO WSH_DELIVERY_DETAILS' ||l_dd_id_tab.count );
1023: END IF;
1024: --
1025: FORALL i in 1..p_num_of_rec
1026: INSERT INTO wsh_delivery_details(
1452: WHERE delivery_detail_id = p_delivery_detail_id;
1453:
1454: --
1455: IF l_debug_on THEN
1456: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INSERTING INTO WSH_DELIVERY_DETAILS' );
1457: END IF;
1458: --
1459:
1460: x_dd_id_tab := l_dd_id_tab; -- unable to use RETURNING INTO .. BULK COLLECT above
1462: -- DBI Project
1463: -- Insert of wsh_delivery_details, call DBI API after the insert.
1464: -- This API will also check for DBI Installed or not
1465: IF l_debug_on THEN
1466: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail count-',x_dd_id_tab.count);
1467: END IF;
1468: WSH_INTEGRATION.DBI_Update_Detail_Log
1469: (p_delivery_detail_id_tab => x_dd_id_tab,
1470: p_dml_type => 'INSERT',
1470: p_dml_type => 'INSERT',
1471: x_return_status => l_dbi_rs);
1472:
1473: IF l_debug_on THEN
1474: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
1475: END IF;
1476: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1477: x_return_status := l_dbi_rs;
1478: -- just pass this return status to caller API
1479: END IF;
1480: -- End of Code for DBI Project
1481: --
1482: IF l_debug_on THEN
1483: WSH_DEBUG_SV.pop(l_module_name);
1484: END IF;
1485: --
1486:
1487: EXCEPTION
1487: EXCEPTION
1488: WHEN others THEN
1489: --
1490: IF l_debug_on THEN
1491: WSH_DEBUG_SV.logmsg(l_module_name, 'WHEN OTHERS IN CREATE_DD_FROM_OLD_BULK ' || SQLERRM );
1492: END IF;
1493: --
1494: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1495: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DD_FROM_OLD_BULK',l_module_name);
1494: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1495: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DD_FROM_OLD_BULK',l_module_name);
1496: --
1497: IF l_debug_on THEN
1498: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1499: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1500: END IF;
1501: --
1502: END create_dd_from_old_bulk;
1495: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DD_FROM_OLD_BULK',l_module_name);
1496: --
1497: IF l_debug_on THEN
1498: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1499: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1500: END IF;
1501: --
1502: END create_dd_from_old_bulk;
1503:
1551: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1552: --
1553: IF l_debug_on IS NULL
1554: THEN
1555: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1556: END IF;
1557: --
1558: IF l_debug_on THEN
1559: WSH_DEBUG_SV.push(l_module_name);
1555: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1556: END IF;
1557: --
1558: IF l_debug_on THEN
1559: WSH_DEBUG_SV.push(l_module_name);
1560: END IF;
1561: --
1562: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1563:
1570: END LOOP;
1571:
1572: --
1573: IF l_debug_on THEN
1574: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE DELIVERY ASSIGNMENT BULK INSERT'||l_da_id_tab.count);
1575: END IF;
1576: x_da_id_tab := l_da_id_tab;
1577:
1578: FORALL i in 1..p_num_of_rec
1612: l_da_id_tab(i)
1613: );
1614: --
1615: IF l_debug_on THEN
1616: WSH_DEBUG_SV.pop(l_module_name);
1617: END IF;
1618: --
1619: EXCEPTION
1620: WHEN others THEN
1622: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DELIV_ASSIGNMENT_BULK',l_module_name);
1623:
1624: --
1625: IF l_debug_on THEN
1626: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1627: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1628: END IF;
1629: --
1630: END Create_Deliv_Assignment_bulk;
1623:
1624: --
1625: IF l_debug_on THEN
1626: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1627: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1628: END IF;
1629: --
1630: END Create_Deliv_Assignment_bulk;
1631: /************* End of BULK OPERATION *****************/
1671: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1672: --
1673: IF l_debug_on IS NULL
1674: THEN
1675: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1676: END IF;
1677: --
1678: IF l_debug_on THEN
1679: WSH_DEBUG_SV.push(l_module_name);
1675: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1676: END IF;
1677: --
1678: IF l_debug_on THEN
1679: WSH_DEBUG_SV.push(l_module_name);
1680: --
1681: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1682: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE NEW DETAIL FROM OLD CALLING BULK API' );
1683: END IF;
1677: --
1678: IF l_debug_on THEN
1679: WSH_DEBUG_SV.push(l_module_name);
1680: --
1681: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1682: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE NEW DETAIL FROM OLD CALLING BULK API' );
1683: END IF;
1684: --
1685: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1678: IF l_debug_on THEN
1679: WSH_DEBUG_SV.push(l_module_name);
1680: --
1681: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1682: WSH_DEBUG_SV.logmsg(l_module_name, 'INSIDE PROCEDURE CREATE NEW DETAIL FROM OLD CALLING BULK API' );
1683: END IF;
1684: --
1685: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1686: -- make call to Bulk api from here
1695: x_delivery_detail_id := l_dd_id_tab(1);
1696:
1697: --
1698: IF l_debug_on THEN
1699: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INSERTING INTO WSH_DELIVERY_DETAILS' );
1700: END IF;
1701: --
1702: OPEN C_Del_Detail_Rowid;
1703: FETCH C_Del_Detail_Rowid INTO x_row_id;
1708: CLOSE C_Del_Detail_Rowid;
1709:
1710: --
1711: IF l_debug_on THEN
1712: WSH_DEBUG_SV.pop(l_module_name);
1713: END IF;
1714: --
1715: EXCEPTION
1716: WHEN others THEN
1715: EXCEPTION
1716: WHEN others THEN
1717: --
1718: IF l_debug_on THEN
1719: WSH_DEBUG_SV.logmsg(l_module_name, 'WHEN OTHERS IN CREATE_NEW_DETAIL_FROM_OLD ' || SQLERRM );
1720: END IF;
1721: --
1722: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1723: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_NEW_DETAIL_FROM_OLD',l_module_name);
1722: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1723: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_NEW_DETAIL_FROM_OLD',l_module_name);
1724: --
1725: IF l_debug_on THEN
1726: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1728: END IF;
1729: --
1730: END create_new_detail_from_old;
1723: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_NEW_DETAIL_FROM_OLD',l_module_name);
1724: --
1725: IF l_debug_on THEN
1726: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1728: END IF;
1729: --
1730: END create_new_detail_from_old;
1731:
1817: --
1818: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1819: --
1820: IF l_debug_on IS NULL THEN
1821: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1822: END IF;
1823: --
1824: IF l_debug_on THEN
1825: WSH_DEBUG_SV.push(l_module_name);
1821: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1822: END IF;
1823: --
1824: IF l_debug_on THEN
1825: WSH_DEBUG_SV.push(l_module_name);
1826: --
1827: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1828: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1829: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_FLAG',P_CANCEL_FLAG);
1823: --
1824: IF l_debug_on THEN
1825: WSH_DEBUG_SV.push(l_module_name);
1826: --
1827: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1828: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1829: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_FLAG',P_CANCEL_FLAG);
1830: END IF;
1831: --
1824: IF l_debug_on THEN
1825: WSH_DEBUG_SV.push(l_module_name);
1826: --
1827: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1828: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1829: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_FLAG',P_CANCEL_FLAG);
1830: END IF;
1831: --
1832: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1825: WSH_DEBUG_SV.push(l_module_name);
1826: --
1827: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1828: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1829: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_FLAG',P_CANCEL_FLAG);
1830: END IF;
1831: --
1832: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1833:
1837: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
1838: END IF;
1839:
1840: IF l_debug_on THEN
1841: WSH_DEBUG_SV.log(l_module_name,'l_gc3_is_installed',l_gc3_is_installed);
1842: END IF;
1843: -- End of OTM R12
1844:
1845: IF p_rowid IS NOT NULL THEN
1861: l_gross_weight; -- OTM R12 : packing ECO
1862: CLOSE get_del_detail_by_id;
1863: END IF;
1864: IF l_debug_on THEN
1865: WSH_DEBUG_SV.log(l_module_name,'l_delivery_detail_id',l_delivery_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name,'l_inventory_item_id',l_inventory_item_id);
1867: WSH_DEBUG_SV.log(l_module_name,'l_organization_id',l_organization_id);
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1862: CLOSE get_del_detail_by_id;
1863: END IF;
1864: IF l_debug_on THEN
1865: WSH_DEBUG_SV.log(l_module_name,'l_delivery_detail_id',l_delivery_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name,'l_inventory_item_id',l_inventory_item_id);
1867: WSH_DEBUG_SV.log(l_module_name,'l_organization_id',l_organization_id);
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1863: END IF;
1864: IF l_debug_on THEN
1865: WSH_DEBUG_SV.log(l_module_name,'l_delivery_detail_id',l_delivery_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name,'l_inventory_item_id',l_inventory_item_id);
1867: WSH_DEBUG_SV.log(l_module_name,'l_organization_id',l_organization_id);
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1864: IF l_debug_on THEN
1865: WSH_DEBUG_SV.log(l_module_name,'l_delivery_detail_id',l_delivery_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name,'l_inventory_item_id',l_inventory_item_id);
1867: WSH_DEBUG_SV.log(l_module_name,'l_organization_id',l_organization_id);
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1872: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id', l_delivery_id);
1865: WSH_DEBUG_SV.log(l_module_name,'l_delivery_detail_id',l_delivery_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name,'l_inventory_item_id',l_inventory_item_id);
1867: WSH_DEBUG_SV.log(l_module_name,'l_organization_id',l_organization_id);
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1872: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id', l_delivery_id);
1873: WSH_DEBUG_SV.log(l_module_name,'l_ignore', l_ignore);
1866: WSH_DEBUG_SV.log(l_module_name,'l_inventory_item_id',l_inventory_item_id);
1867: WSH_DEBUG_SV.log(l_module_name,'l_organization_id',l_organization_id);
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1872: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id', l_delivery_id);
1873: WSH_DEBUG_SV.log(l_module_name,'l_ignore', l_ignore);
1874: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight', l_gross_weight);
1867: WSH_DEBUG_SV.log(l_module_name,'l_organization_id',l_organization_id);
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1872: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id', l_delivery_id);
1873: WSH_DEBUG_SV.log(l_module_name,'l_ignore', l_ignore);
1874: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight', l_gross_weight);
1875: END IF;
1868: WSH_DEBUG_SV.log(l_module_name,'l_subinventory', l_subinventory);
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1872: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id', l_delivery_id);
1873: WSH_DEBUG_SV.log(l_module_name,'l_ignore', l_ignore);
1874: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight', l_gross_weight);
1875: END IF;
1876:
1869: WSH_DEBUG_SV.log(l_module_name,'l_serial_number', l_serial_number);
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1872: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id', l_delivery_id);
1873: WSH_DEBUG_SV.log(l_module_name,'l_ignore', l_ignore);
1874: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight', l_gross_weight);
1875: END IF;
1876:
1877: IF l_delivery_detail_id IS NOT NULL THEN
1870: WSH_DEBUG_SV.log(l_module_name,'l_container_flag', l_container_flag);
1871: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
1872: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id', l_delivery_id);
1873: WSH_DEBUG_SV.log(l_module_name,'l_ignore', l_ignore);
1874: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight', l_gross_weight);
1875: END IF;
1876:
1877: IF l_delivery_detail_id IS NOT NULL THEN
1878: IF l_serial_number IS NOT NULL OR l_transaction_temp_id IS NOT NULL THEN
1877: IF l_delivery_detail_id IS NOT NULL THEN
1878: IF l_serial_number IS NOT NULL OR l_transaction_temp_id IS NOT NULL THEN
1879: --
1880: IF l_debug_on THEN
1881: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.FETCH_INV_CONTROLS',WSH_DEBUG_SV.C_PROC_LEVEL);
1882: END IF;
1883: --
1884: WSH_DELIVERY_DETAILS_INV.Fetch_Inv_Controls(
1885: p_delivery_detail_id => l_delivery_detail_id,
1890: x_return_status => l_return_status);
1891:
1892: --
1893: IF l_debug_on THEN
1894: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
1895: END IF;
1896: --
1897: WSH_DELIVERY_DETAILS_INV.Unmark_Serial_Number(
1898: p_delivery_detail_id => l_delivery_detail_id,
1905:
1906: DELETE FROM wsh_freight_costs
1907: WHERE delivery_detail_id = l_delivery_detail_id;
1908: IF l_debug_on THEN
1909: WSH_DEBUG_SV.log(l_module_name,'Rows deleted',SQL%ROWCOUNT);
1910: END IF;
1911:
1912: -- bug 4416863
1913: IF (l_delivery_id is not null) THEN
1911:
1912: -- bug 4416863
1913: IF (l_delivery_id is not null) THEN
1914: IF l_debug_on THEN
1915: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_delivery_details_actions.unassign_detail_from_delivery', WSH_DEBUG_SV.C_PROC_LEVEL);
1916: END IF;
1917: wsh_delivery_details_actions.unassign_detail_from_delivery (
1918: p_detail_id => l_delivery_detail_id,
1919: x_return_status => l_return_status);
1922: --
1923: x_return_status := l_return_status;
1924: WSH_UTIL_CORE.Add_Message(x_return_status);
1925: IF l_debug_on THEN
1926: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
1927: WSH_DEBUG_SV.pop(l_module_name);
1928: END IF;
1929: return;
1930: END IF;
1923: x_return_status := l_return_status;
1924: WSH_UTIL_CORE.Add_Message(x_return_status);
1925: IF l_debug_on THEN
1926: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
1927: WSH_DEBUG_SV.pop(l_module_name);
1928: END IF;
1929: return;
1930: END IF;
1931: END IF;
1962: net_weight = 0,
1963: volume = 0
1964: WHERE delivery_detail_id = l_delivery_detail_id;
1965: IF l_debug_on THEN
1966: WSH_DEBUG_SV.log(l_module_name,'Rows Updated',SQL%ROWCOUNT);
1967: END IF;
1968: l_dbi_dml_type := 'UPDATE';
1969: ELSE -- else of cancel_flag='Y'
1970: DELETE FROM wsh_delivery_details
1969: ELSE -- else of cancel_flag='Y'
1970: DELETE FROM wsh_delivery_details
1971: WHERE delivery_detail_id = l_delivery_detail_id;
1972: IF l_debug_on THEN
1973: WSH_DEBUG_SV.log(l_module_name,'Rows deleted from wsh_delivery_details',SQL%ROWCOUNT);
1974: END IF;
1975: l_dbi_dml_type := 'DELETE';
1976:
1977: DELETE FROM wsh_delivery_assignments
1976:
1977: DELETE FROM wsh_delivery_assignments
1978: WHERE delivery_detail_id = l_delivery_detail_id;
1979: IF l_debug_on THEN
1980: WSH_DEBUG_SV.log(l_module_name,'Rows deleted from wsh_delivery_assignments',SQL%ROWCOUNT);
1981: END IF;
1982:
1983: -- OTM R12
1984: -- packing ECO : l_container_flag = 'N' is removed from the if condition
1991: l_is_delivery_empty := WSH_NEW_DELIVERY_ACTIONS.IS_DELIVERY_EMPTY(l_delivery_id);
1992: IF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1993: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1994: IF l_debug_on THEN
1995: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERY_ACTIONS.IS_DELIVERY_EMPTY');
1996: WSH_DEBUG_SV.pop(l_module_name);
1997: END IF;
1998: RETURN;
1999: ELSIF (l_is_delivery_empty = 'Y') THEN
1992: IF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1993: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1994: IF l_debug_on THEN
1995: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERY_ACTIONS.IS_DELIVERY_EMPTY');
1996: WSH_DEBUG_SV.pop(l_module_name);
1997: END IF;
1998: RETURN;
1999: ELSIF (l_is_delivery_empty = 'Y') THEN
2000: l_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;
2009: END IF;
2010: END IF;
2011:
2012: IF l_debug_on THEN
2013: WSH_DEBUG_SV.log(l_module_name, 'l_call_update', l_call_update);
2014: IF (l_call_update = 'Y') THEN
2015: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_id_tab', l_delivery_id_tab(1));
2016: WSH_DEBUG_SV.log(l_module_name, 'l_interface_flag_tab', l_interface_flag_tab(1));
2017: END IF;
2011:
2012: IF l_debug_on THEN
2013: WSH_DEBUG_SV.log(l_module_name, 'l_call_update', l_call_update);
2014: IF (l_call_update = 'Y') THEN
2015: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_id_tab', l_delivery_id_tab(1));
2016: WSH_DEBUG_SV.log(l_module_name, 'l_interface_flag_tab', l_interface_flag_tab(1));
2017: END IF;
2018: END IF;
2019:
2012: IF l_debug_on THEN
2013: WSH_DEBUG_SV.log(l_module_name, 'l_call_update', l_call_update);
2014: IF (l_call_update = 'Y') THEN
2015: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_id_tab', l_delivery_id_tab(1));
2016: WSH_DEBUG_SV.log(l_module_name, 'l_interface_flag_tab', l_interface_flag_tab(1));
2017: END IF;
2018: END IF;
2019:
2020: IF (l_call_update = 'Y') THEN
2026: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2027: --
2028: x_return_status := l_return_status;
2029: IF l_debug_on THEN
2030: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
2031: WSH_DEBUG_SV.log(l_module_name,'l_return_status', l_return_status);
2032: WSH_DEBUG_SV.pop(l_module_name);
2033: END IF;
2034: RETURN;
2027: --
2028: x_return_status := l_return_status;
2029: IF l_debug_on THEN
2030: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
2031: WSH_DEBUG_SV.log(l_module_name,'l_return_status', l_return_status);
2032: WSH_DEBUG_SV.pop(l_module_name);
2033: END IF;
2034: RETURN;
2035: END IF;
2028: x_return_status := l_return_status;
2029: IF l_debug_on THEN
2030: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
2031: WSH_DEBUG_SV.log(l_module_name,'l_return_status', l_return_status);
2032: WSH_DEBUG_SV.pop(l_module_name);
2033: END IF;
2034: RETURN;
2035: END IF;
2036: END IF;
2046: -- Update of wsh_delivery_details where requested_quantity/released_status
2047: -- are changed, call DBI API after the update.
2048: -- This API will also check for DBI Installed or not
2049: IF l_debug_on THEN
2050: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',l_delivery_detail_id);
2051: END IF;
2052: l_detail_tab(1) := l_delivery_detail_id;
2053: WSH_INTEGRATION.DBI_Update_Detail_Log
2054: (p_delivery_detail_id_tab => l_detail_tab,
2055: p_dml_type => l_dbi_dml_type,
2056: x_return_status => l_dbi_rs);
2057:
2058: IF l_debug_on THEN
2059: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
2060: END IF;
2061: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2062: x_return_status := l_dbi_rs;
2063: -- just pass this return status to caller API
2068: END IF; -- l_delivery_detail_id is not null
2069:
2070: --
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.pop(l_module_name);
2073: END IF;
2074: --
2075: EXCEPTION
2076: WHEN others THEN
2087: END IF;
2088:
2089: --
2090: IF l_debug_on THEN
2091: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2093: END IF;
2094: --
2095: END Delete_Delivery_Details;
2088:
2089: --
2090: IF l_debug_on THEN
2091: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2093: END IF;
2094: --
2095: END Delete_Delivery_Details;
2096:
2127: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2128: --
2129: IF l_debug_on IS NULL
2130: THEN
2131: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2132: END IF;
2133: --
2134: IF l_debug_on THEN
2135: WSH_DEBUG_SV.push(l_module_name);
2131: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2132: END IF;
2133: --
2134: IF l_debug_on THEN
2135: WSH_DEBUG_SV.push(l_module_name);
2136: --
2137: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
2138: END IF;
2139: --
2133: --
2134: IF l_debug_on THEN
2135: WSH_DEBUG_SV.push(l_module_name);
2136: --
2137: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
2138: END IF;
2139: --
2140: OPEN C_LOCK_DELIVERY_DETAIL;
2141: FETCH C_LOCK_DELIVERY_DETAIL INTO recinfo;
2142: IF (C_LOCK_DELIVERY_DETAIL%NOTFOUND) THEN
2143: CLOSE C_LOCK_DELIVERY_DETAIL;
2144: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
2145: IF l_debug_on THEN
2146: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_DELETED');
2147: END IF;
2148: app_exception.raise_exception;
2149: END IF;
2150: CLOSE C_LOCK_DELIVERY_DETAIL;
3075: and (p_delivery_details_info.release_revision_number is null)))
3076: ) THEN
3077: --
3078: IF l_debug_on THEN
3079: WSH_DEBUG_SV.log(l_module_name,'Nothing has changed');
3080: WSH_DEBUG_SV.pop(l_module_name);
3081: END IF;
3082: --
3083: RETURN;
3076: ) THEN
3077: --
3078: IF l_debug_on THEN
3079: WSH_DEBUG_SV.log(l_module_name,'Nothing has changed');
3080: WSH_DEBUG_SV.pop(l_module_name);
3081: END IF;
3082: --
3083: RETURN;
3084: ELSE
3087: END IF;
3088:
3089: --
3090: IF l_debug_on THEN
3091: WSH_DEBUG_SV.pop(l_module_name);
3092: END IF;
3093: --
3094: EXCEPTION
3095: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
3102: end if;
3103:
3104: --
3105: IF l_debug_on THEN
3106: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3107: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
3108: END IF;
3109: --
3110: RAISE;
3103:
3104: --
3105: IF l_debug_on THEN
3106: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3107: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
3108: END IF;
3109: --
3110: RAISE;
3111:
3124: FND_MESSAGE.Set_Token('ORA_TEXT',sqlerrm);
3125:
3126: --
3127: IF l_debug_on THEN
3128: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3129: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3130: END IF;
3131: --
3132: RAISE;
3125:
3126: --
3127: IF l_debug_on THEN
3128: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3129: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3130: END IF;
3131: --
3132: RAISE;
3133:
3132: RAISE;
3133:
3134: --
3135: IF l_debug_on THEN
3136: WSH_DEBUG_SV.pop(l_module_name);
3137: END IF;
3138: --
3139: END Lock_Delivery_Details;
3140:
3306: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3307: --
3308: IF l_debug_on IS NULL
3309: THEN
3310: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3311: END IF;
3312: --
3313:
3314: IF l_debug_on THEN
3311: END IF;
3312: --
3313:
3314: IF l_debug_on THEN
3315: WSH_DEBUG_SV.push(l_module_name);
3316: --
3317: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
3318: END IF;
3319: --
3313:
3314: IF l_debug_on THEN
3315: WSH_DEBUG_SV.push(l_module_name);
3316: --
3317: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
3318: END IF;
3319: --
3320: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3321:
3323: IF l_gc3_is_installed IS NULL THEN
3324: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
3325: END IF;
3326: IF l_debug_on THEN
3327: wsh_debug_sv.log(l_module_name,'l_gc3_is_installed ',
3328: l_gc3_is_installed);
3329: END IF;
3330:
3331: l_item_description := p_delivery_details_info.item_description;
3353: l_rowid := p_rowid;
3354: END IF;
3355:
3356: IF l_debug_on THEN
3357: WSH_DEBUG_SV.logmsg(l_module_name,'l_rowid'||l_rowid||' Cont Flag '||l_container_flag||' Org Gross '||l_gross_wt||' Org Net '||l_net_wt||' Org Vol '||l_volume||' frozen '||l_frozen_flag||' U Wt '||l_unit_weight||' U Vol '||l_unit_volume);
3358: WSH_DEBUG_SV.log(l_module_name,'locator_id',l_locator_id);
3359: WSH_DEBUG_SV.log(l_module_name,'l_subinventory',l_subinventory);
3360: WSH_DEBUG_SV.log(l_module_name,'l_container_name',l_container_name);
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3354: END IF;
3355:
3356: IF l_debug_on THEN
3357: WSH_DEBUG_SV.logmsg(l_module_name,'l_rowid'||l_rowid||' Cont Flag '||l_container_flag||' Org Gross '||l_gross_wt||' Org Net '||l_net_wt||' Org Vol '||l_volume||' frozen '||l_frozen_flag||' U Wt '||l_unit_weight||' U Vol '||l_unit_volume);
3358: WSH_DEBUG_SV.log(l_module_name,'locator_id',l_locator_id);
3359: WSH_DEBUG_SV.log(l_module_name,'l_subinventory',l_subinventory);
3360: WSH_DEBUG_SV.log(l_module_name,'l_container_name',l_container_name);
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3355:
3356: IF l_debug_on THEN
3357: WSH_DEBUG_SV.logmsg(l_module_name,'l_rowid'||l_rowid||' Cont Flag '||l_container_flag||' Org Gross '||l_gross_wt||' Org Net '||l_net_wt||' Org Vol '||l_volume||' frozen '||l_frozen_flag||' U Wt '||l_unit_weight||' U Vol '||l_unit_volume);
3358: WSH_DEBUG_SV.log(l_module_name,'locator_id',l_locator_id);
3359: WSH_DEBUG_SV.log(l_module_name,'l_subinventory',l_subinventory);
3360: WSH_DEBUG_SV.log(l_module_name,'l_container_name',l_container_name);
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3363: p_delivery_details_info.inventory_item_id);
3356: IF l_debug_on THEN
3357: WSH_DEBUG_SV.logmsg(l_module_name,'l_rowid'||l_rowid||' Cont Flag '||l_container_flag||' Org Gross '||l_gross_wt||' Org Net '||l_net_wt||' Org Vol '||l_volume||' frozen '||l_frozen_flag||' U Wt '||l_unit_weight||' U Vol '||l_unit_volume);
3358: WSH_DEBUG_SV.log(l_module_name,'locator_id',l_locator_id);
3359: WSH_DEBUG_SV.log(l_module_name,'l_subinventory',l_subinventory);
3360: WSH_DEBUG_SV.log(l_module_name,'l_container_name',l_container_name);
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3363: p_delivery_details_info.inventory_item_id);
3364: WSH_DEBUG_SV.log(l_module_name,'l_requested_quantity',l_requested_quantity); -- OTM R12
3357: WSH_DEBUG_SV.logmsg(l_module_name,'l_rowid'||l_rowid||' Cont Flag '||l_container_flag||' Org Gross '||l_gross_wt||' Org Net '||l_net_wt||' Org Vol '||l_volume||' frozen '||l_frozen_flag||' U Wt '||l_unit_weight||' U Vol '||l_unit_volume);
3358: WSH_DEBUG_SV.log(l_module_name,'locator_id',l_locator_id);
3359: WSH_DEBUG_SV.log(l_module_name,'l_subinventory',l_subinventory);
3360: WSH_DEBUG_SV.log(l_module_name,'l_container_name',l_container_name);
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3363: p_delivery_details_info.inventory_item_id);
3364: WSH_DEBUG_SV.log(l_module_name,'l_requested_quantity',l_requested_quantity); -- OTM R12
3365: WSH_DEBUG_SV.log(l_module_name,'l_shipped_quantity',l_shipped_quantity); -- OTM R12
3358: WSH_DEBUG_SV.log(l_module_name,'locator_id',l_locator_id);
3359: WSH_DEBUG_SV.log(l_module_name,'l_subinventory',l_subinventory);
3360: WSH_DEBUG_SV.log(l_module_name,'l_container_name',l_container_name);
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3363: p_delivery_details_info.inventory_item_id);
3364: WSH_DEBUG_SV.log(l_module_name,'l_requested_quantity',l_requested_quantity); -- OTM R12
3365: WSH_DEBUG_SV.log(l_module_name,'l_shipped_quantity',l_shipped_quantity); -- OTM R12
3366: WSH_DEBUG_SV.logmsg(l_module_name,'released_status: '||l_dd_released_status||' replenishment_status: '||l_replenishment_status);
3360: WSH_DEBUG_SV.log(l_module_name,'l_container_name',l_container_name);
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3363: p_delivery_details_info.inventory_item_id);
3364: WSH_DEBUG_SV.log(l_module_name,'l_requested_quantity',l_requested_quantity); -- OTM R12
3365: WSH_DEBUG_SV.log(l_module_name,'l_shipped_quantity',l_shipped_quantity); -- OTM R12
3366: WSH_DEBUG_SV.logmsg(l_module_name,'released_status: '||l_dd_released_status||' replenishment_status: '||l_replenishment_status);
3367: END IF;
3368:
3361: WSH_DEBUG_SV.log(l_module_name,'l_item_id',l_item_id);
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3363: p_delivery_details_info.inventory_item_id);
3364: WSH_DEBUG_SV.log(l_module_name,'l_requested_quantity',l_requested_quantity); -- OTM R12
3365: WSH_DEBUG_SV.log(l_module_name,'l_shipped_quantity',l_shipped_quantity); -- OTM R12
3366: WSH_DEBUG_SV.logmsg(l_module_name,'released_status: '||l_dd_released_status||' replenishment_status: '||l_replenishment_status);
3367: END IF;
3368:
3369: -- bug# 6719369 (replenishment project) : raise the business events for the replenishment requested and replenishment completed.
3362: WSH_DEBUG_SV.log(l_module_name,'passed item_id',
3363: p_delivery_details_info.inventory_item_id);
3364: WSH_DEBUG_SV.log(l_module_name,'l_requested_quantity',l_requested_quantity); -- OTM R12
3365: WSH_DEBUG_SV.log(l_module_name,'l_shipped_quantity',l_shipped_quantity); -- OTM R12
3366: WSH_DEBUG_SV.logmsg(l_module_name,'released_status: '||l_dd_released_status||' replenishment_status: '||l_replenishment_status);
3367: END IF;
3368:
3369: -- bug# 6719369 (replenishment project) : raise the business events for the replenishment requested and replenishment completed.
3370: IF ( p_delivery_details_info.released_status = l_dd_released_status
3420:
3421: IF Get_Cont_Item_Info%FOUND THEN --{
3422: --
3423: IF l_debug_on THEN
3424: WSH_DEBUG_SV.log(l_module_name,'l_item_description',
3425: l_item_description);
3426: WSH_DEBUG_SV.log(l_module_name,'l_container_type_code',
3427: l_container_type_code);
3428: WSH_DEBUG_SV.log(l_module_name,'l_minimum_fill_percent',
3422: --
3423: IF l_debug_on THEN
3424: WSH_DEBUG_SV.log(l_module_name,'l_item_description',
3425: l_item_description);
3426: WSH_DEBUG_SV.log(l_module_name,'l_container_type_code',
3427: l_container_type_code);
3428: WSH_DEBUG_SV.log(l_module_name,'l_minimum_fill_percent',
3429: l_minimum_fill_percent);
3430: WSH_DEBUG_SV.log(l_module_name,'l_maximum_load_weight',
3424: WSH_DEBUG_SV.log(l_module_name,'l_item_description',
3425: l_item_description);
3426: WSH_DEBUG_SV.log(l_module_name,'l_container_type_code',
3427: l_container_type_code);
3428: WSH_DEBUG_SV.log(l_module_name,'l_minimum_fill_percent',
3429: l_minimum_fill_percent);
3430: WSH_DEBUG_SV.log(l_module_name,'l_maximum_load_weight',
3431: l_maximum_load_weight);
3432: WSH_DEBUG_SV.log(l_module_name,'l_maximum_volume',
3426: WSH_DEBUG_SV.log(l_module_name,'l_container_type_code',
3427: l_container_type_code);
3428: WSH_DEBUG_SV.log(l_module_name,'l_minimum_fill_percent',
3429: l_minimum_fill_percent);
3430: WSH_DEBUG_SV.log(l_module_name,'l_maximum_load_weight',
3431: l_maximum_load_weight);
3432: WSH_DEBUG_SV.log(l_module_name,'l_maximum_volume',
3433: l_maximum_volume);
3434: WSH_DEBUG_SV.log(l_module_name,'l_unit_weight_item',
3428: WSH_DEBUG_SV.log(l_module_name,'l_minimum_fill_percent',
3429: l_minimum_fill_percent);
3430: WSH_DEBUG_SV.log(l_module_name,'l_maximum_load_weight',
3431: l_maximum_load_weight);
3432: WSH_DEBUG_SV.log(l_module_name,'l_maximum_volume',
3433: l_maximum_volume);
3434: WSH_DEBUG_SV.log(l_module_name,'l_unit_weight_item',
3435: l_unit_weight_item);
3436: WSH_DEBUG_SV.log(l_module_name,'l_unit_volume_item',
3430: WSH_DEBUG_SV.log(l_module_name,'l_maximum_load_weight',
3431: l_maximum_load_weight);
3432: WSH_DEBUG_SV.log(l_module_name,'l_maximum_volume',
3433: l_maximum_volume);
3434: WSH_DEBUG_SV.log(l_module_name,'l_unit_weight_item',
3435: l_unit_weight_item);
3436: WSH_DEBUG_SV.log(l_module_name,'l_unit_volume_item',
3437: l_unit_volume_item);
3438: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code_item',
3432: WSH_DEBUG_SV.log(l_module_name,'l_maximum_volume',
3433: l_maximum_volume);
3434: WSH_DEBUG_SV.log(l_module_name,'l_unit_weight_item',
3435: l_unit_weight_item);
3436: WSH_DEBUG_SV.log(l_module_name,'l_unit_volume_item',
3437: l_unit_volume_item);
3438: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code_item',
3439: l_weight_uom_code_item);
3440: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code_item',
3434: WSH_DEBUG_SV.log(l_module_name,'l_unit_weight_item',
3435: l_unit_weight_item);
3436: WSH_DEBUG_SV.log(l_module_name,'l_unit_volume_item',
3437: l_unit_volume_item);
3438: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code_item',
3439: l_weight_uom_code_item);
3440: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code_item',
3441: l_volume_uom_code_item);
3442: END IF;
3436: WSH_DEBUG_SV.log(l_module_name,'l_unit_volume_item',
3437: l_unit_volume_item);
3438: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code_item',
3439: l_weight_uom_code_item);
3440: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code_item',
3441: l_volume_uom_code_item);
3442: END IF;
3443:
3444: IF l_weight_uom_code_item <> l_tmp_wt_uom_code THEN --{
3458: );
3459:
3460:
3461: IF l_debug_on THEN
3462: WSH_DEBUG_SV.log(l_module_name,'maximum_load_weight',
3463: l_maximum_load_weight);
3464: END IF;
3465:
3466: l_unit_weight_item :=
3478: x_num_errors => l_num_errors
3479: );
3480:
3481: IF l_debug_on THEN
3482: WSH_DEBUG_SV.log(l_module_name,'unit_weight',
3483: l_unit_weight_item);
3484: END IF;
3485: END IF; --}
3486: IF l_volume_uom_code_item <> l_tmp_vol_uom_code THEN --{
3500: x_num_errors => l_num_errors
3501: );
3502:
3503: IF l_debug_on THEN
3504: WSH_DEBUG_SV.log(l_module_name,'unit_volume',
3505: l_unit_volume_item);
3506: END IF;
3507:
3508: l_maximum_volume :=
3520: x_num_errors => l_num_errors
3521: );
3522:
3523: IF l_debug_on THEN
3524: WSH_DEBUG_SV.log(l_module_name,'maximum_volume',
3525: l_maximum_volume);
3526: END IF;
3527:
3528: END IF; --}
3635: * l_unit_weight,-99);
3636: l_tmp_vol := nvl(nvl(p_delivery_details_info.received_quantity, nvl(p_delivery_details_info.shipped_quantity, NVL(p_delivery_details_info.picked_quantity, p_delivery_details_info.requested_quantity))) * l_unit_volume,-99);
3637:
3638: IF l_debug_on THEN
3639: WSH_DEBUG_SV.log(l_module_name,'l_tmp_gross_wt '||l_tmp_gross_wt||' l_tmp_vol '||l_tmp_vol||' New gross '||
3640: nvl(p_delivery_details_info.gross_weight,-99)||' New Net '||nvl(p_delivery_details_info.net_weight,-99)||
3641: ' New Vol '||nvl(p_delivery_details_info.volume,-99));
3642: END IF;
3643:
3676: l_frozen_flag := 'Y';
3677: END IF;
3678:
3679: IF l_debug_on THEN
3680: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag '||l_frozen_flag);
3681: END IF;
3682:
3683: -- lpn conv bmso dependency
3684: IF l_call_out THEN
3911: -- Update of wsh_delivery_details where requested_quantity/released_status
3912: -- are changed, call DBI API after the update.
3913: -- DBI API checks for DBI Installed also
3914: IF l_debug_on THEN
3915: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',p_delivery_details_info.delivery_detail_id);
3916: END IF;
3917: l_detail_tab(1) := p_delivery_details_info.delivery_detail_id;
3918: WSH_INTEGRATION.DBI_Update_Detail_Log
3919: (p_delivery_detail_id_tab => l_detail_tab,
3920: p_dml_type => 'UPDATE',
3921: x_return_status => l_dbi_rs);
3922:
3923: IF l_debug_on THEN
3924: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3925: END IF;
3926: -- DBI API can only raise unexpected error, in that case need to
3927: -- pass it to the caller API for roll back of the whole transaction
3928: -- Only need to handle Unexpected error, rest are treated as success
3929: -- Since code is not proceeding, no need to reset x_return_status
3930: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3931: x_return_status := l_dbi_rs;
3932: IF l_debug_on THEN
3933: WSH_DEBUG_SV.pop(l_module_name);
3934: END IF;
3935: RETURN;
3936: END IF;
3937: -- End of Code for DBI Project
3937: -- End of Code for DBI Project
3938: --
3939:
3940: IF l_debug_on THEN
3941: WSH_DEBUG_SV.log(l_module_name,'event is ', l_event);
3942: END IF;
3943:
3944: -- bug# 6719369 (replenishment project) : begin : raise the business events.
3945: IF ( l_event IS NOT NULL ) THEN
3951: p_event => l_event ,
3952: p_organization_id => p_delivery_details_info.organization_id,
3953: x_return_status => l_wf_rs ) ;
3954: IF l_debug_on THEN
3955: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3956: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_details_info.delivery_detail_id );
3957: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
3958: END IF;
3959: --Done Raise Event: Pick To Pod Workflow
3952: p_organization_id => p_delivery_details_info.organization_id,
3953: x_return_status => l_wf_rs ) ;
3954: IF l_debug_on THEN
3955: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3956: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_details_info.delivery_detail_id );
3957: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
3958: END IF;
3959: --Done Raise Event: Pick To Pod Workflow
3960: --}
3953: x_return_status => l_wf_rs ) ;
3954: IF l_debug_on THEN
3955: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3956: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_details_info.delivery_detail_id );
3957: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
3958: END IF;
3959: --Done Raise Event: Pick To Pod Workflow
3960: --}
3961: END IF;
3975: (NVL(l_tmp_vol_uom_code,'XX') <> NVL(p_delivery_details_info.volume_uom_code,'XX')) THEN
3976: --{
3977:
3978: IF l_debug_on THEN
3979: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3980: END IF;
3981:
3982: WSH_WV_UTILS.DD_WV_Post_Process(
3983: p_delivery_detail_id => p_delivery_details_info.delivery_detail_id,
4036: END IF; --}
4037:
4038: IF l_debug_on THEN
4039:
4040: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4041: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_details_info.ignore_for_planning', p_delivery_details_info.ignore_for_planning);
4042: WSH_DEBUG_SV.log(l_module_name, 'l_frozen_flag', l_frozen_flag);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4037:
4038: IF l_debug_on THEN
4039:
4040: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4041: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_details_info.ignore_for_planning', p_delivery_details_info.ignore_for_planning);
4042: WSH_DEBUG_SV.log(l_module_name, 'l_frozen_flag', l_frozen_flag);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4038: IF l_debug_on THEN
4039:
4040: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4041: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_details_info.ignore_for_planning', p_delivery_details_info.ignore_for_planning);
4042: WSH_DEBUG_SV.log(l_module_name, 'l_frozen_flag', l_frozen_flag);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4039:
4040: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4041: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_details_info.ignore_for_planning', p_delivery_details_info.ignore_for_planning);
4042: WSH_DEBUG_SV.log(l_module_name, 'l_frozen_flag', l_frozen_flag);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4040: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4041: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_details_info.ignore_for_planning', p_delivery_details_info.ignore_for_planning);
4042: WSH_DEBUG_SV.log(l_module_name, 'l_frozen_flag', l_frozen_flag);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4041: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_details_info.ignore_for_planning', p_delivery_details_info.ignore_for_planning);
4042: WSH_DEBUG_SV.log(l_module_name, 'l_frozen_flag', l_frozen_flag);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4042: WSH_DEBUG_SV.log(l_module_name, 'l_frozen_flag', l_frozen_flag);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4043: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.requested_quantity', p_delivery_details_info.requested_quantity);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4044: WSH_DEBUG_SV.log(l_module_name, 'l_requested_quantity', l_requested_quantity);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4045: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.weight_uom_code', p_delivery_details_info.weight_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4046: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wt_uom_code', l_tmp_wt_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4054: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_vol_uom_code', l_tmp_vol_uom_code);
4047: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.net_weight', p_delivery_details_info.net_weight);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4054: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_vol_uom_code', l_tmp_vol_uom_code);
4055: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.shipped_quantity', p_delivery_details_info.shipped_quantity);
4048: WSH_DEBUG_SV.log(l_module_name, 'l_net_wt', l_net_wt);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4054: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_vol_uom_code', l_tmp_vol_uom_code);
4055: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.shipped_quantity', p_delivery_details_info.shipped_quantity);
4056: WSH_DEBUG_SV.log(l_module_name, 'l_shipped_quantity', l_shipped_quantity);
4049: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.gross_weight', p_delivery_details_info.gross_weight);
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4054: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_vol_uom_code', l_tmp_vol_uom_code);
4055: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.shipped_quantity', p_delivery_details_info.shipped_quantity);
4056: WSH_DEBUG_SV.log(l_module_name, 'l_shipped_quantity', l_shipped_quantity);
4057: END IF;
4050: WSH_DEBUG_SV.log(l_module_name, 'l_gross_wt', l_gross_wt);
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4054: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_vol_uom_code', l_tmp_vol_uom_code);
4055: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.shipped_quantity', p_delivery_details_info.shipped_quantity);
4056: WSH_DEBUG_SV.log(l_module_name, 'l_shipped_quantity', l_shipped_quantity);
4057: END IF;
4058:
4051: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume', p_delivery_details_info.volume);
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4054: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_vol_uom_code', l_tmp_vol_uom_code);
4055: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.shipped_quantity', p_delivery_details_info.shipped_quantity);
4056: WSH_DEBUG_SV.log(l_module_name, 'l_shipped_quantity', l_shipped_quantity);
4057: END IF;
4058:
4059: -- OTM R12 : packing ECO
4052: WSH_DEBUG_SV.log(l_module_name, 'l_volume', l_volume);
4053: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.volume_uom_code', p_delivery_details_info.volume_uom_code);
4054: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_vol_uom_code', l_tmp_vol_uom_code);
4055: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_details_info.shipped_quantity', p_delivery_details_info.shipped_quantity);
4056: WSH_DEBUG_SV.log(l_module_name, 'l_shipped_quantity', l_shipped_quantity);
4057: END IF;
4058:
4059: -- OTM R12 : packing ECO
4060: IF (l_gc3_is_installed = 'Y' AND
4096: l_delivery_id_tab(1) := l_delivery_id;
4097: l_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
4098:
4099: IF l_debug_on THEN
4100: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_id_tab', l_delivery_id_tab(1));
4101: WSH_DEBUG_SV.log(l_module_name, 'l_interface_flag_tab', l_interface_flag_tab(1));
4102: END IF;
4103:
4104: WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG(
4097: l_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
4098:
4099: IF l_debug_on THEN
4100: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_id_tab', l_delivery_id_tab(1));
4101: WSH_DEBUG_SV.log(l_module_name, 'l_interface_flag_tab', l_interface_flag_tab(1));
4102: END IF;
4103:
4104: WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG(
4105: p_delivery_id_tab => l_delivery_id_tab,
4108:
4109: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4110: x_return_status := l_return_status;
4111: IF l_debug_on THEN
4112: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
4113: WSH_DEBUG_SV.log(l_module_name,'l_return_status', l_return_status);
4114: WSH_DEBUG_SV.pop(l_module_name);
4115: END IF;
4116: RETURN;
4109: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4110: x_return_status := l_return_status;
4111: IF l_debug_on THEN
4112: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
4113: WSH_DEBUG_SV.log(l_module_name,'l_return_status', l_return_status);
4114: WSH_DEBUG_SV.pop(l_module_name);
4115: END IF;
4116: RETURN;
4117: END IF;
4110: x_return_status := l_return_status;
4111: IF l_debug_on THEN
4112: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
4113: WSH_DEBUG_SV.log(l_module_name,'l_return_status', l_return_status);
4114: WSH_DEBUG_SV.pop(l_module_name);
4115: END IF;
4116: RETURN;
4117: END IF;
4118: END IF; -- if l_delivery_id is not null
4126: IF (l_back_order_consolidation = 'Y' ) THEN
4127: --{
4128:
4129: IF l_debug_on THEN
4130: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.Raise_Event',WSH_DEBUG_SV.C_PROC_LEVEL);
4131: END IF;
4132: --Raise Event : backorder business event
4133: WSH_WF_STD.Raise_Event(
4134: p_entity_type => 'LINE',
4137: p_organization_id => p_delivery_details_info.organization_id,
4138: x_return_status => l_wf_rs ) ;
4139:
4140: IF l_debug_on THEN
4141: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
4142: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_details_info.delivery_detail_id );
4143: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
4144: END IF;
4145: --Done Raise Event: backorder business event
4138: x_return_status => l_wf_rs ) ;
4139:
4140: IF l_debug_on THEN
4141: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
4142: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_details_info.delivery_detail_id );
4143: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
4144: END IF;
4145: --Done Raise Event: backorder business event
4146:
4139:
4140: IF l_debug_on THEN
4141: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
4142: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_details_info.delivery_detail_id );
4143: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
4144: END IF;
4145: --Done Raise Event: backorder business event
4146:
4147: -- Debug Statements
4146:
4147: -- Debug Statements
4148: --
4149: IF l_debug_on THEN
4150: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT.Get_Global_Parameters',WSH_DEBUG_SV.C_PROC_LEVEL);
4151: END IF;
4152: --
4153: WSH_SHIPPING_PARAMS_PVT.Get_Global_Parameters(l_global_param_rec, l_return_status);
4154: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4170: --
4171: -- Debug Statements
4172: --
4173: IF l_debug_on THEN
4174: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.Consolidate_Source_Line',WSH_DEBUG_SV.C_PROC_LEVEL);
4175: END IF;
4176: --
4177: WSH_DELIVERY_DETAILS_ACTIONS.Consolidate_Source_Line(
4178: p_Cons_Source_Line_Rec_Tab => l_cons_source_line_rec_tab,
4198: ELSE
4199: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4200: END IF;
4201: IF l_debug_on THEN
4202: WSH_DEBUG_SV.pop(l_module_name);
4203: END IF;
4204: --
4205:
4206: EXCEPTION
4218: END IF;
4219:
4220: --
4221: IF l_debug_on THEN
4222: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4224: END IF;
4225: --
4226: WHEN e_wt_vol_fail THEN
4219:
4220: --
4221: IF l_debug_on THEN
4222: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4224: END IF;
4225: --
4226: WHEN e_wt_vol_fail THEN
4227: ROLLBACK TO s_before_update_dd;
4234: CLOSE get_dd_info;
4235: END IF;
4236:
4237: IF l_debug_on THEN
4238: WSH_DEBUG_SV.logmsg(l_module_name,'E_WT_VOL_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4239: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_WT_VOL_FAIL');
4240: END IF;
4241:
4242: WHEN others THEN
4235: END IF;
4236:
4237: IF l_debug_on THEN
4238: WSH_DEBUG_SV.logmsg(l_module_name,'E_WT_VOL_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4239: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_WT_VOL_FAIL');
4240: END IF;
4241:
4242: WHEN others THEN
4243: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4253: END IF;
4254:
4255: --
4256: IF l_debug_on THEN
4257: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4258: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4259: END IF;
4260: --
4261: END Update_Delivery_Details;
4254:
4255: --
4256: IF l_debug_on THEN
4257: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4258: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4259: END IF;
4260: --
4261: END Update_Delivery_Details;
4262:
4313: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4314: --
4315: IF l_debug_on IS NULL
4316: THEN
4317: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4318: END IF;
4319: --
4320: IF l_debug_on THEN
4321: WSH_DEBUG_SV.push(l_module_name);
4317: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4318: END IF;
4319: --
4320: IF l_debug_on THEN
4321: WSH_DEBUG_SV.push(l_module_name);
4322: END IF;
4323: --
4324: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4325:
4331: */
4332: l_dd_id_tab(1) := p_delivery_assignments_info.delivery_detail_id;
4333:
4334: IF l_debug_on THEN
4335: WSH_DEBUG_SV.logmsg(l_module_name,'Calling Create_Deliv_assignment_Bulk with 1');
4336: END IF;
4337: -- from this API call Bulk api with value of 1
4338:
4339: WSH_DELIVERY_DETAILS_PKG.Create_Deliv_Assignment_Bulk
4355: END IF;
4356: CLOSE C_Del_Assign_Rowid;
4357: --
4358: IF l_debug_on THEN
4359: WSH_DEBUG_SV.pop(l_module_name);
4360: END IF;
4361: --
4362: EXCEPTION
4363: WHEN others THEN
4365: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_ASSIGNMENTS',l_module_name);
4366:
4367: --
4368: IF l_debug_on THEN
4369: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4370: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4371: END IF;
4372: --
4373: END Create_Delivery_Assignments;
4366:
4367: --
4368: IF l_debug_on THEN
4369: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4370: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4371: END IF;
4372: --
4373: END Create_Delivery_Assignments;
4374:
4412: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4413: --
4414: IF l_debug_on IS NULL
4415: THEN
4416: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4417: END IF;
4418: --
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.push(l_module_name);
4416: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4417: END IF;
4418: --
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.push(l_module_name);
4421: --
4422: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
4423: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ASSIGNMENT_ID',P_DELIVERY_ASSIGNMENT_ID);
4424: END IF;
4418: --
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.push(l_module_name);
4421: --
4422: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
4423: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ASSIGNMENT_ID',P_DELIVERY_ASSIGNMENT_ID);
4424: END IF;
4425: --
4426: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.push(l_module_name);
4421: --
4422: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
4423: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ASSIGNMENT_ID',P_DELIVERY_ASSIGNMENT_ID);
4424: END IF;
4425: --
4426: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4427:
4444: END IF;
4445:
4446: --
4447: IF l_debug_on THEN
4448: WSH_DEBUG_SV.pop(l_module_name);
4449: END IF;
4450: --
4451: EXCEPTION
4452: WHEN others THEN
4454: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG_.DELETE_DELIVERY_ASSIGNMENTS',l_module_name);
4455:
4456: --
4457: IF l_debug_on THEN
4458: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4459: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4460: END IF;
4461: --
4462: END Delete_Delivery_Assignments;
4455:
4456: --
4457: IF l_debug_on THEN
4458: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4459: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4460: END IF;
4461: --
4462: END Delete_Delivery_Assignments;
4463:
4496: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4497: --
4498: IF l_debug_on IS NULL
4499: THEN
4500: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4501: END IF;
4502: --
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.push(l_module_name);
4500: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4501: END IF;
4502: --
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.push(l_module_name);
4505: --
4506: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
4507: END IF;
4508: --
4502: --
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.push(l_module_name);
4505: --
4506: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
4507: END IF;
4508: --
4509: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4510:
4546: END IF;
4547:
4548: --
4549: IF l_debug_on THEN
4550: WSH_DEBUG_SV.pop(l_module_name);
4551: END IF;
4552: --
4553: EXCEPTION
4554: WHEN others THEN
4556: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.UPDATE_DELIVERY_ASSIGNMENTS',l_module_name);
4557:
4558: --
4559: IF l_debug_on THEN
4560: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4561: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4562: END IF;
4563: --
4564: END Update_Delivery_Assignments;
4557:
4558: --
4559: IF l_debug_on THEN
4560: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4561: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4562: END IF;
4563: --
4564: END Update_Delivery_Assignments;
4565:
4597: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4598: --
4599: IF l_debug_on IS NULL
4600: THEN
4601: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4602: END IF;
4603: --
4604: IF l_debug_on THEN
4605: WSH_DEBUG_SV.push(l_module_name);
4601: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4602: END IF;
4603: --
4604: IF l_debug_on THEN
4605: WSH_DEBUG_SV.push(l_module_name);
4606: --
4607: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
4608: END IF;
4609: --
4603: --
4604: IF l_debug_on THEN
4605: WSH_DEBUG_SV.push(l_module_name);
4606: --
4607: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
4608: END IF;
4609: --
4610: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4611:
4617: FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
4618: wsh_util_core.add_message(x_return_status,l_module_name);
4619: --
4620: IF l_debug_on THEN
4621: WSH_DEBUG_SV.pop(l_module_name);
4622: END IF;
4623: --
4624: RETURN;
4625: END IF;
4649: THEN
4650: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4651: --
4652: IF l_debug_on THEN
4653: WSH_DEBUG_SV.pop(l_module_name);
4654: END IF;
4655: --
4656: RETURN;
4657: ELSE
4657: ELSE
4658: -- x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4659: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
4660: IF l_debug_on THEN
4661: WSH_DEBUG_SV.log(l_module_name,'FORM RECORD CHANGED');
4662: END IF;
4663: app_exception.raise_exception;
4664:
4665: END IF;
4665: END IF;
4666:
4667: --
4668: IF l_debug_on THEN
4669: WSH_DEBUG_SV.pop(l_module_name);
4670: END IF;
4671: --
4672: EXCEPTION
4673: WHEN others THEN
4674: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_ASSIGNMENTS',l_module_name);
4675: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4676: --
4677: IF l_debug_on THEN
4678: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4679: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4680: END IF;
4681: --
4682: END Lock_Delivery_Assignments;
4675: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4676: --
4677: IF l_debug_on THEN
4678: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4679: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4680: END IF;
4681: --
4682: END Lock_Delivery_Assignments;
4683:
4705: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4706: --
4707: IF l_debug_on IS NULL
4708: THEN
4709: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4710: END IF;
4711: --
4712: IF l_debug_on THEN
4713: WSH_DEBUG_SV.push(l_module_name);
4709: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4710: END IF;
4711: --
4712: IF l_debug_on THEN
4713: WSH_DEBUG_SV.push(l_module_name);
4714: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
4715: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Detail Records being locked',p_valid_index_tab.COUNT);
4716: END IF;
4717: --
4710: END IF;
4711: --
4712: IF l_debug_on THEN
4713: WSH_DEBUG_SV.push(l_module_name);
4714: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
4715: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Detail Records being locked',p_valid_index_tab.COUNT);
4716: END IF;
4717: --
4718: --
4711: --
4712: IF l_debug_on THEN
4713: WSH_DEBUG_SV.push(l_module_name);
4714: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
4715: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Detail Records being locked',p_valid_index_tab.COUNT);
4716: END IF;
4717: --
4718: --
4719: l_index := p_valid_index_tab.FIRST;
4750: END IF;
4751: l_num_errors := l_num_errors + 1;
4752: --
4753: IF l_debug_on THEN
4754: WSH_DEBUG_SV.log(l_module_name,'Unable to obtain lock on the Delivery Detail Id',p_rec_attr_tab(l_index).delivery_detail_id);
4755: END IF;
4756: --
4757: WHEN others THEN
4758: rollback to lock_delivery_detail_loop;
4769: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PERFORMED');
4770: x_return_status := wsh_util_core.g_ret_sts_error;
4771: wsh_util_core.add_message(x_return_status,l_module_name);
4772: IF l_debug_on THEN
4773: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PERFORMED');
4774: END IF;
4775: raise fnd_api.g_exc_error;
4776: ELSIF l_num_errors > 0 THEN
4777: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
4777: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
4778: x_return_status := wsh_util_core.g_ret_sts_warning;
4779: wsh_util_core.add_message(x_return_status,l_module_name);
4780: IF l_debug_on THEN
4781: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PROCESSED');
4782: END IF;
4783: raise wsh_util_core.g_exc_warning;
4784: ELSE
4785: x_return_status := wsh_util_core.g_ret_sts_success;
4785: x_return_status := wsh_util_core.g_ret_sts_success;
4786: END IF;
4787: --
4788: IF l_debug_on THEN
4789: WSH_DEBUG_SV.pop(l_module_name);
4790: END IF;
4791: --
4792: EXCEPTION
4793: --
4796: --
4797: x_return_status := wsh_util_core.g_ret_sts_error;
4798: --
4799: IF l_debug_on THEN
4800: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4801: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4802: END IF;
4803: --
4804: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4797: x_return_status := wsh_util_core.g_ret_sts_error;
4798: --
4799: IF l_debug_on THEN
4800: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4801: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4802: END IF;
4803: --
4804: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4805: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
4804: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4805: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
4806: --
4807: IF l_debug_on THEN
4808: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4810: END IF;
4811: --
4812: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4805: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
4806: --
4807: IF l_debug_on THEN
4808: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4810: END IF;
4811: --
4812: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4813: x_return_status := wsh_util_core.g_ret_sts_warning;
4812: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4813: x_return_status := wsh_util_core.g_ret_sts_warning;
4814: --
4815: IF l_debug_on THEN
4816: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4817: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4818: END IF;
4819: --
4820: WHEN OTHERS THEN
4813: x_return_status := wsh_util_core.g_ret_sts_warning;
4814: --
4815: IF l_debug_on THEN
4816: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4817: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4818: END IF;
4819: --
4820: WHEN OTHERS THEN
4821: --
4823: --
4824: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_DETAILS_WRAPPER',l_module_name);
4825: --
4826: IF l_debug_on THEN
4827: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4828: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4829: END IF;
4830: --
4831: END Lock_Delivery_Details;
4824: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_DETAILS_WRAPPER',l_module_name);
4825: --
4826: IF l_debug_on THEN
4827: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4828: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4829: END IF;
4830: --
4831: END Lock_Delivery_Details;
4832:
4878: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4879: --
4880: IF l_debug_on IS NULL
4881: THEN
4882: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4883: END IF;
4884: --
4885: IF l_debug_on THEN
4886: WSH_DEBUG_SV.push(l_module_name);
4882: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4883: END IF;
4884: --
4885: IF l_debug_on THEN
4886: WSH_DEBUG_SV.push(l_module_name);
4887: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
4888: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
4889: END IF;
4890: --
4883: END IF;
4884: --
4885: IF l_debug_on THEN
4886: WSH_DEBUG_SV.push(l_module_name);
4887: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
4888: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
4889: END IF;
4890: --
4891:
4884: --
4885: IF l_debug_on THEN
4886: WSH_DEBUG_SV.push(l_module_name);
4887: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
4888: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
4889: END IF;
4890: --
4891:
4892: IF p_delivery_Detail_id IS NOT NULL THEN
4898: CLOSE c_lock_details_of_dlvy;
4899: END IF;
4900:
4901: IF l_debug_on THEN
4902: WSH_DEBUG_SV.pop(l_module_name);
4903: END IF;
4904: EXCEPTION
4905: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
4906: IF p_delivery_id IS NOT NULL THEN
4908: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_LINE_LPN_LOCK');
4909: FND_MESSAGE.SET_TOKEN('DEL_NAME', l_del_name);
4910: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
4911: IF l_debug_on THEN
4912: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on some lines or lpns of delivery', p_delivery_id);
4913: END IF;
4914: ELSE
4915: IF l_debug_on THEN
4916: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on del detail', p_delivery_detail_id);
4912: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on some lines or lpns of delivery', p_delivery_id);
4913: END IF;
4914: ELSE
4915: IF l_debug_on THEN
4916: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on del detail', p_delivery_detail_id);
4917: END IF;
4918: END IF;
4919:
4920: IF l_debug_on THEN
4917: END IF;
4918: END IF;
4919:
4920: IF l_debug_on THEN
4921: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4922: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
4923: END IF;
4924: --
4925: RAISE;
4918: END IF;
4919:
4920: IF l_debug_on THEN
4921: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4922: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
4923: END IF;
4924: --
4925: RAISE;
4926:
5151: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5152: --
5153: IF l_debug_on IS NULL
5154: THEN
5155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5156: END IF;
5157: --
5158: IF l_debug_on THEN
5159: WSH_DEBUG_SV.push(l_module_name);
5155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5156: END IF;
5157: --
5158: IF l_debug_on THEN
5159: WSH_DEBUG_SV.push(l_module_name);
5160: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
5161: END IF;
5162: --
5163:
5156: END IF;
5157: --
5158: IF l_debug_on THEN
5159: WSH_DEBUG_SV.push(l_module_name);
5160: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
5161: END IF;
5162: --
5163:
5164: OPEN c_tbl_rec (p_delivery_detail_id);
5170: --
5171: END IF;
5172: CLOSE c_tbl_rec;
5173: IF l_debug_on THEN
5174: WSH_DEBUG_SV.pop(l_module_name);
5175: END IF;
5176: x_return_status := wsh_util_core.g_ret_sts_success;
5177: EXCEPTION
5178:
5185: --
5186: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.Table_to_Record',l_module_name);
5187: --
5188: IF l_debug_on THEN
5189: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL); WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5190: END IF;
5191: --
5192:
5193: END Table_to_Record;
5236: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5237: --
5238: IF l_debug_on IS NULL
5239: THEN
5240: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5241: END IF;
5242: --
5243: IF l_debug_on THEN
5244: WSH_DEBUG_SV.push(l_module_name);
5240: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5241: END IF;
5242: --
5243: IF l_debug_on THEN
5244: WSH_DEBUG_SV.push(l_module_name);
5245: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
5246: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
5247: END IF;
5248: --
5241: END IF;
5242: --
5243: IF l_debug_on THEN
5244: WSH_DEBUG_SV.push(l_module_name);
5245: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
5246: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
5247: END IF;
5248: --
5249:
5242: --
5243: IF l_debug_on THEN
5244: WSH_DEBUG_SV.push(l_module_name);
5245: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id', p_delivery_detail_id);
5246: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
5247: END IF;
5248: --
5249:
5250: IF p_delivery_Detail_id IS NOT NULL THEN
5257: CLOSE c_lock_wda_of_dlvy;
5258: END IF;
5259:
5260: IF l_debug_on THEN
5261: WSH_DEBUG_SV.pop(l_module_name);
5262: END IF;
5263: EXCEPTION
5264: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
5265: IF p_delivery_id IS NOT NULL THEN
5267: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_LINE_LPN_LOCK');
5268: FND_MESSAGE.SET_TOKEN('DEL_NAME', l_del_name);
5269: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5270: IF l_debug_on THEN
5271: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on some lines or lpns of delivery', p_delivery_id);
5272: END IF;
5273: ELSE
5274: IF l_debug_on THEN
5275: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on del detail', p_delivery_detail_id);
5271: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on some lines or lpns of delivery', p_delivery_id);
5272: END IF;
5273: ELSE
5274: IF l_debug_on THEN
5275: wsh_debug_sv.log(l_module_name, 'Could not obtain lock on del detail', p_delivery_detail_id);
5276: END IF;
5277: END IF;
5278:
5279: IF l_debug_on THEN
5276: END IF;
5277: END IF;
5278:
5279: IF l_debug_on THEN
5280: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5281: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
5282: END IF;
5283: --
5284: RAISE;
5277: END IF;
5278:
5279: IF l_debug_on THEN
5280: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5281: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
5282: END IF;
5283: --
5284: RAISE;
5285: