DBA Data[Home] [Help]

APPS.WSH_NEW_DELIVERIES_PVT dependencies on WSH_NEW_DELIVERIES_PVT

Line 1: PACKAGE BODY WSH_NEW_DELIVERIES_PVT as

1: PACKAGE BODY WSH_NEW_DELIVERIES_PVT as
2: /* $Header: WSHDETHB.pls 120.20 2010/08/23 10:40:41 anvarshn ship $ */
3:
4: --
5: -- Package internal global variables

Line 28: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_NEW_DELIVERIES_PVT';

24: --
25:
26:
27: --
28: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_NEW_DELIVERIES_PVT';
29: --
30: PROCEDURE Create_Delivery
31: (p_delivery_info IN Delivery_Rec_Type,
32: x_rowid OUT NOCOPY VARCHAR2,

Line 463: ,WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT

459: ,p_delivery_info.REASON_OF_TRANSPORT
460: ,p_delivery_info.DESCRIPTION
461: -- bug 3667348
462: --OTM R12
463: ,WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT
464: ,1
465: , p_delivery_info.client_id -- LSP PROJECT --Modified R12.1.1 LSP PROJECT(rminocha)
466: , decode(p_delivery_info.consignee_flag,'C',NULL,p_delivery_info.consignee_flag) -- RTV changes
467: )

Line 508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',l_module_name);

504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DUPLICATE_NAME');
505: END IF;
506: --
507: WHEN others THEN
508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',l_module_name);
509: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
510: --
511: IF l_debug_on THEN
512: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 586: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;

582: l_gross_weight NUMBER;
583: l_net_weight NUMBER;
584:
585: --OTM R12
586: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
587: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
588: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
589: l_tms_update VARCHAR2(1);
590: l_trip_not_found VARCHAR2(1);

Line 587: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;

583: l_net_weight NUMBER;
584:
585: --OTM R12
586: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
587: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
588: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
589: l_tms_update VARCHAR2(1);
590: l_trip_not_found VARCHAR2(1);
591: l_trip_info_rec WSH_DELIVERY_VALIDATIONS.trip_info_rec_type;

Line 840: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN

836: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info client_id', p_delivery_info.client_id); -- Modified R12.1.1 LSP PROJECT
837: END IF;
838:
839: IF (NVL(l_delivery_info.tms_interface_flag,
840: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
841: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
842: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
843: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
844: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN

Line 841: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,

837: END IF;
838:
839: IF (NVL(l_delivery_info.tms_interface_flag,
840: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
841: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
842: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
843: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
844: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
845: l_tms_update := 'Y';

Line 842: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,

838:
839: IF (NVL(l_delivery_info.tms_interface_flag,
840: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
841: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
842: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
843: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
844: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
845: l_tms_update := 'Y';
846: l_delivery_info_tab(1) := l_delivery_info;

Line 843: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,

839: IF (NVL(l_delivery_info.tms_interface_flag,
840: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
841: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
842: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
843: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
844: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
845: l_tms_update := 'Y';
846: l_delivery_info_tab(1) := l_delivery_info;
847: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

Line 844: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN

840: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
841: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
842: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
843: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
844: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
845: l_tms_update := 'Y';
846: l_delivery_info_tab(1) := l_delivery_info;
847: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
848: l_tms_version_number := NVL(l_delivery_info.tms_version_number, 1) + 1;

Line 847: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

843: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
844: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
845: l_tms_update := 'Y';
846: l_delivery_info_tab(1) := l_delivery_info;
847: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
848: l_tms_version_number := NVL(l_delivery_info.tms_version_number, 1) + 1;
849: ELSE
850: l_tms_update := 'N';
851: END IF;

Line 1006: NVL(TMS_INTERFACE_FLAG, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT))

1002: -- bug 3667348
1003: --OTM R12
1004: ,TMS_INTERFACE_FLAG = DECODE(l_tms_update,
1005: 'Y', l_new_interface_flag_tab(1),
1006: NVL(TMS_INTERFACE_FLAG, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT))
1007: ,TMS_VERSION_NUMBER = DECODE(l_tms_update,
1008: 'Y', l_tms_version_number,
1009: NVL(tms_version_number, 1))
1010: ,CLIENT_ID = p_delivery_info.client_id -- LSP PROJECT --Modified R12.1.1 LSP PROJECT(rminocha)

Line 1232: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',l_module_name);

1228: END IF;
1229: --
1230:
1231: WHEN others THEN
1232: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',l_module_name);
1233: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1234: IF l_debug_on THEN
1235: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1236: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 1368: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));

1364: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1365: x_return_status := l_return_status;
1366: ROLLBACK TO SAVEPOINT unassign_details;
1367: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_UNASSIGN_DET_ERROR');
1368: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1369: FND_MESSAGE.SET_TOKEN('DET_NAME',dt.delivery_detail_id);
1370: wsh_util_core.add_message(x_return_status,l_module_name);
1371: --
1372: IF l_debug_on THEN

Line 1470: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));

1466: CLOSE detail_info;
1467: END IF;
1468:
1469: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DELETE_ERROR');
1470: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1471: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1472: wsh_util_core.add_message(x_return_status,l_module_name);
1473: --
1474: IF l_debug_on THEN

Line 1495: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.DELETE_DELIVERY',l_module_name);

1491: IF (detail_info%ISOPEN) THEN
1492: CLOSE detail_info;
1493: END IF;
1494:
1495: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.DELETE_DELIVERY',l_module_name);
1496: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1497: --
1498: IF l_debug_on THEN
1499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 2275: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.POPULATE_RECORD',l_module_name);

2271: IF (delivery_record%ISOPEN) THEN
2272: CLOSE delivery_record;
2273: END IF;
2274:
2275: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.POPULATE_RECORD',l_module_name);
2276: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2277: --
2278: IF l_debug_on THEN
2279: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 2358: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.GET_NAME',l_module_name);

2354:
2355: EXCEPTION
2356:
2357: WHEN others THEN
2358: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.GET_NAME',l_module_name);
2359: --
2360: IF l_debug_on THEN
2361: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2362: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 2418: wsh_new_deliveries_pvt.lock_dlvy_no_compare(p_delivery_id => p_rec_attr_tab(l_index).delivery_id);

2414: lock_delivery(p_rowid => p_rec_attr_tab(l_index).rowid,
2415: p_delivery_info => p_rec_attr_tab(l_index)
2416: );
2417: else
2418: wsh_new_deliveries_pvt.lock_dlvy_no_compare(p_delivery_id => p_rec_attr_tab(l_index).delivery_id);
2419: end if;
2420:
2421: -- Bug fix 2657182
2422: -- Need to lock the related entities - lines, containers and delivery legs

Line 3268: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CLONE',l_module_name);

3264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3265: END IF;
3266: WHEN others THEN
3267: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3268: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CLONE',l_module_name);
3269: --
3270: IF l_debug_on THEN
3271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3272: END IF;

Line 3285: x_delivery_rec OUT NOCOPY WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type,

3281: -- Description: This procedure will copy the attributes of a delivery in wsh_new_deliveries
3282: -- and copy it to a record.
3283:
3284: PROCEDURE Table_to_Record (p_delivery_id IN NUMBER,
3285: x_delivery_rec OUT NOCOPY WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type,
3286: x_return_status OUT NOCOPY VARCHAR2) IS
3287:
3288: CURSOR c_tbl_rec (p_delivery_id in NUMBER) IS
3289: SELECT DELIVERY_ID

Line 3508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.Table_to_Record',l_module_name);

3504: END IF;
3505: --
3506: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
3507: --
3508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.Table_to_Record',l_module_name);
3509: --
3510: IF l_debug_on THEN
3511: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3512: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 3540: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;

3536:
3537: l_num_error NUMBER;
3538: l_num_warn NUMBER;
3539: l_return_status VARCHAR2(1);
3540: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
3541: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
3542:
3543: l_new_tms_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
3544: l_new_tms_version_number_tab WSH_UTIL_CORE.ID_TAB_TYPE;

Line 3541: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;

3537: l_num_error NUMBER;
3538: l_num_warn NUMBER;
3539: l_return_status VARCHAR2(1);
3540: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
3541: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
3542:
3543: l_new_tms_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
3544: l_new_tms_version_number_tab WSH_UTIL_CORE.ID_TAB_TYPE;
3545: l_delivery_id_tab WSH_UTIL_CORE.ID_TAB_TYPE;

Line 3668: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,

3664: -- the interface_flag is changed from other status to DR or UR or CR
3665: IF (p_tms_interface_flag_tab(i) IS NULL) THEN
3666: --assume regular update
3667: IF (l_delivery_info.tms_interface_flag IN
3668: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3669: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3670: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3671: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
3672: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

Line 3669: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,

3665: IF (p_tms_interface_flag_tab(i) IS NULL) THEN
3666: --assume regular update
3667: IF (l_delivery_info.tms_interface_flag IN
3668: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3669: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3670: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3671: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
3672: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
3673: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1) + 1;

Line 3670: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,

3666: --assume regular update
3667: IF (l_delivery_info.tms_interface_flag IN
3668: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3669: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3670: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3671: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
3672: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
3673: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1) + 1;
3674: ELSE

Line 3671: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN

3667: IF (l_delivery_info.tms_interface_flag IN
3668: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3669: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3670: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3671: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
3672: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
3673: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1) + 1;
3674: ELSE
3675: l_new_tms_interface_flag_tab(l_count) := NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT);

Line 3672: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

3668: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3669: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3670: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3671: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
3672: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
3673: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1) + 1;
3674: ELSE
3675: l_new_tms_interface_flag_tab(l_count) := NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT);
3676: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);

Line 3675: l_new_tms_interface_flag_tab(l_count) := NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT);

3671: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
3672: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
3673: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1) + 1;
3674: ELSE
3675: l_new_tms_interface_flag_tab(l_count) := NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT);
3676: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3677: END IF;
3678: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED
3679: AND l_delivery_info.tms_interface_flag IN

Line 3678: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED

3674: ELSE
3675: l_new_tms_interface_flag_tab(l_count) := NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT);
3676: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3677: END IF;
3678: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED
3679: AND l_delivery_info.tms_interface_flag IN
3680: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3681: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)) THEN
3682: --set to NS if previous flag is CR or NS and new flag is DR, CP might already be sent so set to DR

Line 3680: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,

3676: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3677: END IF;
3678: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED
3679: AND l_delivery_info.tms_interface_flag IN
3680: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3681: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)) THEN
3682: --set to NS if previous flag is CR or NS and new flag is DR, CP might already be sent so set to DR
3683: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
3684: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);

Line 3681: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)) THEN

3677: END IF;
3678: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED
3679: AND l_delivery_info.tms_interface_flag IN
3680: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3681: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)) THEN
3682: --set to NS if previous flag is CR or NS and new flag is DR, CP might already be sent so set to DR
3683: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
3684: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3685: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED

Line 3683: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;

3679: AND l_delivery_info.tms_interface_flag IN
3680: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3681: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)) THEN
3682: --set to NS if previous flag is CR or NS and new flag is DR, CP might already be sent so set to DR
3683: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
3684: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3685: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED
3686: AND l_delivery_info.tms_interface_flag = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS) THEN
3687: --DP stays in DP

Line 3685: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED

3681: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)) THEN
3682: --set to NS if previous flag is CR or NS and new flag is DR, CP might already be sent so set to DR
3683: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
3684: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3685: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED
3686: AND l_delivery_info.tms_interface_flag = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS) THEN
3687: --DP stays in DP
3688: l_new_tms_interface_flag_tab(l_count) := l_delivery_info.tms_interface_flag;
3689: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);

Line 3686: AND l_delivery_info.tms_interface_flag = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS) THEN

3682: --set to NS if previous flag is CR or NS and new flag is DR, CP might already be sent so set to DR
3683: l_new_tms_interface_flag_tab(l_count) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
3684: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3685: ELSIF (p_tms_interface_flag_tab(i) = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED
3686: AND l_delivery_info.tms_interface_flag = WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS) THEN
3687: --DP stays in DP
3688: l_new_tms_interface_flag_tab(l_count) := l_delivery_info.tms_interface_flag;
3689: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3690: ELSIF (p_tms_interface_flag_tab(i) IN

Line 3691: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,

3687: --DP stays in DP
3688: l_new_tms_interface_flag_tab(l_count) := l_delivery_info.tms_interface_flag;
3689: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3690: ELSIF (p_tms_interface_flag_tab(i) IN
3691: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3692: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,

Line 3692: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,

3688: l_new_tms_interface_flag_tab(l_count) := l_delivery_info.tms_interface_flag;
3689: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3690: ELSIF (p_tms_interface_flag_tab(i) IN
3691: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3692: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3696: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED,

Line 3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,

3689: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1);
3690: ELSIF (p_tms_interface_flag_tab(i) IN
3691: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3692: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3696: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED,
3697: WSH_NEW_DELIVERIES_PVT.C_TMS_COMPLETED)

Line 3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,

3690: ELSIF (p_tms_interface_flag_tab(i) IN
3691: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3692: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3696: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED,
3697: WSH_NEW_DELIVERIES_PVT.C_TMS_COMPLETED)
3698: OR p_tms_interface_flag_tab(i) = l_delivery_info.tms_interface_flag) THEN

Line 3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,

3691: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3692: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3696: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED,
3697: WSH_NEW_DELIVERIES_PVT.C_TMS_COMPLETED)
3698: OR p_tms_interface_flag_tab(i) = l_delivery_info.tms_interface_flag) THEN
3699: --all updates that does not change tms interface flag or are changing to anything besides UR CR DR,

Line 3696: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED,

3692: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3696: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED,
3697: WSH_NEW_DELIVERIES_PVT.C_TMS_COMPLETED)
3698: OR p_tms_interface_flag_tab(i) = l_delivery_info.tms_interface_flag) THEN
3699: --all updates that does not change tms interface flag or are changing to anything besides UR CR DR,
3700: --do not increment the version

Line 3697: WSH_NEW_DELIVERIES_PVT.C_TMS_COMPLETED)

3693: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
3694: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
3695: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3696: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED,
3697: WSH_NEW_DELIVERIES_PVT.C_TMS_COMPLETED)
3698: OR p_tms_interface_flag_tab(i) = l_delivery_info.tms_interface_flag) THEN
3699: --all updates that does not change tms interface flag or are changing to anything besides UR CR DR,
3700: --do not increment the version
3701: l_new_tms_interface_flag_tab(l_count) := p_tms_interface_flag_tab(i);

Line 3815: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG',l_module_name);

3811: END IF;
3812:
3813: WHEN others THEN
3814: ROLLBACK TO tms_update;
3815: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG',l_module_name);
3816: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3817: IF l_debug_on THEN
3818: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3819: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 3825: END WSH_NEW_DELIVERIES_PVT;

3821:
3822: END UPDATE_TMS_INTERFACE_FLAG;
3823: --END OTM R12
3824:
3825: END WSH_NEW_DELIVERIES_PVT;