DBA Data[Home] [Help]

APPS.WSH_VENDOR_PARTY_MERGE_PKG dependencies on WSH_VENDOR_PARTY_MERGE_PKG

Line 1: PACKAGE BODY WSH_VENDOR_PARTY_MERGE_PKG AS

1: PACKAGE BODY WSH_VENDOR_PARTY_MERGE_PKG AS
2: /* $Header: WSHVMRGB.pls 120.24 2011/01/21 09:08:07 skanduku ship $ */
3: --
4: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_VENDOR_PARTY_MERGE_PKG';
5: TYPE g_number_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;

Line 4: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_VENDOR_PARTY_MERGE_PKG';

1: PACKAGE BODY WSH_VENDOR_PARTY_MERGE_PKG AS
2: /* $Header: WSHVMRGB.pls 120.24 2011/01/21 09:08:07 skanduku ship $ */
3: --
4: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_VENDOR_PARTY_MERGE_PKG';
5: TYPE g_number_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
6: TYPE g_char_hash_string IS TABLE OF VARCHAR2(1000) INDEX BY BINARY_INTEGER;
7: TYPE g_char_tbl_type IS TABLE OF VARCHAR2(1000) INDEX BY BINARY_INTEGER;
8: G_DELIVERY_ID g_number_tbl_type;

Line 286: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.InactivatePartySites');

282: --
283: WHEN OTHERS THEN
284: --
285: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
286: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.InactivatePartySites');
287: --
288: IF l_debug_on THEN
289: --
290: WSH_DEBUG_SV.log(l_module_name,'Unexpected error has occured. Oracle error message is ', SUBSTRB(SQLERRM,1,200));

Line 848: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Create_Site');

844: --
845: WHEN OTHERS THEN
846: --
847: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
848: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Create_Site');
849: --
850: IF l_debug_on THEN
851: WSH_DEBUG_SV.log(l_module_name,'Unexpected error has occured. Oracle error message is ', SUBSTRB(SQLERRM,1,200));
852: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 1009: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.CREATE_SITE' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);

1005:
1006: IF l_debug_on THEN
1007: --{
1008: WSH_DEBUG_SV.log(l_module_name, 'l_location_id', l_location_id);
1009: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.CREATE_SITE' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);
1010: --}
1011: END IF;
1012:
1013: create_site (

Line 1029: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status from WSH_VENDOR_PARTY_MERGE_PKG.CREATE_SITE is ' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);

1025: x_num_errors => l_num_errors
1026: );
1027: IF l_debug_on THEN
1028: --{
1029: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status from WSH_VENDOR_PARTY_MERGE_PKG.CREATE_SITE is ' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);
1030: --}
1031: END IF;
1032: --}
1033: END IF;

Line 1074: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Update_New_Delivery');

1070: --
1071: WHEN OTHERS THEN
1072: --
1073: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1074: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Update_New_Delivery');
1075: --
1076: IF l_debug_on THEN
1077: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1078: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 1472: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Update_Non_PO_Entities');

1468: --
1469: WHEN OTHERS THEN
1470: --
1471: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1472: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Update_Non_PO_Entities');
1473: --
1474: IF l_debug_on THEN
1475: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1476: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 1792: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NON_PO_ENTITIES',WSH_DEBUG_SV.C_PROC_LEVEL);

1788:
1789: -- Update for entities which are not dependent on the invoice/PO selection
1790: IF l_debug_on THEN
1791: --{
1792: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NON_PO_ENTITIES',WSH_DEBUG_SV.C_PROC_LEVEL);
1793: --}
1794: END IF;
1795: --
1796: -- Update non-PO entities irrespective of calling mode

Line 2007: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);

2003:
2004: --Update WSH_NEW_DELIVERIES with the merge to vendor
2005: IF l_debug_on THEN
2006: --{
2007: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
2008: --}
2009: END IF;
2010:
2011: Update_new_delivery(

Line 2025: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status from WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY is ' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);

2021: x_return_status => l_return_status
2022: );
2023: IF l_debug_on THEN
2024: --{
2025: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status from WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY is ' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);
2026: --}
2027: END IF;
2028:
2029: wsh_util_core.api_post_call(

Line 2102: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);

2098: --Update WSH_NEW_DELIVERIES with the merge to vendor
2099: IF l_debug_on THEN
2100: --{
2101: --wsh_debug_sv.log(l_module_name, 'l_dup', l_dup);
2102: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
2103: --}
2104: END IF;
2105:
2106: Update_new_delivery(

Line 2120: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status from WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY is ' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);

2116: x_return_status => l_return_status
2117: );
2118: IF l_debug_on THEN
2119: --{
2120: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status from WSH_VENDOR_PARTY_MERGE_PKG.UPDATE_NEW_DELIVERY is ' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);
2121: --}
2122: END IF;
2123:
2124: wsh_util_core.api_post_call(

Line 2691: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Vendor_Merge');

2687: WHEN OTHERS THEN
2688: --
2689: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2690: ROLLBACK TO WSH_Vendor_Merge;
2691: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Vendor_Merge');
2692: --
2693: IF l_debug_on THEN
2694: --
2695: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 2837: WSH_VENDOR_PARTY_MERGE_PKG.Vendor_Merge

2833: END IF;
2834: --
2835: -- Now call the core Vendor Merge routine to update WSH data
2836: --
2837: WSH_VENDOR_PARTY_MERGE_PKG.Vendor_Merge
2838: (
2839: p_from_id => p_from_vendor_id,
2840: p_to_id => P_to_vendor_id,
2841: p_from_party_id => NVL(p_from_party_id, l_fromPartyId),

Line 2908: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_VENDOR_PARTY_MERGE_PKG.VENDOR_PARTY_MERGE',l_module_name);

2904: WHEN OTHERS THEN
2905: --
2906: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2907: WSH_UTIL_CORE.ADD_MESSAGE(l_return_status, l_module_name);
2908: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_VENDOR_PARTY_MERGE_PKG.VENDOR_PARTY_MERGE',l_module_name);
2909: --
2910: IF l_debug_on THEN
2911: WSH_DEBUG_SV.log(l_module_name, 'Unexpected error', substrb(sqlerrm, 1, 200));
2912: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);

Line 2972: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+' || getTimeStamp );

2968: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2969: END IF;
2970: --
2971: IF l_debug_on THEN
2972: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+' || getTimeStamp );
2973: END IF;
2974: --
2975:
2976: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

Line 3017: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+' || getTimeStamp );

3013: END LOOP;
3014:
3015: --
3016: IF l_debug_on THEN
3017: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+' || getTimeStamp );
3018: END IF;
3019: --
3020: EXCEPTION
3021: WHEN Update_Hash_Exp THEN

Line 3025: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+ Update_Hash_Exp - ' || getTimeStamp );

3021: WHEN Update_Hash_Exp THEN
3022: x_return_status := l_return_status;
3023: --
3024: IF ( l_debug_on ) THEN
3025: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+ Update_Hash_Exp - ' || getTimeStamp );
3026: END IF;
3027: --
3028: WHEN OTHERS THEN
3029: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

Line 3032: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+ Others - ' || getTimeStamp );

3028: WHEN OTHERS THEN
3029: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3030: --
3031: IF ( l_debug_on ) THEN
3032: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Get_Delivery_Hash()+ Others - ' || getTimeStamp );
3033: WSH_DEBUG_SV.logmsg(l_module_name,'Error Mesg : ' || SQLERRM );
3034: END IF;
3035: --
3036: END Get_Delivery_Hash;

Line 3092: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+' || getTimeStamp );

3088: END IF;
3089:
3090: --
3091: IF l_debug_on THEN
3092: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+' || getTimeStamp );
3093: END IF;
3094:
3095: IF ( p_entity_type in ( 'CONT', 'DEL-CONT' ) )
3096: THEN

Line 3173: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+' || getTimeStamp );

3169: END IF;
3170:
3171: --
3172: IF ( l_debug_on ) THEN
3173: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+' || getTimeStamp );
3174: END IF;
3175: --
3176:
3177: EXCEPTION

Line 3182: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+ Weight_Volume_Exp - ' || getTimeStamp );

3178: WHEN Weight_Volume_Exp THEN
3179: x_return_status := l_return_status;
3180: --
3181: IF ( l_debug_on ) THEN
3182: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+ Weight_Volume_Exp - ' || getTimeStamp );
3183: END IF;
3184: --
3185:
3186: WHEN OTHERS THEN

Line 3190: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+ Others - ' || getTimeStamp);

3186: WHEN OTHERS THEN
3187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3188: --
3189: IF ( l_debug_on ) THEN
3190: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Weight_Volume()+ Others - ' || getTimeStamp);
3191: WSH_DEBUG_SV.logmsg(l_module_name,'Error Mesg : ' || sqlerrm );
3192: END IF;
3193: --
3194: END Adjust_Weight_Volume;

Line 3247: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+' || getTimeStamp );

3243: END IF;
3244: --
3245: --
3246: IF l_debug_on THEN
3247: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+' || getTimeStamp );
3248: END IF;
3249: --
3250:
3251: -- Weight/Volume adjustments

Line 3327: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+' || getTimeStamp );

3323: END LOOP;
3324:
3325: --
3326: IF ( l_debug_on ) THEN
3327: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+' || getTimeStamp );
3328: END IF;
3329: --
3330:
3331: EXCEPTION

Line 3336: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+ Weight_Volume_Exp - ' || getTimeStamp );

3332: WHEN Weight_Volume_Exp THEN
3333: x_return_status := l_return_status;
3334: --
3335: IF ( l_debug_on ) THEN
3336: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+ Weight_Volume_Exp - ' || getTimeStamp );
3337: END IF;
3338: --
3339:
3340: WHEN OTHERS THEN

Line 3344: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+ Others - ' || getTimeStamp );

3340: WHEN OTHERS THEN
3341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3342: --
3343: IF ( l_debug_on ) THEN
3344: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_VENDOR_PARTY_MERGE_PKG.Adjust_Parent_WV()+ Others - ' || getTimeStamp );
3345: WSH_DEBUG_SV.logmsg(l_module_name,'Error Mesg : ' || sqlerrm );
3346: END IF;
3347: --
3348: END Adjust_Parent_WV;

Line 4573: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Merge_RTV_Transactions');

4569: CLOSE get_empty_deliveries;
4570: END IF;
4571: --
4572: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4573: wsh_util_core.default_handler('WSH_VENDOR_PARTY_MERGE_PKG.Merge_RTV_Transactions');
4574: --
4575: IF l_debug_on THEN
4576: --
4577: WSH_DEBUG_SV.log(l_module_name,'Unexpected error has occured. Oracle error message is ', SUBSTRB(SQLERRM, 1, 200));

Line 4584: END WSH_VENDOR_PARTY_MERGE_PKG;

4580: END IF;
4581: --
4582: END Merge_RTV_Transactions;
4583:
4584: END WSH_VENDOR_PARTY_MERGE_PKG;