DBA Data[Home] [Help]

APPS.WSH_PARTY_MERGE dependencies on FND_API

Line 66: x_return_status := FND_API.G_RET_STS_ERROR;

62: l_return_Status VARCHAR2(1);
63: --
64: BEGIN
65:
66: x_return_status := FND_API.G_RET_STS_ERROR;
67:
68: IF (p_from_fk_id = p_to_fk_id) THEN
69: p_to_id := p_from_id;
70: RETURN;

Line 81: x_return_status := FND_API.G_RET_STS_ERROR;

77: FETCH C_Carriers INTO l_from_carrier_num;
78: CLOSE C_Carriers;
79:
80: IF ( l_from_carrier_num > 0 ) THEN
81: x_return_status := FND_API.G_RET_STS_ERROR;
82: FND_MESSAGE.SET_NAME('WSH','WSH_CARRIER_NO_MERGE');
83: FND_MSG_PUB.ADD;
84: RETURN;
85: END IF;

Line 135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

131: EXCEPTION WHEN OTHERS THEN
132: FND_MESSAGE.SET_NAME('AR','HZ_API_OTHERS_EXCEP');
133: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
134: FND_MSG_PUB.ADD;
135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
136:
137: END merge_carriers;
138:
139: --========================================================================

Line 187: x_return_status := FND_API.G_RET_STS_ERROR;

183: FETCH C_Carrier_Sites INTO l_from_carrier_site_num;
184: CLOSE C_Carrier_Sites;
185:
186: IF ( l_from_carrier_site_num > 0 ) THEN
187: x_return_status := FND_API.G_RET_STS_ERROR;
188: FND_MESSAGE.SET_NAME('WSH','WSH_CARRIER_SITE_NO_MERGE');
189: FND_MSG_PUB.ADD;
190: RETURN;
191: END IF;

Line 200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

196: EXCEPTION WHEN OTHERS THEN
197: FND_MESSAGE.SET_NAME('AR','HZ_API_OTHERS_EXCEP');
198: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
199: FND_MSG_PUB.ADD;
200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
201:
202: END merge_carrier_sites;
203:
204: --========================================================================

Line 239: x_return_status := FND_API.G_RET_STS_SUCCESS;

235: --l_owner_type NUMBER;
236: l_dup_rowid NUMBER;
237:
238: BEGIN
239: x_return_status := FND_API.G_RET_STS_SUCCESS;
240:
241:
242: OPEN c_populate_data(p_from_pk);
243: FETCH c_populate_data INTO l_location_id;

Line 332: x_return_status := FND_API.G_RET_STS_SUCCESS;

328: RESOURCE_BUSY EXCEPTION;
329: PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -0054);
330:
331: BEGIN
332: x_return_status := FND_API.G_RET_STS_SUCCESS;
333:
334: /* If the parent has NOT change then nothing needs to be done
335: Set Merged To Id is same as Merged From Id
336: */

Line 348: x_return_status := FND_API.G_RET_STS_ERROR;

344: FETCH C_Owner_Type INTO l_owner_type_from;
345: CLOSE C_Owner_Type;
346:
347: IF (l_owner_type_from=3) THEN
348: x_return_status := FND_API.G_RET_STS_ERROR;
349: FND_MESSAGE.SET_NAME('WSH','WSH_CARRIER_SITE_NO_MERGE');
350: FND_MSG_PUB.ADD;
351: RETURN;
352: END IF;

Line 374: x_return_status := FND_API.G_RET_STS_ERROR;

370: END IF;
371: END IF;
372: CLOSE C_Owner_Type;
373: IF (l_owner_type_to=3) THEN
374: x_return_status := FND_API.G_RET_STS_ERROR;
375: FND_MESSAGE.SET_NAME('WSH','WSH_CARRIER_SITE_NO_MERGE');
376: FND_MSG_PUB.ADD;
377: RETURN;
378: END IF;

Line 385: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

381: p_to_party_id => p_To_fk_id,
382: x_dup_rec_pk => x_dup_pk,
383: x_return_status => x_return_status);
384:
385: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
386:
387: IF (x_dup_pk = -1) THEN
388: -- Duplicate row does not exist.
389:

Line 418: raise FND_API.G_EXC_UNEXPECTED_ERROR;

414: p_to_id := x_dup_pk;
415: RETURN;
416: END IF;
417: ELSE
418: raise FND_API.G_EXC_UNEXPECTED_ERROR;
419: END IF;
420:
421: EXCEPTION
422: WHEN RESOURCE_BUSY THEN

Line 426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

422: WHEN RESOURCE_BUSY THEN
423: FND_MESSAGE.SET_NAME('WSH','WSH_NO_LOCK');
424: FND_MSG_PUB.ADD;
425: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
427: FND_MESSAGE.SET_NAME('AR','HZ_API_OTHERS_EXCEP');
428: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
429: FND_MSG_PUB.ADD;
430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

426: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
427: FND_MESSAGE.SET_NAME('AR','HZ_API_OTHERS_EXCEP');
428: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
429: FND_MSG_PUB.ADD;
430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
431: WHEN others THEN
432: IF C_Owner_Type%ISOPEN THEN
433: CLOSE C_Owner_Type;
434: END IF;

Line 444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

440: END IF;
441: FND_MESSAGE.SET_NAME('AR','HZ_API_OTHERS_EXCEP');
442: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
443: FND_MSG_PUB.ADD;
444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
445: END merge_party_locations;
446:
447: --========================================================================
448: -- PROCEDURE : Merge_supplier_sf_sites

Line 520: x_return_status := FND_API.G_RET_STS_SUCCESS;

516: WSH_DEBUG_SV.log(l_module_name, 'p_batch_id', p_batch_id);
517: WSH_DEBUG_SV.log(l_module_name, 'p_batch_party_id', p_batch_party_id);
518: END IF;
519: --
520: x_return_status := FND_API.G_RET_STS_SUCCESS;
521: --
522: IF p_from_FK_id = p_to_FK_id THEN
523: --
524: x_to_id:=p_from_id;

Line 668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

664: WHEN OTHERS THEN
665: FND_MESSAGE.SET_NAME('AR','HZ_API_OTHERS_EXCEP');
666: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
667: FND_MSG_PUB.ADD;
668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
669: --
670: IF l_debug_on THEN
671: WSH_DEBUG_SV.log(l_module_name, 'In When Others, Error Msg is', SUBSTRB(SQLERRM, 1, 200));
672: WSH_DEBUG_SV.log(l_module_name, 'x_return_Status', x_return_status);

Line 934: x_return_status := FND_API.G_RET_STS_SUCCESS;

930: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'Adjust_Weight_Volume';
931: --
932: BEGIN
933:
934: x_return_status := FND_API.G_RET_STS_SUCCESS;
935: --
936: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
937: --
938: IF l_debug_on IS NULL

Line 1048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1044: END IF;
1045: --
1046:
1047: WHEN OTHERS THEN
1048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1049: --
1050: IF l_debug_on THEN
1051: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected Error in Adjust_Weight_Volume');
1052: WSH_DEBUG_SV.log(l_module_name, 'Error Code', sqlcode);

Line 1104: x_return_status := FND_API.G_RET_STS_SUCCESS;

1100: --
1101: --
1102: BEGIN
1103:
1104: x_return_status := FND_API.G_RET_STS_SUCCESS;
1105: --
1106: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1107: --
1108: IF l_debug_on IS NULL

Line 1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1220: END IF;
1221: --
1222:
1223: WHEN OTHERS THEN
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1225: --
1226: IF l_debug_on THEN
1227: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected Error in Adjust_Parent_WV');
1228: WSH_DEBUG_SV.log(l_module_name, 'Error Code', sqlcode);

Line 1820: x_return_status := FND_API.G_RET_STS_SUCCESS;

1816: --
1817:
1818: BEGIN
1819:
1820: x_return_status := FND_API.G_RET_STS_SUCCESS;
1821: --
1822: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1823: --
1824: IF l_debug_on IS NULL

Line 1857: x_return_status := FND_API.G_RET_STS_ERROR;

1853: IF l_debug_on THEN
1854: WSH_DEBUG_SV.log(l_module_name, 'Invaild To Party Site Id', p_to_fk_id);
1855: END IF;
1856: --
1857: x_return_status := FND_API.G_RET_STS_ERROR;
1858: CLOSE Get_Location_Id;
1859: RAISE Merge_Location_Exp;
1860: END IF; -- }
1861: CLOSE Get_Location_Id;

Line 1874: x_return_status := FND_API.G_RET_STS_ERROR;

1870: IF l_debug_on THEN
1871: WSH_DEBUG_SV.log(l_module_name, 'Invalid From Party Site Id', p_from_fk_id);
1872: END IF;
1873: --
1874: x_return_status := FND_API.G_RET_STS_ERROR;
1875: CLOSE Get_Location_Id;
1876: RAISE Merge_Location_Exp;
1877: END IF; -- }
1878: CLOSE Get_Location_Id;

Line 1892: x_return_status := FND_API.G_RET_STS_SUCCESS;

1888:
1889: -- If FROM and TO Locations are same return Success.
1890: IF ( l_from_location_id = l_to_location_id )
1891: THEN
1892: x_return_status := FND_API.G_RET_STS_SUCCESS;
1893: --
1894: IF l_debug_on THEN
1895: WSH_DEBUG_SV.log(l_module_name, 'From and To Location IDs are the same');
1896: WSH_DEBUG_SV.pop(l_module_name);

Line 2525: p_init_msg_list => FND_API.G_TRUE,

2521: --
2522:
2523: WSH_DELIVERIES_GRP.Delivery_Action (
2524: p_api_version_number => 1.0,
2525: p_init_msg_list => FND_API.G_TRUE,
2526: p_commit => FND_API.G_FALSE,
2527: p_action_prms => l_del_action_prms,
2528: p_rec_attr_tab => l_del_attrs,
2529: x_delivery_out_rec => l_del_action_rec,

Line 2526: p_commit => FND_API.G_FALSE,

2522:
2523: WSH_DELIVERIES_GRP.Delivery_Action (
2524: p_api_version_number => 1.0,
2525: p_init_msg_list => FND_API.G_TRUE,
2526: p_commit => FND_API.G_FALSE,
2527: p_action_prms => l_del_action_prms,
2528: p_rec_attr_tab => l_del_attrs,
2529: x_delivery_out_rec => l_del_action_rec,
2530: x_defaults_rec => l_del_defaults,

Line 2829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2825: WHEN OTHERS THEN
2826: FND_MESSAGE.SET_NAME('AR','HZ_API_OTHERS_EXCEP');
2827: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2828: FND_MSG_PUB.ADD;
2829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2830:
2831: -- Close the Cursors if it is OPEN
2832: IF ( Get_Location_Id %ISOPEN ) THEN
2833: CLOSE Get_Location_Id ;