[Home] [Help]
79:
80: BEGIN
81: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
82: IF l_debug_on IS NULL THEN
83: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
84: END IF;
85:
86: IF l_debug_on THEN
87: WSH_DEBUG_SV.push(l_module_name);
83: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
84: END IF;
85:
86: IF l_debug_on THEN
87: WSH_DEBUG_SV.push(l_module_name);
88: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
89: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
84: END IF;
85:
86: IF l_debug_on THEN
87: WSH_DEBUG_SV.push(l_module_name);
88: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
89: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
85:
86: IF l_debug_on THEN
87: WSH_DEBUG_SV.push(l_module_name);
88: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
89: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
86: IF l_debug_on THEN
87: WSH_DEBUG_SV.push(l_module_name);
88: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
89: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
87: WSH_DEBUG_SV.push(l_module_name);
88: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
89: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
88: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
89: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
89: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
97: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
90: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
97: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
98: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
91: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
97: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
98: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
99: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
92: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
97: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
98: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
99: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
100: END IF;
93: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
97: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
98: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
99: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
100: END IF;
101:
94: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
97: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
98: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
99: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
100: END IF;
101:
102: --Cursor to check for existing location information.
95: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
96: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
97: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
98: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
99: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
100: END IF;
101:
102: --Cursor to check for existing location information.
103: OPEN Check_location_csr;
105:
106: IF (Check_location_csr%NOTFOUND ) THEN
107: CLOSE Check_location_csr;
108: IF l_debug_on THEN
109: WSH_DEBUG_SV.pop(l_module_name,'RETURN false');
110: END IF;
111: RETURN false;
112: END IF;
113:
114: CLOSE Check_location_csr;
115:
116:
117: IF l_debug_on THEN
118: WSH_DEBUG_SV.pop(l_module_name,'RETURN true');
119: END IF;
120: RETURN true;
121:
122: EXCEPTION
121:
122: EXCEPTION
123: WHEN OTHERS THEN
124: IF l_debug_on THEN
125: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
126: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
127: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
128: END IF;
129:
122: EXCEPTION
123: WHEN OTHERS THEN
124: IF l_debug_on THEN
125: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
126: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
127: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
128: END IF;
129:
130: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
123: WHEN OTHERS THEN
124: IF l_debug_on THEN
125: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
126: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
127: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
128: END IF;
129:
130: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
131: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
175:
176: BEGIN
177: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
178: IF l_debug_on IS NULL THEN
179: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
180: END IF;
181:
182: IF l_debug_on THEN
183: WSH_DEBUG_SV.push(l_module_name);
179: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
180: END IF;
181:
182: IF l_debug_on THEN
183: WSH_DEBUG_SV.push(l_module_name);
184: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
185: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
186: WSH_DEBUG_SV.log(l_module_name,'P_location_code',P_location_code);
187: END IF;
180: END IF;
181:
182: IF l_debug_on THEN
183: WSH_DEBUG_SV.push(l_module_name);
184: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
185: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
186: WSH_DEBUG_SV.log(l_module_name,'P_location_code',P_location_code);
187: END IF;
188:
181:
182: IF l_debug_on THEN
183: WSH_DEBUG_SV.push(l_module_name);
184: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
185: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
186: WSH_DEBUG_SV.log(l_module_name,'P_location_code',P_location_code);
187: END IF;
188:
189: IF (P_party_id IS NULL) THEN
182: IF l_debug_on THEN
183: WSH_DEBUG_SV.push(l_module_name);
184: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
185: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
186: WSH_DEBUG_SV.log(l_module_name,'P_location_code',P_location_code);
187: END IF;
188:
189: IF (P_party_id IS NULL) THEN
190: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
221: l_hz_profile_option := fnd_profile.value('HZ_GENERATE_PARTY_NUMBER');
222:
223: IF (l_hz_profile_option = 'Y' or l_hz_profile_option is null ) THEN
224: IF l_debug_on THEN
225: WSH_DEBUG_SV.logmsg(l_module_name,'Setting profile option HZ_GENERATE_PARTY_SITE_NUMBER to No');
226: END IF;
227: --Since location code is used as party site number.
228: fnd_profile.put('HZ_GENERATE_PARTY_SITE_NUMBER','N');
229: l_hz_profile_set := true;
240:
241: -- Bug 7391414 Setting the profile option 'HZ GENERATE PARTY NUMBER' to previous value
242: IF l_hz_profile_set THEN
243: IF l_debug_on THEN
244: WSH_DEBUG_SV.logmsg(l_module_name,'Reverting the value of profile option HZ_GENERATE_PARTY_SITE_NUMBER');
245: END IF;
246: fnd_profile.put('HZ_GENERATE_PARTY_SITE_NUMBER',l_hz_profile_option);
247: END IF;
248:
246: fnd_profile.put('HZ_GENERATE_PARTY_SITE_NUMBER',l_hz_profile_option);
247: END IF;
248:
249: IF l_debug_on THEN
250: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_SITE_V2PUB.Create_Party_Site l_return_status',l_return_status);
251: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
252: WSH_DEBUG_SV.log(l_module_name,'l_party_site_number',l_party_site_number);
253: END IF;
254: wsh_util_core.api_post_call(
247: END IF;
248:
249: IF l_debug_on THEN
250: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_SITE_V2PUB.Create_Party_Site l_return_status',l_return_status);
251: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
252: WSH_DEBUG_SV.log(l_module_name,'l_party_site_number',l_party_site_number);
253: END IF;
254: wsh_util_core.api_post_call(
255: p_return_status => l_return_status,
248:
249: IF l_debug_on THEN
250: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_SITE_V2PUB.Create_Party_Site l_return_status',l_return_status);
251: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
252: WSH_DEBUG_SV.log(l_module_name,'l_party_site_number',l_party_site_number);
253: END IF;
254: wsh_util_core.api_post_call(
255: p_return_status => l_return_status,
256: x_num_warnings => l_num_warnings,
262: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
263: END IF;
264:
265: IF l_debug_on THEN
266: WSH_DEBUG_SV.pop(l_module_name);
267: END IF;
268: EXCEPTION
269: WHEN FND_API.G_EXC_ERROR THEN
270: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
269: WHEN FND_API.G_EXC_ERROR THEN
270: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
271:
272: IF l_debug_on THEN
273: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
274: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
275: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
276: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
277: END IF;
270: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
271:
272: IF l_debug_on THEN
273: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
274: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
275: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
276: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
277: END IF;
278:
271:
272: IF l_debug_on THEN
273: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
274: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
275: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
276: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
277: END IF;
278:
279: WHEN OTHERS THEN
272: IF l_debug_on THEN
273: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
274: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
275: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
276: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
277: END IF;
278:
279: WHEN OTHERS THEN
280: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
279: WHEN OTHERS THEN
280: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
281:
282: IF l_debug_on THEN
283: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
284: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
285: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
286: END IF;
287:
280: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
281:
282: IF l_debug_on THEN
283: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
284: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
285: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
286: END IF;
287:
288: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
281:
282: IF l_debug_on THEN
283: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
284: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
285: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
286: END IF;
287:
288: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
289: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
319: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'VENDOR_PARTY_EXISTS';
320: BEGIN
321: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
322: IF l_debug_on IS NULL THEN
323: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
324: END IF;
325:
326: IF l_debug_on THEN
327: WSH_DEBUG_SV.push(l_module_name);
323: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
324: END IF;
325:
326: IF l_debug_on THEN
327: WSH_DEBUG_SV.push(l_module_name);
328: WSH_DEBUG_SV.log(l_module_name,'p_vendor_id',p_vendor_id);
329: END IF;
330:
331: --IB-Phase-2 {
324: END IF;
325:
326: IF l_debug_on THEN
327: WSH_DEBUG_SV.push(l_module_name);
328: WSH_DEBUG_SV.log(l_module_name,'p_vendor_id',p_vendor_id);
329: END IF;
330:
331: --IB-Phase-2 {
332:
345: FND_MESSAGE.SET_NAME('WSH','WSH_SUPPLIER_NO_PARTY');
346: FND_MESSAGE.SET_TOKEN('SUPPLIER_NAME',l_vendor_name);
347: fnd_msg_pub.add;
348: IF l_debug_on THEN
349: WSH_DEBUG_SV.pop(l_module_name);
350: END IF;
351: RETURN 'N';
352: END IF;
353: --}IB-Phase-2
352: END IF;
353: --}IB-Phase-2
354:
355: IF l_debug_on THEN
356: WSH_DEBUG_SV.pop(l_module_name);
357: END IF;
358: RETURN 'Y';
359:
360: EXCEPTION
363: FND_MESSAGE.SET_NAME('WSH','WSH_SUPPLIER_NO_PARTY');
364: fnd_msg_pub.add;
365: -- } IB-Phase-2
366: IF l_debug_on THEN
367: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
368: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
369: END IF;
370:
371: RETURN 'N';
364: fnd_msg_pub.add;
365: -- } IB-Phase-2
366: IF l_debug_on THEN
367: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
368: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
369: END IF;
370:
371: RETURN 'N';
372:
371: RETURN 'N';
372:
373: WHEN OTHERS THEN
374: IF l_debug_on THEN
375: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
376: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
377: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
378: END IF;
379:
372:
373: WHEN OTHERS THEN
374: IF l_debug_on THEN
375: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
376: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
377: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
378: END IF;
379:
380: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
373: WHEN OTHERS THEN
374: IF l_debug_on THEN
375: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
376: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
377: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
378: END IF;
379:
380: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
381: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
452: l_num_errors number;
453: BEGIN
454: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
455: IF l_debug_on IS NULL THEN
456: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
457: END IF;
458:
459: IF l_debug_on THEN
460: WSH_DEBUG_SV.push(l_module_name);
456: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
457: END IF;
458:
459: IF l_debug_on THEN
460: WSH_DEBUG_SV.push(l_module_name);
461: WSH_DEBUG_SV.log(l_module_name,'p_vendor_id',p_vendor_id);
462: END IF;
463:
464: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
457: END IF;
458:
459: IF l_debug_on THEN
460: WSH_DEBUG_SV.push(l_module_name);
461: WSH_DEBUG_SV.log(l_module_name,'p_vendor_id',p_vendor_id);
462: END IF;
463:
464: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
465:
481: l_org_rec.created_by_module := C_CREATED_BY_MODULE;
482: l_org_rec.party_rec.status := 'A';
483:
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.logmsg(l_module_name,'Calling HZ_PARTY_V2PUB.Create_Organization');
486: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.organization_name',l_org_rec.organization_name);
487: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.created_by_module',l_org_rec.created_by_module);
488: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.party_rec.status',l_org_rec.party_rec.status);
489: END IF;
482: l_org_rec.party_rec.status := 'A';
483:
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.logmsg(l_module_name,'Calling HZ_PARTY_V2PUB.Create_Organization');
486: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.organization_name',l_org_rec.organization_name);
487: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.created_by_module',l_org_rec.created_by_module);
488: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.party_rec.status',l_org_rec.party_rec.status);
489: END IF;
490:
483:
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.logmsg(l_module_name,'Calling HZ_PARTY_V2PUB.Create_Organization');
486: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.organization_name',l_org_rec.organization_name);
487: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.created_by_module',l_org_rec.created_by_module);
488: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.party_rec.status',l_org_rec.party_rec.status);
489: END IF;
490:
491: --Party is created as Organization in TCA.
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.logmsg(l_module_name,'Calling HZ_PARTY_V2PUB.Create_Organization');
486: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.organization_name',l_org_rec.organization_name);
487: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.created_by_module',l_org_rec.created_by_module);
488: WSH_DEBUG_SV.log(l_module_name,'l_org_rec.party_rec.status',l_org_rec.party_rec.status);
489: END IF;
490:
491: --Party is created as Organization in TCA.
492: HZ_PARTY_V2PUB.Create_Organization
501: x_profile_id => l_profile_id
502: );
503:
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.log(l_module_name,'After HZ_PARTY_V2PUB.Create_Organization l_return_status',l_return_status);
506: WSH_DEBUG_SV.log(l_module_name,'x_party_id',l_party_id);
507: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
508: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
509: END IF;
502: );
503:
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.log(l_module_name,'After HZ_PARTY_V2PUB.Create_Organization l_return_status',l_return_status);
506: WSH_DEBUG_SV.log(l_module_name,'x_party_id',l_party_id);
507: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
508: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
509: END IF;
510:
503:
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.log(l_module_name,'After HZ_PARTY_V2PUB.Create_Organization l_return_status',l_return_status);
506: WSH_DEBUG_SV.log(l_module_name,'x_party_id',l_party_id);
507: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
508: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
509: END IF;
510:
511: wsh_util_core.api_post_call(
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.log(l_module_name,'After HZ_PARTY_V2PUB.Create_Organization l_return_status',l_return_status);
506: WSH_DEBUG_SV.log(l_module_name,'x_party_id',l_party_id);
507: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
508: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
509: END IF;
510:
511: wsh_util_core.api_post_call(
512: p_return_status => l_return_status,
533: l_party_rel_rec.created_by_module := C_CREATED_BY_MODULE;
534:
535:
536: IF l_debug_on THEN
537: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit HZ_PARTY_CONTACT_V2PUB.create_org_contact');
538: END IF;
539:
540: HZ_RELATIONSHIP_V2PUB.create_relationship(
541: --p_init_msg_list => FND_API.g_false,
547: x_msg_count => l_msg_count,
548: x_msg_data => l_msg_data );
549:
550: IF l_debug_on THEN
551: WSH_DEBUG_SV.log(l_module_name,'After create_org_contact l_return_status',l_return_status);
552: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
553: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_rel_party_id);
554: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
555: END IF;
548: x_msg_data => l_msg_data );
549:
550: IF l_debug_on THEN
551: WSH_DEBUG_SV.log(l_module_name,'After create_org_contact l_return_status',l_return_status);
552: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
553: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_rel_party_id);
554: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
555: END IF;
556:
549:
550: IF l_debug_on THEN
551: WSH_DEBUG_SV.log(l_module_name,'After create_org_contact l_return_status',l_return_status);
552: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
553: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_rel_party_id);
554: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
555: END IF;
556:
557: wsh_util_core.api_post_call(
550: IF l_debug_on THEN
551: WSH_DEBUG_SV.log(l_module_name,'After create_org_contact l_return_status',l_return_status);
552: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
553: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_rel_party_id);
554: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
555: END IF;
556:
557: wsh_util_core.api_post_call(
558: p_return_status => l_return_status,
580: l_code_assignment_rec.created_by_module := C_CREATED_BY_MODULE;
581: l_code_assignment_rec.application_id := 177;
582:
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.logmsg(l_module_name,'Calling HZ_CLASSIFICATION_V2PUB.create_code_assignment');
585: END IF;
586:
587: HZ_CLASSIFICATION_V2PUB.create_code_assignment(
588: FND_API.G_FALSE,
592: exception_message,
593: l_code_assignment_id);
594:
595: IF l_debug_on THEN
596: WSH_DEBUG_SV.log(l_module_name,'After create_code_assignment l_return_status',l_return_status);
597: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
598: WSH_DEBUG_SV.log(l_module_name,'exception_message',exception_message);
599: WSH_DEBUG_SV.log(l_module_name,'l_code_assignment_id',l_code_assignment_id);
600: END IF;
593: l_code_assignment_id);
594:
595: IF l_debug_on THEN
596: WSH_DEBUG_SV.log(l_module_name,'After create_code_assignment l_return_status',l_return_status);
597: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
598: WSH_DEBUG_SV.log(l_module_name,'exception_message',exception_message);
599: WSH_DEBUG_SV.log(l_module_name,'l_code_assignment_id',l_code_assignment_id);
600: END IF;
601:
594:
595: IF l_debug_on THEN
596: WSH_DEBUG_SV.log(l_module_name,'After create_code_assignment l_return_status',l_return_status);
597: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
598: WSH_DEBUG_SV.log(l_module_name,'exception_message',exception_message);
599: WSH_DEBUG_SV.log(l_module_name,'l_code_assignment_id',l_code_assignment_id);
600: END IF;
601:
602: wsh_util_core.api_post_call(
595: IF l_debug_on THEN
596: WSH_DEBUG_SV.log(l_module_name,'After create_code_assignment l_return_status',l_return_status);
597: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
598: WSH_DEBUG_SV.log(l_module_name,'exception_message',exception_message);
599: WSH_DEBUG_SV.log(l_module_name,'l_code_assignment_id',l_code_assignment_id);
600: END IF;
601:
602: wsh_util_core.api_post_call(
603: p_return_status => l_return_status,
612: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
613: END IF;
614:
615: IF l_debug_on THEN
616: WSH_DEBUG_SV.pop(l_module_name);
617: END IF;
618:
619: RETURN l_party_id;
620:
622: WHEN FND_API.G_EXC_ERROR THEN
623: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
624:
625: IF l_debug_on THEN
626: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
627: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
628: END IF;
629:
630: RETURN null;
623: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
624:
625: IF l_debug_on THEN
626: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
627: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
628: END IF;
629:
630: RETURN null;
631:
632: WHEN OTHERS THEN
633: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
634:
635: IF l_debug_on THEN
636: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
637: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
638: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
639: END IF;
640:
633: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
634:
635: IF l_debug_on THEN
636: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
637: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
638: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
639: END IF;
640:
641: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
634:
635: IF l_debug_on THEN
636: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
637: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
638: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
639: END IF;
640:
641: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
642: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
706:
707: BEGIN
708: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
709: IF l_debug_on IS NULL THEN
710: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
711: END IF;
712:
713: IF l_debug_on THEN
714: WSH_DEBUG_SV.push(l_module_name);
710: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
711: END IF;
712:
713: IF l_debug_on THEN
714: WSH_DEBUG_SV.push(l_module_name);
715: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
716: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
711: END IF;
712:
713: IF l_debug_on THEN
714: WSH_DEBUG_SV.push(l_module_name);
715: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
716: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
712:
713: IF l_debug_on THEN
714: WSH_DEBUG_SV.push(l_module_name);
715: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
716: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
713: IF l_debug_on THEN
714: WSH_DEBUG_SV.push(l_module_name);
715: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
716: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
714: WSH_DEBUG_SV.push(l_module_name);
715: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
716: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
715: WSH_DEBUG_SV.log(l_module_name,'P_location_id',P_location_id);
716: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
723: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
716: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
723: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
724: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
717: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
723: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
724: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
725: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
718: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
723: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
724: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
725: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
726: END IF;
719: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
723: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
724: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
725: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
726: END IF;
727:
720: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
723: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
724: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
725: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
726: END IF;
727:
728: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
721: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
722: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
723: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
724: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
725: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
726: END IF;
727:
728: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
729:
756: x_msg_data => l_msg_data
757: );
758:
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.log(l_module_name,'HZ_LOCATION_V2PUB.Update_Location l_return_status',l_return_status);
761: END IF;
762:
763: wsh_util_core.api_post_call(
764: p_return_status => l_return_status,
771: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
772: END IF;
773:
774: IF l_debug_on THEN
775: WSH_DEBUG_SV.pop(l_module_name);
776: END IF;
777: EXCEPTION
778: WHEN FND_API.G_EXC_ERROR THEN
779: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
778: WHEN FND_API.G_EXC_ERROR THEN
779: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
780:
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
783: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
784: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
785: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
786: END IF;
779: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
780:
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
783: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
784: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
785: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
786: END IF;
787:
780:
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
783: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
784: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
785: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
786: END IF;
787:
788: WHEN OTHERS THEN
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
783: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
784: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
785: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
786: END IF;
787:
788: WHEN OTHERS THEN
789: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
788: WHEN OTHERS THEN
789: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
790:
791: IF l_debug_on THEN
792: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
793: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
794: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
795: END IF;
796:
789: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
790:
791: IF l_debug_on THEN
792: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
793: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
794: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
795: END IF;
796:
797: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
790:
791: IF l_debug_on THEN
792: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
793: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
794: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
795: END IF;
796:
797: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
798: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
854: l_num_errors number;
855: BEGIN
856: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
857: IF l_debug_on IS NULL THEN
858: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
859: END IF;
860:
861: IF l_debug_on THEN
862: WSH_DEBUG_SV.push(l_module_name);
858: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
859: END IF;
860:
861: IF l_debug_on THEN
862: WSH_DEBUG_SV.push(l_module_name);
863: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
864: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
859: END IF;
860:
861: IF l_debug_on THEN
862: WSH_DEBUG_SV.push(l_module_name);
863: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
864: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
860:
861: IF l_debug_on THEN
862: WSH_DEBUG_SV.push(l_module_name);
863: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
864: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
861: IF l_debug_on THEN
862: WSH_DEBUG_SV.push(l_module_name);
863: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
864: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
862: WSH_DEBUG_SV.push(l_module_name);
863: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
864: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
863: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
864: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
864: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
872: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
865: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
872: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
873: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
866: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
872: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
873: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
874: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
867: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
872: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
873: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
874: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
875: END IF;
868: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
872: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
873: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
874: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
875: END IF;
876:
869: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
872: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
873: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
874: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
875: END IF;
876:
877: IF (P_party_id IS NULL) THEN
870: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
871: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
872: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
873: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
874: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
875: END IF;
876:
877: IF (P_party_id IS NULL) THEN
878: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
943: x_msg_count => l_msg_count,
944: x_msg_data => l_msg_data);
945:
946: IF l_debug_on THEN
947: WSH_DEBUG_SV.log(l_module_name,'HZ_LOCATION_V2PUB.Create_Location l_return_status',l_return_status);
948: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
949: END IF;
950:
951: wsh_util_core.api_post_call(
944: x_msg_data => l_msg_data);
945:
946: IF l_debug_on THEN
947: WSH_DEBUG_SV.log(l_module_name,'HZ_LOCATION_V2PUB.Create_Location l_return_status',l_return_status);
948: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
949: END IF;
950:
951: wsh_util_core.api_post_call(
952: p_return_status => l_return_status,
961: x_party_site_id => x_party_site_id,
962: x_return_status => l_return_status);
963:
964: IF l_debug_on THEN
965: WSH_DEBUG_SV.log(l_module_name,'Create_HZ_Party_Site l_return_status',l_return_status);
966: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
967: END IF;
968: wsh_util_core.api_post_call(
969: p_return_status => l_return_status,
962: x_return_status => l_return_status);
963:
964: IF l_debug_on THEN
965: WSH_DEBUG_SV.log(l_module_name,'Create_HZ_Party_Site l_return_status',l_return_status);
966: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
967: END IF;
968: wsh_util_core.api_post_call(
969: p_return_status => l_return_status,
970: x_num_warnings => l_num_warnings,
977: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
978: END IF;
979:
980: IF l_debug_on THEN
981: WSH_DEBUG_SV.pop(l_module_name);
982: END IF;
983: EXCEPTION
984: WHEN FND_API.G_EXC_ERROR THEN
985: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
984: WHEN FND_API.G_EXC_ERROR THEN
985: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
986:
987: IF l_debug_on THEN
988: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
989: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
990: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
991: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
992: END IF;
985: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
986:
987: IF l_debug_on THEN
988: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
989: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
990: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
991: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
992: END IF;
993:
986:
987: IF l_debug_on THEN
988: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
989: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
990: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
991: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
992: END IF;
993:
994: WHEN OTHERS THEN
987: IF l_debug_on THEN
988: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
989: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
990: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
991: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
992: END IF;
993:
994: WHEN OTHERS THEN
995: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
994: WHEN OTHERS THEN
995: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
996:
997: IF l_debug_on THEN
998: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
999: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1000: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1001: END IF;
1002:
995: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
996:
997: IF l_debug_on THEN
998: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
999: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1000: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1001: END IF;
1002:
1003: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
996:
997: IF l_debug_on THEN
998: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
999: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1000: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1001: END IF;
1002:
1003: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1004: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1074:
1075: BEGIN
1076: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1077: IF l_debug_on IS NULL THEN
1078: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1079: END IF;
1080:
1081: IF l_debug_on THEN
1082: WSH_DEBUG_SV.push(l_module_name);
1078: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1079: END IF;
1080:
1081: IF l_debug_on THEN
1082: WSH_DEBUG_SV.push(l_module_name);
1083: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
1084: WSH_DEBUG_SV.log(l_module_name, 'p_supplier_name', p_supplier_name);
1085: END IF;
1086: --
1079: END IF;
1080:
1081: IF l_debug_on THEN
1082: WSH_DEBUG_SV.push(l_module_name);
1083: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
1084: WSH_DEBUG_SV.log(l_module_name, 'p_supplier_name', p_supplier_name);
1085: END IF;
1086: --
1087: --Validate the ISP user.
1080:
1081: IF l_debug_on THEN
1082: WSH_DEBUG_SV.push(l_module_name);
1083: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
1084: WSH_DEBUG_SV.log(l_module_name, 'p_supplier_name', p_supplier_name);
1085: END IF;
1086: --
1087: --Validate the ISP user.
1088: OPEN get_pos_user;
1092: END IF;
1093: CLOSE get_pos_user;
1094:
1095: IF l_debug_on THEN
1096: WSH_DEBUG_SV.pop(l_module_name);
1097: END IF;
1098:
1099: RETURN l_status;
1100:
1100:
1101: EXCEPTION
1102: WHEN OTHERS THEN
1103: IF l_debug_on THEN
1104: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1105: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1106: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1107: END IF;
1108: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1101: EXCEPTION
1102: WHEN OTHERS THEN
1103: IF l_debug_on THEN
1104: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1105: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1106: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1107: END IF;
1108: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1109: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1102: WHEN OTHERS THEN
1103: IF l_debug_on THEN
1104: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1105: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1106: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1107: END IF;
1108: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1109: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1110: fnd_msg_pub.add;
1151:
1152: BEGIN
1153: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1154: IF l_debug_on IS NULL THEN
1155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1156: END IF;
1157:
1158: IF l_debug_on THEN
1159: WSH_DEBUG_SV.push(l_module_name);
1155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1156: END IF;
1157:
1158: IF l_debug_on THEN
1159: WSH_DEBUG_SV.push(l_module_name);
1160: WSH_DEBUG_SV.log(l_module_name,'P_supplier_name',P_supplier_name);
1161: END IF;
1162:
1163: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1156: END IF;
1157:
1158: IF l_debug_on THEN
1159: WSH_DEBUG_SV.push(l_module_name);
1160: WSH_DEBUG_SV.log(l_module_name,'P_supplier_name',P_supplier_name);
1161: END IF;
1162:
1163: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1164:
1176: OPEN validate_vendor_csr(p_supplier_name);
1177: FETCH validate_vendor_csr INTO x_vendor_id;
1178:
1179: IF l_debug_on THEN
1180: WSH_DEBUG_SV.log(l_module_name,'x_vendor_id',x_vendor_id);
1181: END IF;
1182:
1183: IF (validate_vendor_csr%NOTFOUND) THEN
1184: CLOSE validate_vendor_csr;
1193:
1194: IF ( WSH_SUPPLIER_PARTY.VENDOR_PARTY_EXISTS(x_vendor_id,x_party_id) = 'N' ) THEN
1195: -- { IB-Phase-2
1196: IF l_debug_on THEN
1197: WSH_DEBUG_SV.log(l_module_name,'Party does not Exist for the Vendor ');
1198: END IF;
1199: --
1200: raise fnd_api.g_exc_error;
1201: -- } IB-Phase-2
1203:
1204:
1205:
1206: IF l_debug_on THEN
1207: WSH_DEBUG_SV.pop(l_module_name);
1208: END IF;
1209: EXCEPTION
1210: WHEN FND_API.G_EXC_ERROR THEN
1211: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1210: WHEN FND_API.G_EXC_ERROR THEN
1211: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1212:
1213: IF l_debug_on THEN
1214: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1215: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1216: END IF;
1217:
1218: WHEN OTHERS THEN
1211: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1212:
1213: IF l_debug_on THEN
1214: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1215: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1216: END IF;
1217:
1218: WHEN OTHERS THEN
1219: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1218: WHEN OTHERS THEN
1219: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1220:
1221: IF l_debug_on THEN
1222: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1223: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1225: END IF;
1226:
1219: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1220:
1221: IF l_debug_on THEN
1222: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1223: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1225: END IF;
1226:
1227: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1220:
1221: IF l_debug_on THEN
1222: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1223: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1225: END IF;
1226:
1227: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1228: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1259:
1260: BEGIN
1261: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1262: IF l_debug_on IS NULL THEN
1263: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1264: END IF;
1265:
1266: IF l_debug_on THEN
1267: WSH_DEBUG_SV.push(l_module_name);
1263: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1264: END IF;
1265:
1266: IF l_debug_on THEN
1267: WSH_DEBUG_SV.push(l_module_name);
1268: WSH_DEBUG_SV.log(l_module_name,'P_party_site_id',P_party_site_id);
1269: WSH_DEBUG_SV.log(l_module_name,'P_site_use_type',P_site_use_type);
1270: END IF;
1271:
1264: END IF;
1265:
1266: IF l_debug_on THEN
1267: WSH_DEBUG_SV.push(l_module_name);
1268: WSH_DEBUG_SV.log(l_module_name,'P_party_site_id',P_party_site_id);
1269: WSH_DEBUG_SV.log(l_module_name,'P_site_use_type',P_site_use_type);
1270: END IF;
1271:
1272: --Check existence of Party Site Uses.
1265:
1266: IF l_debug_on THEN
1267: WSH_DEBUG_SV.push(l_module_name);
1268: WSH_DEBUG_SV.log(l_module_name,'P_party_site_id',P_party_site_id);
1269: WSH_DEBUG_SV.log(l_module_name,'P_site_use_type',P_site_use_type);
1270: END IF;
1271:
1272: --Check existence of Party Site Uses.
1273: OPEN check_party_site_uses_crs;
1275:
1276: IF (check_party_site_uses_crs%NOTFOUND ) THEN
1277: CLOSE check_party_site_uses_crs;
1278: IF l_debug_on THEN
1279: WSH_DEBUG_SV.pop(l_module_name,'RETURN false');
1280: END IF;
1281: RETURN false;
1282: END IF;
1283:
1283:
1284: CLOSE check_party_site_uses_crs;
1285:
1286: IF l_debug_on THEN
1287: WSH_DEBUG_SV.pop(l_module_name);
1288: END IF;
1289:
1290: IF l_debug_on THEN
1291: WSH_DEBUG_SV.pop(l_module_name,'RETURN true');
1287: WSH_DEBUG_SV.pop(l_module_name);
1288: END IF;
1289:
1290: IF l_debug_on THEN
1291: WSH_DEBUG_SV.pop(l_module_name,'RETURN true');
1292: END IF;
1293: RETURN true;
1294:
1295: EXCEPTION
1294:
1295: EXCEPTION
1296: WHEN OTHERS THEN
1297: IF l_debug_on THEN
1298: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1301: END IF;
1302: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1295: EXCEPTION
1296: WHEN OTHERS THEN
1297: IF l_debug_on THEN
1298: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1301: END IF;
1302: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1303: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1296: WHEN OTHERS THEN
1297: IF l_debug_on THEN
1298: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1301: END IF;
1302: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1303: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1304: fnd_msg_pub.add;
1342:
1343: BEGIN
1344: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1345: IF l_debug_on IS NULL THEN
1346: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1347: END IF;
1348:
1349: IF l_debug_on THEN
1350: WSH_DEBUG_SV.push(l_module_name);
1346: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1347: END IF;
1348:
1349: IF l_debug_on THEN
1350: WSH_DEBUG_SV.push(l_module_name);
1351: WSH_DEBUG_SV.log(l_module_name,'P_party_site_id',P_party_site_id);
1352: WSH_DEBUG_SV.log(l_module_name,'P_site_use_type',P_site_use_type);
1353: END IF;
1354:
1347: END IF;
1348:
1349: IF l_debug_on THEN
1350: WSH_DEBUG_SV.push(l_module_name);
1351: WSH_DEBUG_SV.log(l_module_name,'P_party_site_id',P_party_site_id);
1352: WSH_DEBUG_SV.log(l_module_name,'P_site_use_type',P_site_use_type);
1353: END IF;
1354:
1355: IF (P_party_site_id IS NULL) THEN
1348:
1349: IF l_debug_on THEN
1350: WSH_DEBUG_SV.push(l_module_name);
1351: WSH_DEBUG_SV.log(l_module_name,'P_party_site_id',P_party_site_id);
1352: WSH_DEBUG_SV.log(l_module_name,'P_site_use_type',P_site_use_type);
1353: END IF;
1354:
1355: IF (P_party_site_id IS NULL) THEN
1356: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
1387: x_msg_count => l_msg_count,
1388: x_msg_data => l_msg_data);
1389:
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_SITE_V2PUB.Create_Party_Site_Use l_return_status',l_return_status);
1392: WSH_DEBUG_SV.log(l_module_name,'x_party_site_use_id',x_party_site_use_id);
1393: END IF;
1394: wsh_util_core.api_post_call(
1395: p_return_status => l_return_status,
1388: x_msg_data => l_msg_data);
1389:
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_SITE_V2PUB.Create_Party_Site_Use l_return_status',l_return_status);
1392: WSH_DEBUG_SV.log(l_module_name,'x_party_site_use_id',x_party_site_use_id);
1393: END IF;
1394: wsh_util_core.api_post_call(
1395: p_return_status => l_return_status,
1396: x_num_warnings => l_num_warnings,
1404: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1405: END IF;
1406:
1407: IF l_debug_on THEN
1408: WSH_DEBUG_SV.pop(l_module_name);
1409: END IF;
1410: EXCEPTION
1411: WHEN FND_API.G_EXC_ERROR THEN
1412: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1411: WHEN FND_API.G_EXC_ERROR THEN
1412: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1413:
1414: IF l_debug_on THEN
1415: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1416: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1417: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1418: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1419: END IF;
1412: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1413:
1414: IF l_debug_on THEN
1415: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1416: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1417: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1418: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1419: END IF;
1420:
1413:
1414: IF l_debug_on THEN
1415: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1416: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1417: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1418: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1419: END IF;
1420:
1421: WHEN OTHERS THEN
1414: IF l_debug_on THEN
1415: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1416: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1417: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1418: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1419: END IF;
1420:
1421: WHEN OTHERS THEN
1422: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1421: WHEN OTHERS THEN
1422: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1423:
1424: IF l_debug_on THEN
1425: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1426: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1427: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1428: END IF;
1429: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1422: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1423:
1424: IF l_debug_on THEN
1425: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1426: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1427: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1428: END IF;
1429: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1430: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1423:
1424: IF l_debug_on THEN
1425: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1426: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1427: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1428: END IF;
1429: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1430: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1431: fnd_msg_pub.add;
1467:
1468: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1469: IF l_debug_on IS NULL
1470: THEN
1471: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1472: END IF;
1473: --
1474: IF l_debug_on THEN
1475: WSH_DEBUG_SV.push(l_module_name);
1471: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1472: END IF;
1473: --
1474: IF l_debug_on THEN
1475: WSH_DEBUG_SV.push(l_module_name);
1476: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1477: WSH_DEBUG_SV.log(l_module_name,'p_owner_table_id',p_owner_table_id);
1478: END IF;
1479:
1472: END IF;
1473: --
1474: IF l_debug_on THEN
1475: WSH_DEBUG_SV.push(l_module_name);
1476: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1477: WSH_DEBUG_SV.log(l_module_name,'p_owner_table_id',p_owner_table_id);
1478: END IF;
1479:
1480: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1473: --
1474: IF l_debug_on THEN
1475: WSH_DEBUG_SV.push(l_module_name);
1476: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1477: WSH_DEBUG_SV.log(l_module_name,'p_owner_table_id',p_owner_table_id);
1478: END IF;
1479:
1480: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1481:
1492: l_phone_rec_type.phone_line_type := 'GEN';
1493: l_contact_points_rec_type.primary_flag := 'N';
1494:
1495: IF l_debug_on THEN
1496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit HZ_CONTACT_POINT_V2PUB.Create_Contact_Point for PHONE'
1497: ,WSH_DEBUG_SV.C_PROC_LEVEL);
1498: END IF;
1499: HZ_CONTACT_POINT_V2PUB.Create_phone_Contact_Point (
1500: p_init_msg_list => FND_API.G_FALSE,
1493: l_contact_points_rec_type.primary_flag := 'N';
1494:
1495: IF l_debug_on THEN
1496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit HZ_CONTACT_POINT_V2PUB.Create_Contact_Point for PHONE'
1497: ,WSH_DEBUG_SV.C_PROC_LEVEL);
1498: END IF;
1499: HZ_CONTACT_POINT_V2PUB.Create_phone_Contact_Point (
1500: p_init_msg_list => FND_API.G_FALSE,
1501: p_contact_point_rec => l_contact_points_rec_type,
1505: x_msg_count => l_msg_count,
1506: x_msg_data => l_msg_data);
1507:
1508: IF l_debug_on THEN
1509: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Create_phone_Contact_Point l_contact_point_id',l_contact_point_id);
1510: WSH_DEBUG_SV.log(l_module_name,'l_contact_point_id',l_contact_point_id);
1511: END IF;
1512: wsh_util_core.api_post_call(
1513: p_return_status => l_return_status,
1506: x_msg_data => l_msg_data);
1507:
1508: IF l_debug_on THEN
1509: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Create_phone_Contact_Point l_contact_point_id',l_contact_point_id);
1510: WSH_DEBUG_SV.log(l_module_name,'l_contact_point_id',l_contact_point_id);
1511: END IF;
1512: wsh_util_core.api_post_call(
1513: p_return_status => l_return_status,
1514: x_num_warnings => l_num_warnings,
1522: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1523: END IF;
1524:
1525: IF l_debug_on THEN
1526: WSH_DEBUG_SV.pop(l_module_name);
1527: END IF;
1528: EXCEPTION
1529: WHEN FND_API.G_EXC_ERROR THEN
1530: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1532: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_ERROR_CR_CONTACT');
1533: fnd_msg_pub.add;
1534:
1535: IF l_debug_on THEN
1536: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1537: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1538: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1540: END IF;
1533: fnd_msg_pub.add;
1534:
1535: IF l_debug_on THEN
1536: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1537: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1538: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1540: END IF;
1541:
1534:
1535: IF l_debug_on THEN
1536: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1537: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1538: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1540: END IF;
1541:
1542: WHEN OTHERS THEN
1535: IF l_debug_on THEN
1536: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1537: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1538: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1540: END IF;
1541:
1542: WHEN OTHERS THEN
1543: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1542: WHEN OTHERS THEN
1543: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1544:
1545: IF l_debug_on THEN
1546: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1547: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1549: END IF;
1550:
1543: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1544:
1545: IF l_debug_on THEN
1546: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1547: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1549: END IF;
1550:
1551: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1544:
1545: IF l_debug_on THEN
1546: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1547: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1549: END IF;
1550:
1551: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1552: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1628: BEGIN
1629: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1630: IF l_debug_on IS NULL
1631: THEN
1632: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1633: END IF;
1634: IF l_debug_on THEN
1635: WSH_DEBUG_SV.push(l_module_name);
1636: END IF;
1631: THEN
1632: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1633: END IF;
1634: IF l_debug_on THEN
1635: WSH_DEBUG_SV.push(l_module_name);
1636: END IF;
1637:
1638: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1639:
1650: END IF;
1651: CLOSE Get_Object_Version_Number ;
1652:
1653: IF l_debug_on THEN
1654: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit HZ_PARTY_V2PUB.Update_Person',WSH_DEBUG_SV.C_PROC_LEVEL);
1655: END IF;
1656:
1657: HZ_PARTY_V2PUB.Update_Person (
1658: p_init_msg_list => FND_API.G_FALSE,
1663: x_msg_count => l_msg_count,
1664: x_msg_data => l_msg_data);
1665:
1666: IF l_debug_on THEN
1667: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Update_Person l_return_status',l_return_status);
1668: WSH_DEBUG_SV.log(l_module_name,'x_profile_id',l_profile_id);
1669: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1670: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1671: END IF;
1664: x_msg_data => l_msg_data);
1665:
1666: IF l_debug_on THEN
1667: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Update_Person l_return_status',l_return_status);
1668: WSH_DEBUG_SV.log(l_module_name,'x_profile_id',l_profile_id);
1669: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1670: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1671: END IF;
1672:
1665:
1666: IF l_debug_on THEN
1667: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Update_Person l_return_status',l_return_status);
1668: WSH_DEBUG_SV.log(l_module_name,'x_profile_id',l_profile_id);
1669: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1670: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1671: END IF;
1672:
1673: wsh_util_core.api_post_call(
1666: IF l_debug_on THEN
1667: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Update_Person l_return_status',l_return_status);
1668: WSH_DEBUG_SV.log(l_module_name,'x_profile_id',l_profile_id);
1669: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1670: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1671: END IF;
1672:
1673: wsh_util_core.api_post_call(
1674: p_return_status => l_return_status,
1687: p_owner_table_id => p_owner_table_id,
1688: x_return_status => l_return_status);
1689:
1690: IF l_debug_on THEN
1691: WSH_DEBUG_SV.log(l_module_name,'Create_hz_phone_contact l_return_status',l_return_status);
1692: END IF;
1693: wsh_util_core.api_post_call(
1694: p_return_status => l_return_status,
1695: x_num_warnings => l_num_warnings,
1711: CLOSE Get_Cont_Point_Version ;
1712:
1713:
1714: IF l_debug_on THEN
1715: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program Unit HZ_CONTACT_POINT_V2PUB.Update_Contact_Point for Phone',WSH_DEBUG_SV.C_PROC_LEVEL);
1716: END IF;
1717:
1718: HZ_CONTACT_POINT_V2PUB.Update_Contact_Point(
1719: p_init_msg_list => FND_API.G_FALSE,
1724: x_msg_count => l_msg_count,
1725: x_msg_data => l_msg_data );
1726:
1727: IF l_debug_on THEN
1728: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Update_Contact_Point l_return_status',l_return_status);
1729: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1730: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1731: END IF;
1732: wsh_util_core.api_post_call(
1725: x_msg_data => l_msg_data );
1726:
1727: IF l_debug_on THEN
1728: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Update_Contact_Point l_return_status',l_return_status);
1729: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1730: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1731: END IF;
1732: wsh_util_core.api_post_call(
1733: p_return_status => l_return_status,
1726:
1727: IF l_debug_on THEN
1728: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Update_Contact_Point l_return_status',l_return_status);
1729: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1730: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1731: END IF;
1732: wsh_util_core.api_post_call(
1733: p_return_status => l_return_status,
1734: x_num_warnings => l_num_warnings,
1751: CLOSE Get_Cont_Point_Version ;
1752:
1753:
1754: IF l_debug_on THEN
1755: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program Unit HZ_CONTACT_POINT_V2PUB.Update_Contact_Point',WSH_DEBUG_SV.
1756: C_PROC_LEVEL);
1757: END IF;
1758:
1759: HZ_CONTACT_POINT_V2PUB.Update_Contact_Point(
1765: x_msg_count => l_msg_count,
1766: x_msg_data => l_msg_data );
1767:
1768: IF l_debug_on THEN
1769: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Update_Contact_Point l_return_status',l_return_status);
1770: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1771: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1772: END IF;
1773:
1766: x_msg_data => l_msg_data );
1767:
1768: IF l_debug_on THEN
1769: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Update_Contact_Point l_return_status',l_return_status);
1770: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1771: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1772: END IF;
1773:
1774: wsh_util_core.api_post_call(
1767:
1768: IF l_debug_on THEN
1769: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Update_Contact_Point l_return_status',l_return_status);
1770: WSH_DEBUG_SV.log(l_module_name,'l_msg_count',l_msg_count);
1771: WSH_DEBUG_SV.log(l_module_name,'l_msg_data',l_msg_data);
1772: END IF;
1773:
1774: wsh_util_core.api_post_call(
1775: p_return_status => l_return_status,
1785: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1786: END IF;
1787:
1788: IF l_debug_on THEN
1789: WSH_DEBUG_SV.pop(l_module_name);
1790: END IF;
1791: EXCEPTION
1792: WHEN FND_API.G_EXC_ERROR THEN
1793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1795: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_ERROR_UP_CONTACT');
1796: fnd_msg_pub.add;
1797:
1798: IF l_debug_on THEN
1799: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1800: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1801: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1802: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1803: END IF;
1796: fnd_msg_pub.add;
1797:
1798: IF l_debug_on THEN
1799: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1800: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1801: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1802: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1803: END IF;
1804:
1797:
1798: IF l_debug_on THEN
1799: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1800: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1801: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1802: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1803: END IF;
1804:
1805: IF (Get_Object_Version_Number%ISOPEN) THEN
1798: IF l_debug_on THEN
1799: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1800: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1801: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
1802: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1803: END IF;
1804:
1805: IF (Get_Object_Version_Number%ISOPEN) THEN
1806: CLOSE Get_Object_Version_Number;
1813: WHEN OTHERS THEN
1814: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1815:
1816: IF l_debug_on THEN
1817: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1818: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1819: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1820: END IF;
1821:
1814: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1815:
1816: IF l_debug_on THEN
1817: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1818: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1819: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1820: END IF;
1821:
1822:
1815:
1816: IF l_debug_on THEN
1817: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1818: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1819: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1820: END IF;
1821:
1822:
1823: IF (Get_Object_Version_Number%ISOPEN) THEN
1892:
1893: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1894: IF l_debug_on IS NULL
1895: THEN
1896: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1897: END IF;
1898: --
1899: IF l_debug_on THEN
1900: WSH_DEBUG_SV.push(l_module_name);
1896: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1897: END IF;
1898: --
1899: IF l_debug_on THEN
1900: WSH_DEBUG_SV.push(l_module_name);
1901: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_ID',P_PARTY_ID);
1902: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_SITE_ID',P_PARTY_SITE_ID);
1903: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
1904: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1897: END IF;
1898: --
1899: IF l_debug_on THEN
1900: WSH_DEBUG_SV.push(l_module_name);
1901: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_ID',P_PARTY_ID);
1902: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_SITE_ID',P_PARTY_SITE_ID);
1903: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
1904: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1905: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
1898: --
1899: IF l_debug_on THEN
1900: WSH_DEBUG_SV.push(l_module_name);
1901: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_ID',P_PARTY_ID);
1902: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_SITE_ID',P_PARTY_SITE_ID);
1903: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
1904: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1905: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
1906: END IF;
1899: IF l_debug_on THEN
1900: WSH_DEBUG_SV.push(l_module_name);
1901: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_ID',P_PARTY_ID);
1902: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_SITE_ID',P_PARTY_SITE_ID);
1903: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
1904: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1905: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
1906: END IF;
1907:
1900: WSH_DEBUG_SV.push(l_module_name);
1901: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_ID',P_PARTY_ID);
1902: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_SITE_ID',P_PARTY_SITE_ID);
1903: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
1904: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1905: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
1906: END IF;
1907:
1908: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1901: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_ID',P_PARTY_ID);
1902: WSH_DEBUG_SV.log(l_module_name,'P_PARTY_SITE_ID',P_PARTY_SITE_ID);
1903: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
1904: WSH_DEBUG_SV.log(l_module_name,'P_PHONE',P_PHONE);
1905: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
1906: END IF;
1907:
1908: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1909:
1911: l_per_rec.created_by_module := C_CREATED_BY_MODULE;
1912: l_per_rec.party_rec.status := 'A';
1913:
1914: IF l_debug_on THEN
1915: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit HZ_PARTY_V2PUB.Create_Person',WSH_DEBUG_SV.C_PROC_LEVEL);
1916: END IF;
1917:
1918: HZ_PARTY_V2PUB.Create_Person (
1919: p_init_msg_list => FND_API.G_FALSE,
1925: x_msg_count => l_msg_count,
1926: x_msg_data => l_msg_data);
1927:
1928: IF l_debug_on THEN
1929: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Create_Person l_return_status',l_return_status);
1930: WSH_DEBUG_SV.log(l_module_name,'l_person_party_id',l_person_party_id);
1931: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1932: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
1933: END IF;
1926: x_msg_data => l_msg_data);
1927:
1928: IF l_debug_on THEN
1929: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Create_Person l_return_status',l_return_status);
1930: WSH_DEBUG_SV.log(l_module_name,'l_person_party_id',l_person_party_id);
1931: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1932: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
1933: END IF;
1934: --
1927:
1928: IF l_debug_on THEN
1929: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Create_Person l_return_status',l_return_status);
1930: WSH_DEBUG_SV.log(l_module_name,'l_person_party_id',l_person_party_id);
1931: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1932: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
1933: END IF;
1934: --
1935: wsh_util_core.api_post_call(
1928: IF l_debug_on THEN
1929: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_V2PUB.Create_Person l_return_status',l_return_status);
1930: WSH_DEBUG_SV.log(l_module_name,'l_person_party_id',l_person_party_id);
1931: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1932: WSH_DEBUG_SV.log(l_module_name,'l_profile_id',l_profile_id);
1933: END IF;
1934: --
1935: wsh_util_core.api_post_call(
1936: p_return_status => l_return_status,
1953: l_ocon_rec.created_by_module := C_CREATED_BY_MODULE;
1954:
1955:
1956: IF l_debug_on THEN
1957: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit HZ_PARTY_CONTACT_V2PUB.create_org_contact',WSH_DEBUG_SV.C_PROC_LEVEL);
1958: END IF;
1959:
1960: HZ_PARTY_CONTACT_V2PUB.create_org_contact (
1961: p_org_contact_rec => l_ocon_rec,
1967: x_msg_count => l_msg_count,
1968: x_msg_data => l_msg_data );
1969:
1970: IF l_debug_on THEN
1971: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_CONTACT_V2PUB.create_org_contact l_return_status',l_return_status);
1972: WSH_DEBUG_SV.log(l_module_name,'l_org_contact_id',l_org_contact_id);
1973: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
1974: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
1975: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1968: x_msg_data => l_msg_data );
1969:
1970: IF l_debug_on THEN
1971: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_CONTACT_V2PUB.create_org_contact l_return_status',l_return_status);
1972: WSH_DEBUG_SV.log(l_module_name,'l_org_contact_id',l_org_contact_id);
1973: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
1974: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
1975: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1976: END IF;
1969:
1970: IF l_debug_on THEN
1971: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_CONTACT_V2PUB.create_org_contact l_return_status',l_return_status);
1972: WSH_DEBUG_SV.log(l_module_name,'l_org_contact_id',l_org_contact_id);
1973: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
1974: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
1975: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1976: END IF;
1977: wsh_util_core.api_post_call(
1970: IF l_debug_on THEN
1971: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_CONTACT_V2PUB.create_org_contact l_return_status',l_return_status);
1972: WSH_DEBUG_SV.log(l_module_name,'l_org_contact_id',l_org_contact_id);
1973: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
1974: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
1975: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1976: END IF;
1977: wsh_util_core.api_post_call(
1978: p_return_status => l_return_status,
1971: WSH_DEBUG_SV.log(l_module_name,'HZ_PARTY_CONTACT_V2PUB.create_org_contact l_return_status',l_return_status);
1972: WSH_DEBUG_SV.log(l_module_name,'l_org_contact_id',l_org_contact_id);
1973: WSH_DEBUG_SV.log(l_module_name,'l_party_relationship_id',l_party_relationship_id);
1974: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
1975: WSH_DEBUG_SV.log(l_module_name,'l_party_number',l_party_number);
1976: END IF;
1977: wsh_util_core.api_post_call(
1978: p_return_status => l_return_status,
1979: x_num_warnings => l_num_warnings,
1989: l_contact_points_rec_type.contact_point_type := 'EMAIL';
1990: l_email_rec_type.email_address := p_email;
1991:
1992: IF l_debug_on THEN
1993: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit HZ_CONTACT_POINT_V2PUB.Create_Contact_Point for EMAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
1994: END IF;
1995: HZ_CONTACT_POINT_V2PUB.Create_email_Contact_Point (
1996: p_init_msg_list => FND_API.G_FALSE,
1997: p_contact_point_rec => l_contact_points_rec_type,
2001: x_msg_count => l_msg_count,
2002: x_msg_data => l_msg_data);
2003:
2004: IF l_debug_on THEN
2005: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Create_email_Contact_Point l_return_status',l_return_status);
2006: WSH_DEBUG_SV.log(l_module_name,'l_contact_point_id',l_contact_point_id);
2007: END IF;
2008: wsh_util_core.api_post_call(
2009: p_return_status => l_return_status,
2002: x_msg_data => l_msg_data);
2003:
2004: IF l_debug_on THEN
2005: WSH_DEBUG_SV.log(l_module_name,'HZ_CONTACT_POINT_V2PUB.Create_email_Contact_Point l_return_status',l_return_status);
2006: WSH_DEBUG_SV.log(l_module_name,'l_contact_point_id',l_contact_point_id);
2007: END IF;
2008: wsh_util_core.api_post_call(
2009: p_return_status => l_return_status,
2010: x_num_warnings => l_num_warnings,
2018: p_owner_table_id => l_party_id,
2019: x_return_status => l_return_status);
2020:
2021: IF l_debug_on THEN
2022: WSH_DEBUG_SV.log(l_module_name,'Create_hz_phone_contact l_return_status',l_return_status);
2023: END IF;
2024: wsh_util_core.api_post_call(
2025: p_return_status => l_return_status,
2026: x_num_warnings => l_num_warnings,
2033: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2034: END IF;
2035:
2036: IF l_debug_on THEN
2037: WSH_DEBUG_SV.pop(l_module_name);
2038: END IF;
2039: EXCEPTION
2040: WHEN FND_API.G_EXC_ERROR THEN
2041: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2043: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_ERROR_CR_CONTACT');
2044: fnd_msg_pub.add;
2045:
2046: IF l_debug_on THEN
2047: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2048: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2049: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2050: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2051: END IF;
2044: fnd_msg_pub.add;
2045:
2046: IF l_debug_on THEN
2047: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2048: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2049: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2050: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2051: END IF;
2052:
2045:
2046: IF l_debug_on THEN
2047: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2048: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2049: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2050: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2051: END IF;
2052:
2053: WHEN OTHERS THEN
2046: IF l_debug_on THEN
2047: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2048: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2049: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2050: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2051: END IF;
2052:
2053: WHEN OTHERS THEN
2054: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2053: WHEN OTHERS THEN
2054: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2055:
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2058: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2060: END IF;
2061:
2054: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2055:
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2058: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2060: END IF;
2061:
2062: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2055:
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2058: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2060: END IF;
2061:
2062: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2063: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2170: BEGIN
2171: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2172: IF l_debug_on IS NULL
2173: THEN
2174: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2175: END IF;
2176: IF l_debug_on THEN
2177: WSH_DEBUG_SV.push(l_module_name);
2178: WSH_DEBUG_SV.log(l_module_name,'P_party_ID',P_party_ID);
2173: THEN
2174: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2175: END IF;
2176: IF l_debug_on THEN
2177: WSH_DEBUG_SV.push(l_module_name);
2178: WSH_DEBUG_SV.log(l_module_name,'P_party_ID',P_party_ID);
2179: WSH_DEBUG_SV.log(l_module_name,'P_party_site_ID',P_party_site_ID);
2180: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
2181: WSH_DEBUG_SV.log(l_module_name,'P_phone',P_phone);
2174: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2175: END IF;
2176: IF l_debug_on THEN
2177: WSH_DEBUG_SV.push(l_module_name);
2178: WSH_DEBUG_SV.log(l_module_name,'P_party_ID',P_party_ID);
2179: WSH_DEBUG_SV.log(l_module_name,'P_party_site_ID',P_party_site_ID);
2180: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
2181: WSH_DEBUG_SV.log(l_module_name,'P_phone',P_phone);
2182: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
2175: END IF;
2176: IF l_debug_on THEN
2177: WSH_DEBUG_SV.push(l_module_name);
2178: WSH_DEBUG_SV.log(l_module_name,'P_party_ID',P_party_ID);
2179: WSH_DEBUG_SV.log(l_module_name,'P_party_site_ID',P_party_site_ID);
2180: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
2181: WSH_DEBUG_SV.log(l_module_name,'P_phone',P_phone);
2182: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
2183: END IF;
2176: IF l_debug_on THEN
2177: WSH_DEBUG_SV.push(l_module_name);
2178: WSH_DEBUG_SV.log(l_module_name,'P_party_ID',P_party_ID);
2179: WSH_DEBUG_SV.log(l_module_name,'P_party_site_ID',P_party_site_ID);
2180: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
2181: WSH_DEBUG_SV.log(l_module_name,'P_phone',P_phone);
2182: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
2183: END IF;
2184:
2177: WSH_DEBUG_SV.push(l_module_name);
2178: WSH_DEBUG_SV.log(l_module_name,'P_party_ID',P_party_ID);
2179: WSH_DEBUG_SV.log(l_module_name,'P_party_site_ID',P_party_site_ID);
2180: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
2181: WSH_DEBUG_SV.log(l_module_name,'P_phone',P_phone);
2182: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
2183: END IF;
2184:
2185: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2178: WSH_DEBUG_SV.log(l_module_name,'P_party_ID',P_party_ID);
2179: WSH_DEBUG_SV.log(l_module_name,'P_party_site_ID',P_party_site_ID);
2180: WSH_DEBUG_SV.log(l_module_name,'P_PERSON_NAME',P_PERSON_NAME);
2181: WSH_DEBUG_SV.log(l_module_name,'P_phone',P_phone);
2182: WSH_DEBUG_SV.log(l_module_name,'P_EMAIL',P_EMAIL);
2183: END IF;
2184:
2185: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2186:
2194: l_relationship_id,
2195: l_relation_end_date; --IB-Phase-2
2196:
2197: IF l_debug_on THEN
2198: WSH_DEBUG_SV.log(l_module_name,'l_person_id',l_person_id);
2199: WSH_DEBUG_SV.log(l_module_name,'l_person_name',l_person_name);
2200: WSH_DEBUG_SV.log(l_module_name,'l_phone_contact_point_id',l_phone_contact_point_id);
2201: WSH_DEBUG_SV.log(l_module_name,'l_phone',l_phone);
2202: WSH_DEBUG_SV.log(l_module_name,'l_email_contact_point_id',l_email_contact_point_id);
2195: l_relation_end_date; --IB-Phase-2
2196:
2197: IF l_debug_on THEN
2198: WSH_DEBUG_SV.log(l_module_name,'l_person_id',l_person_id);
2199: WSH_DEBUG_SV.log(l_module_name,'l_person_name',l_person_name);
2200: WSH_DEBUG_SV.log(l_module_name,'l_phone_contact_point_id',l_phone_contact_point_id);
2201: WSH_DEBUG_SV.log(l_module_name,'l_phone',l_phone);
2202: WSH_DEBUG_SV.log(l_module_name,'l_email_contact_point_id',l_email_contact_point_id);
2203: WSH_DEBUG_SV.log(l_module_name,'l_email',l_email);
2196:
2197: IF l_debug_on THEN
2198: WSH_DEBUG_SV.log(l_module_name,'l_person_id',l_person_id);
2199: WSH_DEBUG_SV.log(l_module_name,'l_person_name',l_person_name);
2200: WSH_DEBUG_SV.log(l_module_name,'l_phone_contact_point_id',l_phone_contact_point_id);
2201: WSH_DEBUG_SV.log(l_module_name,'l_phone',l_phone);
2202: WSH_DEBUG_SV.log(l_module_name,'l_email_contact_point_id',l_email_contact_point_id);
2203: WSH_DEBUG_SV.log(l_module_name,'l_email',l_email);
2204: END IF;
2197: IF l_debug_on THEN
2198: WSH_DEBUG_SV.log(l_module_name,'l_person_id',l_person_id);
2199: WSH_DEBUG_SV.log(l_module_name,'l_person_name',l_person_name);
2200: WSH_DEBUG_SV.log(l_module_name,'l_phone_contact_point_id',l_phone_contact_point_id);
2201: WSH_DEBUG_SV.log(l_module_name,'l_phone',l_phone);
2202: WSH_DEBUG_SV.log(l_module_name,'l_email_contact_point_id',l_email_contact_point_id);
2203: WSH_DEBUG_SV.log(l_module_name,'l_email',l_email);
2204: END IF;
2205:
2198: WSH_DEBUG_SV.log(l_module_name,'l_person_id',l_person_id);
2199: WSH_DEBUG_SV.log(l_module_name,'l_person_name',l_person_name);
2200: WSH_DEBUG_SV.log(l_module_name,'l_phone_contact_point_id',l_phone_contact_point_id);
2201: WSH_DEBUG_SV.log(l_module_name,'l_phone',l_phone);
2202: WSH_DEBUG_SV.log(l_module_name,'l_email_contact_point_id',l_email_contact_point_id);
2203: WSH_DEBUG_SV.log(l_module_name,'l_email',l_email);
2204: END IF;
2205:
2206: IF (Get_Contact_info%NOTFOUND) THEN
2199: WSH_DEBUG_SV.log(l_module_name,'l_person_name',l_person_name);
2200: WSH_DEBUG_SV.log(l_module_name,'l_phone_contact_point_id',l_phone_contact_point_id);
2201: WSH_DEBUG_SV.log(l_module_name,'l_phone',l_phone);
2202: WSH_DEBUG_SV.log(l_module_name,'l_email_contact_point_id',l_email_contact_point_id);
2203: WSH_DEBUG_SV.log(l_module_name,'l_email',l_email);
2204: END IF;
2205:
2206: IF (Get_Contact_info%NOTFOUND) THEN
2207: --Create new contact info
2213: P_email => p_email,
2214: x_return_status => l_return_status);
2215:
2216: IF l_debug_on THEN
2217: WSH_DEBUG_SV.log(l_module_name,'Create_HZ_contact l_return_status',l_return_status);
2218: END IF;
2219: wsh_util_core.api_post_call(
2220: p_return_status => l_return_status,
2221: x_num_warnings => l_num_warnings,
2240: x_msg_data => l_msg_data
2241: );
2242:
2243: IF l_debug_on THEN
2244: WSH_DEBUG_SV.log(l_module_name,'HZ_RELATIONSHIP_V2PUB.update_relationship l_return_status',l_return_status);
2245: END IF;
2246: wsh_util_core.api_post_call(
2247: p_return_status => l_return_status,
2248: x_num_warnings => l_num_warnings,
2266: p_owner_table_id => l_owner_table_id,
2267: x_return_status => l_return_status);
2268:
2269: IF l_debug_on THEN
2270: WSH_DEBUG_SV.log(l_module_name,'Update_HZ_contact l_return_status',l_return_status);
2271: END IF;
2272: wsh_util_core.api_post_call(
2273: p_return_status => l_return_status,
2274: x_num_warnings => l_num_warnings,
2282: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2283: END IF;
2284:
2285: IF l_debug_on THEN
2286: WSH_DEBUG_SV.pop(l_module_name);
2287: END IF;
2288: EXCEPTION
2289: WHEN FND_API.G_EXC_ERROR THEN
2290: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2289: WHEN FND_API.G_EXC_ERROR THEN
2290: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2291:
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2294: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2295: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2296: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2297: END IF;
2290: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2291:
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2294: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2295: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2296: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2297: END IF;
2298:
2291:
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2294: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2295: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2296: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2297: END IF;
2298:
2299: IF (Get_Contact_info%ISOPEN) THEN
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2294: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_count: '||l_msg_count,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2295: WSH_DEBUG_SV.logmsg(l_module_name,'l_msg_data: '||l_msg_data,WSH_DEBUG_SV.C_EXCEP_LEVEL);
2296: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2297: END IF;
2298:
2299: IF (Get_Contact_info%ISOPEN) THEN
2300: CLOSE Get_Contact_info;
2303: WHEN OTHERS THEN
2304: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2305:
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2308: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2309: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2310: END IF;
2311:
2304: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2305:
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2308: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2309: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2310: END IF;
2311:
2312: IF (Get_Contact_info%ISOPEN) THEN
2305:
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2308: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2309: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2310: END IF;
2311:
2312: IF (Get_Contact_info%ISOPEN) THEN
2313: CLOSE Get_Contact_info;
2374:
2375: BEGIN
2376: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2377: IF l_debug_on IS NULL THEN
2378: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2379: END IF;
2380:
2381: IF l_debug_on THEN
2382: WSH_DEBUG_SV.push(l_module_name);
2378: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2379: END IF;
2380:
2381: IF l_debug_on THEN
2382: WSH_DEBUG_SV.push(l_module_name);
2383: WSH_DEBUG_SV.log(l_module_name,'p_location_id',p_location_id);
2384: WSH_DEBUG_SV.log(l_module_name,'p_party_site_id',p_party_site_id);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2379: END IF;
2380:
2381: IF l_debug_on THEN
2382: WSH_DEBUG_SV.push(l_module_name);
2383: WSH_DEBUG_SV.log(l_module_name,'p_location_id',p_location_id);
2384: WSH_DEBUG_SV.log(l_module_name,'p_party_site_id',p_party_site_id);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2380:
2381: IF l_debug_on THEN
2382: WSH_DEBUG_SV.push(l_module_name);
2383: WSH_DEBUG_SV.log(l_module_name,'p_location_id',p_location_id);
2384: WSH_DEBUG_SV.log(l_module_name,'p_party_site_id',p_party_site_id);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2381: IF l_debug_on THEN
2382: WSH_DEBUG_SV.push(l_module_name);
2383: WSH_DEBUG_SV.log(l_module_name,'p_location_id',p_location_id);
2384: WSH_DEBUG_SV.log(l_module_name,'p_party_site_id',p_party_site_id);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2382: WSH_DEBUG_SV.push(l_module_name);
2383: WSH_DEBUG_SV.log(l_module_name,'p_location_id',p_location_id);
2384: WSH_DEBUG_SV.log(l_module_name,'p_party_site_id',p_party_site_id);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2383: WSH_DEBUG_SV.log(l_module_name,'p_location_id',p_location_id);
2384: WSH_DEBUG_SV.log(l_module_name,'p_party_site_id',p_party_site_id);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2384: WSH_DEBUG_SV.log(l_module_name,'p_party_site_id',p_party_site_id);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2385: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2386: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2394: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2387: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2394: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2395: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2388: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2394: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2395: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2396: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2389: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2394: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2395: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2396: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2397: END IF;
2390: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2394: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2395: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2396: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2397: END IF;
2398:
2391: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2394: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2395: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2396: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2397: END IF;
2398:
2399: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2392: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2393: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2394: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2395: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2396: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2397: END IF;
2398:
2399: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2400:
2414: p_country => p_country,
2415: x_return_status => l_return_status);
2416:
2417: IF l_debug_on THEN
2418: WSH_DEBUG_SV.log(l_module_name,'Update_Hz_Location l_return_status',l_return_status);
2419: END IF;
2420:
2421: wsh_util_core.api_post_call(
2422: p_return_status => l_return_status,
2430: p_caller => 'PO',
2431: x_return_status =>l_return_status);
2432:
2433: IF l_debug_on THEN
2434: WSH_DEBUG_SV.log(l_module_name,' WSH_UTIL_VALIDATE.validate_location l_return_status',l_return_status);
2435: END IF;
2436: wsh_util_core.api_post_call(
2437: p_return_status => l_return_status,
2438: x_num_warnings => l_num_warnings,
2447: P_email => p_email,
2448: x_return_status => l_return_status);
2449:
2450: IF l_debug_on THEN
2451: WSH_DEBUG_SV.log(l_module_name,'Process_HZ_contact l_return_status',l_return_status);
2452: END IF;
2453: wsh_util_core.api_post_call(
2454: p_return_status => l_return_status,
2455: x_num_warnings => l_num_warnings,
2461: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2462: END IF;
2463:
2464: IF l_debug_on THEN
2465: WSH_DEBUG_SV.pop(l_module_name);
2466: END IF;
2467: EXCEPTION
2468: WHEN FND_API.G_EXC_ERROR THEN
2469: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2471: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_ERROR_UP_LOC');
2472: fnd_msg_pub.add;
2473:
2474: IF l_debug_on THEN
2475: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2476: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2477: END IF;
2478:
2479: WHEN OTHERS THEN
2472: fnd_msg_pub.add;
2473:
2474: IF l_debug_on THEN
2475: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2476: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2477: END IF;
2478:
2479: WHEN OTHERS THEN
2480: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2479: WHEN OTHERS THEN
2480: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2481:
2482: IF l_debug_on THEN
2483: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2484: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2485: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2486: END IF;
2487:
2480: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2481:
2482: IF l_debug_on THEN
2483: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2484: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2485: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2486: END IF;
2487:
2488: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2481:
2482: IF l_debug_on THEN
2483: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2484: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2485: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2486: END IF;
2487:
2488: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2489: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2553: l_num_errors number;
2554: BEGIN
2555: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2556: IF l_debug_on IS NULL THEN
2557: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2558: END IF;
2559:
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.push(l_module_name);
2557: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2558: END IF;
2559:
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.push(l_module_name);
2562: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2563: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2558: END IF;
2559:
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.push(l_module_name);
2562: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2563: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2559:
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.push(l_module_name);
2562: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2563: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.push(l_module_name);
2562: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2563: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2561: WSH_DEBUG_SV.push(l_module_name);
2562: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2563: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2562: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2563: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2563: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2564: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2565: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2573: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2566: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2573: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2574: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2567: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2573: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2574: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2575: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2568: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2573: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2574: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2575: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2576: END IF;
2569: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2573: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2574: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2575: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2576: END IF;
2577:
2570: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2573: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2574: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2575: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2576: END IF;
2577:
2578: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2571: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2572: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2573: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2574: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2575: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2576: END IF;
2577:
2578: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2579:
2595: x_party_site_id => x_party_site_id,
2596: x_return_status => l_return_status);
2597:
2598: IF l_debug_on THEN
2599: WSH_DEBUG_SV.log(l_module_name,'Create_Hz_Location_Party_Site l_return_status',l_return_status);
2600: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2601: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
2602: END IF;
2603: wsh_util_core.api_post_call(
2596: x_return_status => l_return_status);
2597:
2598: IF l_debug_on THEN
2599: WSH_DEBUG_SV.log(l_module_name,'Create_Hz_Location_Party_Site l_return_status',l_return_status);
2600: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2601: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
2602: END IF;
2603: wsh_util_core.api_post_call(
2604: p_return_status => l_return_status,
2597:
2598: IF l_debug_on THEN
2599: WSH_DEBUG_SV.log(l_module_name,'Create_Hz_Location_Party_Site l_return_status',l_return_status);
2600: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2601: WSH_DEBUG_SV.log(l_module_name,'x_party_site_id',x_party_site_id);
2602: END IF;
2603: wsh_util_core.api_post_call(
2604: p_return_status => l_return_status,
2605: x_num_warnings => l_num_warnings,
2612: p_caller => 'PO',
2613: x_return_status =>l_return_status);
2614:
2615: IF l_debug_on THEN
2616: WSH_DEBUG_SV.log(l_module_name,' WSH_UTIL_VALIDATE.validate_location l_return_status',l_return_status);
2617: END IF;
2618: wsh_util_core.api_post_call(
2619: p_return_status => l_return_status,
2620: x_num_warnings => l_num_warnings,
2628: x_party_site_use_id => l_party_site_use_id,
2629: x_return_status => l_return_status);
2630:
2631: IF l_debug_on THEN
2632: WSH_DEBUG_SV.log(l_module_name,' Create_HZ_Party_Site_uses l_return_status',l_return_status);
2633: WSH_DEBUG_SV.log(l_module_name,'l_party_site_use_id',l_party_site_use_id);
2634: END IF;
2635: wsh_util_core.api_post_call(
2636: p_return_status => l_return_status,
2629: x_return_status => l_return_status);
2630:
2631: IF l_debug_on THEN
2632: WSH_DEBUG_SV.log(l_module_name,' Create_HZ_Party_Site_uses l_return_status',l_return_status);
2633: WSH_DEBUG_SV.log(l_module_name,'l_party_site_use_id',l_party_site_use_id);
2634: END IF;
2635: wsh_util_core.api_post_call(
2636: p_return_status => l_return_status,
2637: x_num_warnings => l_num_warnings,
2646: P_email => p_email,
2647: x_return_status => l_return_status);
2648:
2649: IF l_debug_on THEN
2650: WSH_DEBUG_SV.log(l_module_name,'Create_HZ_contact PHONE l_return_status',l_return_status);
2651: END IF;
2652: wsh_util_core.api_post_call(
2653: p_return_status => l_return_status,
2654: x_num_warnings => l_num_warnings,
2661: END IF;
2662:
2663:
2664: IF l_debug_on THEN
2665: WSH_DEBUG_SV.pop(l_module_name);
2666: END IF;
2667: EXCEPTION
2668: WHEN FND_API.G_EXC_ERROR THEN
2669: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2671: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_ERROR_CR_LOC');
2672: fnd_msg_pub.add;
2673:
2674: IF l_debug_on THEN
2675: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2676: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2677: END IF;
2678:
2679: WHEN OTHERS THEN
2672: fnd_msg_pub.add;
2673:
2674: IF l_debug_on THEN
2675: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2676: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2677: END IF;
2678:
2679: WHEN OTHERS THEN
2680: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2679: WHEN OTHERS THEN
2680: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2681:
2682: IF l_debug_on THEN
2683: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2684: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2685: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2686: END IF;
2687:
2680: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2681:
2682: IF l_debug_on THEN
2683: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2684: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2685: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2686: END IF;
2687:
2688: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2681:
2682: IF l_debug_on THEN
2683: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2684: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2685: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2686: END IF;
2687:
2688: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2689: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2712:
2713: BEGIN
2714: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2715: IF l_debug_on IS NULL THEN
2716: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2717: END IF;
2718:
2719: IF l_debug_on THEN
2720: WSH_DEBUG_SV.push(l_module_name);
2716: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2717: END IF;
2718:
2719: IF l_debug_on THEN
2720: WSH_DEBUG_SV.push(l_module_name);
2721: END IF;
2722:
2723: FND_MESSAGE.SET_NAME('WSH','WSH_SAB_ADDRESS_ERROR');
2724: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_line_number);
2724: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',g_line_number);
2725: fnd_msg_pub.add;
2726:
2727: IF l_debug_on THEN
2728: WSH_DEBUG_SV.log(l_module_name,'Message Count:',FND_MSG_PUB.Count_Msg);
2729: END IF;
2730:
2731:
2732: FOR i IN 1..FND_MSG_PUB.Count_Msg LOOP
2731:
2732: FOR i IN 1..FND_MSG_PUB.Count_Msg LOOP
2733: l_msg := FND_MSG_PUB.get(i, FND_API.G_FALSE);
2734: IF l_debug_on THEN
2735: WSH_DEBUG_SV.log(l_module_name,'Stack Message :',l_msg);
2736: END IF;
2737:
2738: g_error_tbl(g_error_tbl.count + 1) := l_msg;
2739: END LOOP;
2738: g_error_tbl(g_error_tbl.count + 1) := l_msg;
2739: END LOOP;
2740:
2741: IF l_debug_on THEN
2742: WSH_DEBUG_SV.log(l_module_name,'After Message Count:',FND_MSG_PUB.Count_Msg);
2743: END IF;
2744:
2745: --Initialized the FND message to avoid duplicate message being
2746: --inserted to local message table.
2746: --inserted to local message table.
2747: FND_MSG_PUB.initialize;
2748:
2749: IF l_debug_on THEN
2750: WSH_DEBUG_SV.pop(l_module_name);
2751: END IF;
2752: EXCEPTION
2753: WHEN OTHERS THEN
2754: IF l_debug_on THEN
2751: END IF;
2752: EXCEPTION
2753: WHEN OTHERS THEN
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2756: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2757: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2758: END IF;
2759:
2752: EXCEPTION
2753: WHEN OTHERS THEN
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2756: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2757: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2758: END IF;
2759:
2760: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2753: WHEN OTHERS THEN
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2756: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2757: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2758: END IF;
2759:
2760: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2761: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2823:
2824: BEGIN
2825: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2826: IF l_debug_on IS NULL THEN
2827: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2828: END IF;
2829:
2830: IF l_debug_on THEN
2831: WSH_DEBUG_SV.push(l_module_name);
2827: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2828: END IF;
2829:
2830: IF l_debug_on THEN
2831: WSH_DEBUG_SV.push(l_module_name);
2832: WSH_DEBUG_SV.log(l_module_name,'P_Address.count',P_Address.supplier_name.count);
2833: WSH_DEBUG_SV.log(l_module_name,'x_error_tbl.count',x_error_tbl.count);
2834: END IF;
2835:
2828: END IF;
2829:
2830: IF l_debug_on THEN
2831: WSH_DEBUG_SV.push(l_module_name);
2832: WSH_DEBUG_SV.log(l_module_name,'P_Address.count',P_Address.supplier_name.count);
2833: WSH_DEBUG_SV.log(l_module_name,'x_error_tbl.count',x_error_tbl.count);
2834: END IF;
2835:
2836: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2829:
2830: IF l_debug_on THEN
2831: WSH_DEBUG_SV.push(l_module_name);
2832: WSH_DEBUG_SV.log(l_module_name,'P_Address.count',P_Address.supplier_name.count);
2833: WSH_DEBUG_SV.log(l_module_name,'x_error_tbl.count',x_error_tbl.count);
2834: END IF;
2835:
2836: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2837: l_num_errors := 0;
2874: x_party_id => l_party_id,
2875: x_return_status => l_return_status);
2876:
2877: IF l_debug_on THEN
2878: WSH_DEBUG_SV.log(l_module_name,'Validate_Supplier l_return_status',l_return_status);
2879: WSH_DEBUG_SV.log(l_module_name,'l_vendor_id',l_vendor_id);
2880: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
2881: END IF;
2882: wsh_util_core.api_post_call(p_return_status =>l_return_status,
2875: x_return_status => l_return_status);
2876:
2877: IF l_debug_on THEN
2878: WSH_DEBUG_SV.log(l_module_name,'Validate_Supplier l_return_status',l_return_status);
2879: WSH_DEBUG_SV.log(l_module_name,'l_vendor_id',l_vendor_id);
2880: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
2881: END IF;
2882: wsh_util_core.api_post_call(p_return_status =>l_return_status,
2883: x_num_warnings =>l_num_warning,
2876:
2877: IF l_debug_on THEN
2878: WSH_DEBUG_SV.log(l_module_name,'Validate_Supplier l_return_status',l_return_status);
2879: WSH_DEBUG_SV.log(l_module_name,'l_vendor_id',l_vendor_id);
2880: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
2881: END IF;
2882: wsh_util_core.api_post_call(p_return_status =>l_return_status,
2883: x_num_warnings =>l_num_warning,
2884: x_num_errors =>l_num_errors);
2889: FETCH check_location_csr INTO l_location_id,l_party_site_id,l_party_site_status;-- IB-phase-2
2890:
2891: IF (check_location_csr%FOUND) THEN --{
2892: IF l_debug_on THEN
2893: WSH_DEBUG_SV.log(l_module_name,'Location Found action',P_Address.action(l_index));
2894: END IF;
2895:
2896: --For existing record action should not be Insert.
2897: IF (P_Address.action(l_index) = 'I' ) THEN
2935: p_email => p_Address.email(l_index),
2936: x_return_status => l_return_status);
2937:
2938: IF l_debug_on THEN
2939: WSH_DEBUG_SV.log(l_module_name,'Update_Address l_return_status',l_return_status);
2940: END IF;
2941:
2942: wsh_util_core.api_post_call(p_return_status =>l_return_status,
2943: x_num_warnings =>l_num_warning,
2944: x_num_errors =>l_num_errors);
2945:
2946: ELSE --}{
2947: IF l_debug_on THEN
2948: WSH_DEBUG_SV.log(l_module_name,'Location NOT Found action',P_Address.action(l_index));
2949: END IF;
2950: IF (P_Address.action(l_index) = 'U' ) THEN
2951:
2952: --For new record action should not be Update.
2981: x_return_status => l_return_status);
2982:
2983:
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.log(l_module_name,'Create_Address l_return_status',l_return_status);
2986: WSH_DEBUG_SV.log(l_module_name,'l_location_id',l_location_id);
2987: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2988: END IF;
2989:
2982:
2983:
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.log(l_module_name,'Create_Address l_return_status',l_return_status);
2986: WSH_DEBUG_SV.log(l_module_name,'l_location_id',l_location_id);
2987: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2988: END IF;
2989:
2990: wsh_util_core.api_post_call(p_return_status =>l_return_status,
2983:
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.log(l_module_name,'Create_Address l_return_status',l_return_status);
2986: WSH_DEBUG_SV.log(l_module_name,'l_location_id',l_location_id);
2987: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2988: END IF;
2989:
2990: wsh_util_core.api_post_call(p_return_status =>l_return_status,
2991: x_num_warnings =>l_num_warning,
3002:
3003: EXCEPTION
3004: WHEN FND_API.G_EXC_ERROR THEN
3005: IF l_debug_on THEN
3006: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR in the loop');
3007: END IF;
3008: get_message;
3009:
3010: IF (check_location_csr%ISOPEN) THEN
3012: END IF;
3013:
3014: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3015: IF l_debug_on THEN
3016: wsh_debug_sv.log (l_module_name, 'G_EXC_UNEXPECTED_ERROR in the loop');
3017: END IF;
3018: get_message;
3019:
3020: IF (check_location_csr%ISOPEN) THEN
3046:
3047:
3048:
3049: IF l_debug_on THEN
3050: WSH_DEBUG_SV.pop(l_module_name);
3051: END IF;
3052: EXCEPTION
3053: WHEN OTHERS THEN
3054: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3053: WHEN OTHERS THEN
3054: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3055:
3056: IF l_debug_on THEN
3057: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3058: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3060: END IF;
3061:
3054: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3055:
3056: IF l_debug_on THEN
3057: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3058: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3060: END IF;
3061:
3062: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3055:
3056: IF l_debug_on THEN
3057: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3058: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3060: END IF;
3061:
3062: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3063: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);