eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IBE_CUSTOMER_ACCT_PVT dependencies on FND_API

Line 5: l_true VARCHAR2(1) := FND_API.G_TRUE;

1: PACKAGE BODY IBE_CUSTOMER_ACCT_PVT AS
2: /* $Header: IBEVCACB.pls 120.4.12020000.2 2012/11/12 06:32:18 nsatyava ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'IBE_CUSTOMER_ACCT_PVT';
5: l_true VARCHAR2(1) := FND_API.G_TRUE;
6:
7: PROCEDURE GetPartySiteId(
8: p_api_version_number IN NUMBER,
9: p_init_msg_list IN VARCHAR2,

Line 118: IF NOT FND_API.Compatible_API_Call (l_api_version,

114: -- Standard Start of API savepoint
115: SAVEPOINT CUSTACCT_GETPARTYSITEID;
116:
117: -- Standard call to check for call compatibility.
118: IF NOT FND_API.Compatible_API_Call (l_api_version,
119: P_Api_Version_Number,
120: l_api_name,
121: G_PKG_NAME )
122: THEN

Line 123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

119: P_Api_Version_Number,
120: l_api_name,
121: G_PKG_NAME )
122: THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
124: END IF;
125:
126: -- Initialize message list if p_init_msg_list is set to TRUE.
127: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 127: IF FND_API.To_Boolean( p_init_msg_list ) THEN

123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
124: END IF;
125:
126: -- Initialize message list if p_init_msg_list is set to TRUE.
127: IF FND_API.To_Boolean( p_init_msg_list ) THEN
128: FND_Msg_Pub.initialize;
129: END IF;
130:
131: -- Initialize API return status to success

Line 132: x_return_status := FND_API.G_RET_STS_SUCCESS;

128: FND_Msg_Pub.initialize;
129: END IF;
130:
131: -- Initialize API return status to success
132: x_return_status := FND_API.G_RET_STS_SUCCESS;
133:
134: -- Start OF API body --
135:
136: IF (p_site_use_type = 'SHIP_TO') THEN

Line 163: IF FND_API.to_Boolean( p_commit )

159: -- End of API body
160: --
161:
162: -- Standard check for p_commit
163: IF FND_API.to_Boolean( p_commit )
164: THEN
165: COMMIT WORK;
166: END IF;
167:

Line 177: WHEN FND_API.G_EXC_ERROR THEN

173: Ibe_Util.debug('End IBE_CUSTOMER_ACCT_PVT:GetPartySiteId');
174: END IF;
175:
176: EXCEPTION
177: WHEN FND_API.G_EXC_ERROR THEN
178: ROLLBACK TO CUSTACCT_GETPARTYSITEID;
179: x_return_status := FND_API.G_RET_STS_ERROR;
180: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
181: p_count => x_msg_count ,

Line 179: x_return_status := FND_API.G_RET_STS_ERROR;

175:
176: EXCEPTION
177: WHEN FND_API.G_EXC_ERROR THEN
178: ROLLBACK TO CUSTACCT_GETPARTYSITEID;
179: x_return_status := FND_API.G_RET_STS_ERROR;
180: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
181: p_count => x_msg_count ,
182: p_data => x_msg_data);
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 180: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

176: EXCEPTION
177: WHEN FND_API.G_EXC_ERROR THEN
178: ROLLBACK TO CUSTACCT_GETPARTYSITEID;
179: x_return_status := FND_API.G_RET_STS_ERROR;
180: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
181: p_count => x_msg_count ,
182: p_data => x_msg_data);
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
184: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:GetPartySiteId()'|| sqlerrm);

Line 187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
184: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:GetPartySiteId()'|| sqlerrm);
185: END IF;
186:
187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
188: ROLLBACK TO CUSTACCT_GETPARTYSITEID;
189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
190: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
191: p_count => x_msg_count ,

Line 189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

185: END IF;
186:
187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
188: ROLLBACK TO CUSTACCT_GETPARTYSITEID;
189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
190: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
191: p_count => x_msg_count ,
192: p_data => x_msg_data);
193: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 190: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

186:
187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
188: ROLLBACK TO CUSTACCT_GETPARTYSITEID;
189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
190: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
191: p_count => x_msg_count ,
192: p_data => x_msg_data);
193: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
194: IBE_Util.Debug('UNEXPECTEDErr IBE_CUSTOMER_ACCT_PVT:GetPartySiteId()' || sqlerrm);

Line 199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

195: END IF;
196:
197: WHEN OTHERS THEN
198: ROLLBACK TO CUSTACCT_GETPARTYSITEID;
199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
200: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
201: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
202: L_API_NAME);
203: END IF;

Line 204: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

200: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
201: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
202: L_API_NAME);
203: END IF;
204: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
205: p_count => x_msg_count ,
206: p_data => x_msg_data);
207: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
208: IBE_Util.Debug('OtherExc IBE_CUSTOMER_ACCT_PVT:GetPartySiteId' || sqlerrm);

Line 229: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

225: IS
226:
227: l_party_site_use_rec HZ_PARTY_SITE_V2PUB.Party_Site_Use_Rec_Type;
228: --## l_party_site_use_rec HZ_PARTY_PUB.Party_Site_Use_Rec_Type;
229: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
230: l_party_site_use_id NUMBER;
231:
232: l_return_values varchar2(2000);
233: l_api_version NUMBER := 1.0;

Line 248: IF NOT FND_API.Compatible_API_Call (l_api_version,

244: -- Standard Start of API savepoint
245: SAVEPOINT CUSTACCT_CREATEPARTYSITEUSE;
246:
247: -- Standard call to check for call compatibility.
248: IF NOT FND_API.Compatible_API_Call (l_api_version,
249: P_Api_Version_Number,
250: l_api_name,
251: G_PKG_NAME )
252: THEN

Line 253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

249: P_Api_Version_Number,
250: l_api_name,
251: G_PKG_NAME )
252: THEN
253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
254: END IF;
255:
256: -- Initialize message list if p_init_msg_list is set to TRUE.
257: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 257: IF FND_API.To_Boolean( p_init_msg_list ) THEN

253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
254: END IF;
255:
256: -- Initialize message list if p_init_msg_list is set to TRUE.
257: IF FND_API.To_Boolean( p_init_msg_list ) THEN
258: FND_Msg_Pub.initialize;
259: END IF;
260:
261: -- Initialize API return status to success

Line 262: x_return_status := FND_API.G_RET_STS_SUCCESS;

258: FND_Msg_Pub.initialize;
259: END IF;
260:
261: -- Initialize API return status to success
262: x_return_status := FND_API.G_RET_STS_SUCCESS;
263:
264: -- Start OF API body --
265:
266: l_party_site_use_rec.party_site_id := p_party_site_id;

Line 270: p_init_msg_list => FND_API.G_FALSE,

266: l_party_site_use_rec.party_site_id := p_party_site_id;
267: l_party_site_use_rec.site_use_type := p_party_site_use_type;
268:
269: HZ_PARTY_SITE_V2PUB.create_party_site_use (
270: p_init_msg_list => FND_API.G_FALSE,
271: p_party_site_use_rec => l_party_site_use_rec,
272: x_party_site_use_id => l_party_site_use_id,
273: x_return_status => x_return_status,
274: x_msg_count => x_msg_count,

Line 283: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

279: Ibe_Util.debug('create_pty_site_use:after create_pty_site_use:x_party_site_use_id: ' || x_party_site_use_id);
280: Ibe_Util.debug('create_pty_site_use:after create_pty_site_use:x_return_status: ' || x_return_status);
281: END IF;
282:
283: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
284: x_party_site_use_id := l_party_site_use_id;
285: ELSE
286: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
287: Ibe_Util.debug('Exception in Hz Create_Party_Site_Use: '|| x_msg_data);

Line 289: RAISE FND_API.G_EXC_ERROR;

285: ELSE
286: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
287: Ibe_Util.debug('Exception in Hz Create_Party_Site_Use: '|| x_msg_data);
288: ENd IF;
289: RAISE FND_API.G_EXC_ERROR;
290: END IF;
291:
292: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
293: Ibe_Util.debug('End IBE_CUSTOMER_ACCT_PVT:Create_Party_Site_Use');

Line 301: IF FND_API.to_Boolean( p_commit )

297: -- End of API body
298: --
299:
300: -- Standard check for p_commit
301: IF FND_API.to_Boolean( p_commit )
302: THEN
303: COMMIT WORK;
304: END IF;
305:

Line 311: WHEN FND_API.G_EXC_ERROR THEN

307: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
308: p_data => x_msg_data);
309:
310: EXCEPTION
311: WHEN FND_API.G_EXC_ERROR THEN
312: ROLLBACK TO CUSTACCT_CREATEPARTYSITEUSE;
313: x_return_status := FND_API.G_RET_STS_ERROR;
314: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
315: p_count => x_msg_count ,

Line 313: x_return_status := FND_API.G_RET_STS_ERROR;

309:
310: EXCEPTION
311: WHEN FND_API.G_EXC_ERROR THEN
312: ROLLBACK TO CUSTACCT_CREATEPARTYSITEUSE;
313: x_return_status := FND_API.G_RET_STS_ERROR;
314: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
315: p_count => x_msg_count ,
316: p_data => x_msg_data);
317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 314: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

310: EXCEPTION
311: WHEN FND_API.G_EXC_ERROR THEN
312: ROLLBACK TO CUSTACCT_CREATEPARTYSITEUSE;
313: x_return_status := FND_API.G_RET_STS_ERROR;
314: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
315: p_count => x_msg_count ,
316: p_data => x_msg_data);
317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
318: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Create_Party_Site_Use'|| sqlerrm);

Line 321: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

317: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
318: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Create_Party_Site_Use'|| sqlerrm);
319: END IF;
320:
321: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
322: ROLLBACK TO CUSTACCT_CREATEPARTYSITEUSE;
323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
324: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
325: p_count => x_msg_count ,

Line 323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

319: END IF;
320:
321: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
322: ROLLBACK TO CUSTACCT_CREATEPARTYSITEUSE;
323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
324: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
325: p_count => x_msg_count ,
326: p_data => x_msg_data);
327: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 324: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

320:
321: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
322: ROLLBACK TO CUSTACCT_CREATEPARTYSITEUSE;
323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
324: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
325: p_count => x_msg_count ,
326: p_data => x_msg_data);
327: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
328: IBE_Util.Debug('UNEXPECTEDErr IBE_CUSTOMER_ACCT_PVT:Create_Party_Site_Use' || sqlerrm);

Line 333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

329: END IF;
330:
331: WHEN OTHERS THEN
332: ROLLBACK TO CUSTACCT_CREATEPARTYSITEUSE;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
334: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
335: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
336: L_API_NAME);
337: END IF;

Line 338: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

334: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
335: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
336: L_API_NAME);
337: END IF;
338: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
339: p_count => x_msg_count ,
340: p_data => x_msg_data);
341: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
342: IBE_Util.Debug('OtherExc IBE_CUSTOMER_ACCT_PVT:Create_Party_Site_Use' || sqlerrm);

Line 377: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

373: FROM hz_role_responsibility
374: WHERE cust_account_role_id = role_id
375: AND responsibility_type = role_type;
376:
377: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
378: l_msg_count NUMBER :=0;
379: l_msg_data VARCHAR2(2000):='';
380: l_api_version NUMBER := 1.0;
381: l_api_name VARCHAR2(30) := 'CUSTACCT_CREATCUSTACCTROLE';

Line 394: IF NOT FND_API.Compatible_API_Call (l_api_version,

390: -- Standard Start of API savepoint
391: SAVEPOINT CUSTACCT_CREATCUSTACCTROLE;
392:
393: -- Standard call to check for call compatibility.
394: IF NOT FND_API.Compatible_API_Call (l_api_version,
395: P_Api_Version_Number,
396: l_api_name,
397: G_PKG_NAME )
398: THEN

Line 399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

395: P_Api_Version_Number,
396: l_api_name,
397: G_PKG_NAME )
398: THEN
399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
400: END IF;
401:
402: -- Initialize message list if p_init_msg_list is set to TRUE.
403: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 403: IF FND_API.To_Boolean( p_init_msg_list ) THEN

399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
400: END IF;
401:
402: -- Initialize message list if p_init_msg_list is set to TRUE.
403: IF FND_API.To_Boolean( p_init_msg_list ) THEN
404: FND_Msg_Pub.initialize;
405: END IF;
406:
407: -- Initialize API return status to success

Line 408: x_return_status := FND_API.G_RET_STS_SUCCESS;

404: FND_Msg_Pub.initialize;
405: END IF;
406:
407: -- Initialize API return status to success
408: x_return_status := FND_API.G_RET_STS_SUCCESS;
409:
410: -- Start OF API body --
411:
412: p_cust_acct_roles_rec.party_id := p_party_id;

Line 430: p_init_msg_list => FND_API.G_FALSE,

426: -- hz_customer_accounts_pub.create_cust_acct_roles.
427:
428:
429: HZ_CUST_ACCOUNT_ROLE_V2PUB.create_cust_account_role (
430: p_init_msg_list => FND_API.G_FALSE,
431: p_cust_account_role_rec => p_cust_acct_roles_rec,
432: x_cust_account_role_id => x_cust_acct_role_id,
433: x_return_status => l_return_status,
434: x_msg_count => l_msg_count,

Line 442: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

438: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
439: IBE_Util.debug('create_contact_role:after create_cust_acct_role: x_return_status: '||l_return_status);
440: END IF;
441:
442: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
443: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
444: IBE_Util.debug('Exception in HZ create_cust_account_role: '||l_msg_data);
445: END IF;
446: RAISE FND_API.G_EXC_ERROR;

Line 446: RAISE FND_API.G_EXC_ERROR;

442: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
443: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
444: IBE_Util.debug('Exception in HZ create_cust_account_role: '||l_msg_data);
445: END IF;
446: RAISE FND_API.G_EXC_ERROR;
447: END IF;
448:
449: -- Setting Responsibility id for newly created role id.
450:

Line 452: x_cust_acct_role_id <> FND_API.G_MISS_NUM)

448:
449: -- Setting Responsibility id for newly created role id.
450:
451: IF (x_cust_acct_role_id is not null AND
452: x_cust_acct_role_id <> FND_API.G_MISS_NUM)
453: THEN
454:
455: OPEN C_Get_Resp(x_cust_acct_role_id, p_role_type);
456: FETCH C_Get_Resp INTO l_responsibility_id;

Line 463: p_cust_acct_site_id <> FND_API.G_MISS_NUM

459: END IF;
460: IF C_Get_Resp%NOTFOUND THEN
461:
462: IF p_cust_acct_site_id is not NULL AND
463: p_cust_acct_site_id <> FND_API.G_MISS_NUM
464: THEN
465: p_role_resp_rec.cust_account_role_id := x_cust_acct_role_id;
466: p_role_resp_rec.responsibility_type := p_role_type;
467: p_role_resp_rec.Created_by_Module := 'IBE_CUSTOMER_DATA';

Line 474: p_init_msg_list => FND_API.G_FALSE,

470: -- HZ_CUSTOMER_ACCOUNTS_PUB.create_role_resp.
471:
472: -- version 2 API
473: HZ_CUST_ACCOUNT_ROLE_V2PUB.create_role_responsibility (
474: p_init_msg_list => FND_API.G_FALSE,
475: p_role_responsibility_rec => p_role_resp_rec,
476: x_responsibility_id => l_responsibility_id,
477: x_return_status => l_return_status,
478: x_msg_count => l_msg_count,

Line 487: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

483: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
484: IBE_Util.debug('create_contact_role:after create_role_resp: x_return_status: '||l_return_status);
485: END IF;
486:
487: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
488: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
489: IBE_Util.debug('Exception in HZ create_role_responsibility: '||l_msg_data);
490: END IF;
491: RAISE FND_API.G_EXC_ERROR;

Line 491: RAISE FND_API.G_EXC_ERROR;

487: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
488: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
489: IBE_Util.debug('Exception in HZ create_role_responsibility: '||l_msg_data);
490: END IF;
491: RAISE FND_API.G_EXC_ERROR;
492: END IF;
493:
494: END IF; --if p_cust_account_site_id is not NULL
495: END IF; -- IF C_Get_Resp%NOTFOUND THEN

Line 504: IF FND_API.to_Boolean( p_commit )

500: -- End of API body
501: --
502:
503: -- Standard check for p_commit
504: IF FND_API.to_Boolean( p_commit )
505: THEN
506: COMMIT WORK;
507: END IF;
508:

Line 519: WHEN FND_API.G_EXC_ERROR THEN

515: p_data => x_msg_data);
516:
517: EXCEPTION
518:
519: WHEN FND_API.G_EXC_ERROR THEN
520: ROLLBACK TO CUSTACCT_CREATCUSTACCTROLE;
521: x_return_status := FND_API.G_RET_STS_ERROR;
522: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
523: p_count => x_msg_count ,

Line 521: x_return_status := FND_API.G_RET_STS_ERROR;

517: EXCEPTION
518:
519: WHEN FND_API.G_EXC_ERROR THEN
520: ROLLBACK TO CUSTACCT_CREATCUSTACCTROLE;
521: x_return_status := FND_API.G_RET_STS_ERROR;
522: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
523: p_count => x_msg_count ,
524: p_data => x_msg_data);
525: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 522: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

518:
519: WHEN FND_API.G_EXC_ERROR THEN
520: ROLLBACK TO CUSTACCT_CREATCUSTACCTROLE;
521: x_return_status := FND_API.G_RET_STS_ERROR;
522: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
523: p_count => x_msg_count ,
524: p_data => x_msg_data);
525: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
526: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:create_cust_account_role()'|| sqlerrm);

Line 529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

525: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
526: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:create_cust_account_role()'|| sqlerrm);
527: END IF;
528:
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO CUSTACCT_CREATCUSTACCTROLE;
531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
532: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
533: p_count => x_msg_count ,

Line 531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

527: END IF;
528:
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO CUSTACCT_CREATCUSTACCTROLE;
531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
532: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
533: p_count => x_msg_count ,
534: p_data => x_msg_data);
535: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 532: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

528:
529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530: ROLLBACK TO CUSTACCT_CREATCUSTACCTROLE;
531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
532: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
533: p_count => x_msg_count ,
534: p_data => x_msg_data);
535: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
536: IBE_Util.Debug('UNEXPECTEDErr IBE_CUSTOMER_ACCT_PVT:create_cust_account_role' || sqlerrm);

Line 541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

537: END IF;
538:
539: WHEN OTHERS THEN
540: ROLLBACK TO CUSTACCT_CREATCUSTACCTROLE;
541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
542: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
543: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
544: L_API_NAME);
545: END IF;

Line 547: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

543: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
544: L_API_NAME);
545: END IF;
546:
547: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
548: p_count => x_msg_count ,
549: p_data => x_msg_data);
550: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
551: IBE_Util.Debug('OtherExc IBE_CUSTOMER_ACCT_PVT:create_cust_account_role)' || sqlerrm);

Line 580: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

576:
577: p_acct_site_rec HZ_CUST_ACCOUNT_SITE_V2PUB.cust_acct_site_rec_type;
578: -- ## p_acct_site_rec hz_customer_accounts_pub.acct_site_rec_type;
579: l_customer_site_id NUMBER := NULL;
580: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
581: l_msg_count NUMBER :=0;
582: l_msg_data VARCHAR2(2000):='';
583: l_api_version NUMBER := 1.0;
584: l_api_name VARCHAR2(30) := 'CUSTACCT_CREATCUSTACCTSITE';

Line 598: IF NOT FND_API.Compatible_API_Call (l_api_version,

594: -- Standard Start of API savepoint
595: SAVEPOINT CUSTACCT_CREATCUSTACCTSITE;
596:
597: -- Standard call to check for call compatibility.
598: IF NOT FND_API.Compatible_API_Call (l_api_version,
599: P_Api_Version_Number,
600: l_api_name,
601: G_PKG_NAME )
602: THEN

Line 603: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

599: P_Api_Version_Number,
600: l_api_name,
601: G_PKG_NAME )
602: THEN
603: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
604: END IF;
605:
606: -- Initialize message list if p_init_msg_list is set to TRUE.
607: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 607: IF FND_API.To_Boolean( p_init_msg_list ) THEN

603: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
604: END IF;
605:
606: -- Initialize message list if p_init_msg_list is set to TRUE.
607: IF FND_API.To_Boolean( p_init_msg_list ) THEN
608: FND_Msg_Pub.initialize;
609: END IF;
610:
611: -- Initialize API return status to success

Line 612: x_return_status := FND_API.G_RET_STS_SUCCESS;

608: FND_Msg_Pub.initialize;
609: END IF;
610:
611: -- Initialize API return status to success
612: x_return_status := FND_API.G_RET_STS_SUCCESS;
613:
614: -- Start OF API body --
615:
616: Open c_acct_site (p_custacct_id, p_partysite_id);

Line 638: p_init_msg_list => FND_API.G_FALSE,

634: -- old TCA API call
635: --hz_customer_accounts_pub.create_account_site
636:
637: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_acct_site (
638: p_init_msg_list => FND_API.G_FALSE,
639: p_cust_acct_site_rec => p_acct_site_rec,
640: x_cust_acct_site_id => l_customer_site_id,
641: x_return_status => l_return_status,
642: x_msg_count => l_msg_count,

Line 647: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN

643: x_msg_data => l_msg_data );
644:
645: END IF;
646:
647: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
648: x_custacct_site_id := l_customer_site_id ;
649: else
650: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
651: IBE_Util.debug('Exception in HZ create_cust_acct_site: '||l_msg_data);

Line 653: RAISE FND_API.G_EXC_ERROR;

649: else
650: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
651: IBE_Util.debug('Exception in HZ create_cust_acct_site: '||l_msg_data);
652: END IF;
653: RAISE FND_API.G_EXC_ERROR;
654: end if;
655:
656: --
657: -- End of API body

Line 661: IF FND_API.to_Boolean( p_commit )

657: -- End of API body
658: --
659:
660: -- Standard check for p_commit
661: IF FND_API.to_Boolean( p_commit )
662: THEN
663: COMMIT WORK;
664: END IF;
665:

Line 677: WHEN FND_API.G_EXC_ERROR THEN

673: IBE_Util.debug('End IBE_CUSTOMER_ACCT_PVT: Create_Cust_Acct_Site custacct_site_id: '||x_custacct_site_id);
674: END IF;
675:
676: EXCEPTION
677: WHEN FND_API.G_EXC_ERROR THEN
678: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITE;
679: x_return_status := FND_API.G_RET_STS_ERROR;
680: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
681: p_count => x_msg_count ,

Line 679: x_return_status := FND_API.G_RET_STS_ERROR;

675:
676: EXCEPTION
677: WHEN FND_API.G_EXC_ERROR THEN
678: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITE;
679: x_return_status := FND_API.G_RET_STS_ERROR;
680: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
681: p_count => x_msg_count ,
682: p_data => x_msg_data);
683: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 680: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

676: EXCEPTION
677: WHEN FND_API.G_EXC_ERROR THEN
678: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITE;
679: x_return_status := FND_API.G_RET_STS_ERROR;
680: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
681: p_count => x_msg_count ,
682: p_data => x_msg_data);
683: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
684: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT: Create_Cust_Acct_Site()'|| sqlerrm);

Line 687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

683: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
684: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT: Create_Cust_Acct_Site()'|| sqlerrm);
685: END IF;
686:
687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
688: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITE;
689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
690: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
691: p_count => x_msg_count ,

Line 689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

685: END IF;
686:
687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
688: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITE;
689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
690: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
691: p_count => x_msg_count ,
692: p_data => x_msg_data);
693: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 690: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

686:
687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
688: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITE;
689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
690: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
691: p_count => x_msg_count ,
692: p_data => x_msg_data);
693: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
694: IBE_Util.Debug('UNEXPECTEDErr IBE_CUSTOMER_ACCT_PVT: Create_Cust_Acct_Site()' || sqlerrm);

Line 699: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

695: END IF;
696:
697: WHEN OTHERS THEN
698: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITE;
699: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
700: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
701: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
702: L_API_NAME);
703: END IF;

Line 705: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

701: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
702: L_API_NAME);
703: END IF;
704:
705: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
706: p_count => x_msg_count ,
707: p_data => x_msg_data);
708: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
709: IBE_Util.Debug('OtherExc IBE_CUSTOMER_ACCT_PVT: Create_Cust_Acct_Site()' || sqlerrm);

Line 739: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

735: l_custacct_site_use_id NUMBER := NULL;
736: l_cust_acct_site_id NUMBER := NULL;
737: l_profile varchar2(1):= '';
738: l_location VARCHAR2(40):= '';
739: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
740:
741: l_party_site_use NUMBER := null;
742: l_party_site_id NUMBER := null;
743: lx_party_site_use_id NUMBER;

Line 779: IF NOT FND_API.Compatible_API_Call (l_api_version,

775: -- Standard Start of API savepoint
776: SAVEPOINT CUSTACCT_CREATCUSTACCTSITEUSE;
777:
778: -- Standard call to check for call compatibility.
779: IF NOT FND_API.Compatible_API_Call (l_api_version,
780: P_Api_Version_Number,
781: l_api_name,
782: G_PKG_NAME )
783: THEN

Line 784: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

780: P_Api_Version_Number,
781: l_api_name,
782: G_PKG_NAME )
783: THEN
784: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
785: END IF;
786:
787: -- Initialize message list if p_init_msg_list is set to TRUE.
788: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 788: IF FND_API.To_Boolean( p_init_msg_list ) THEN

784: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
785: END IF;
786:
787: -- Initialize message list if p_init_msg_list is set to TRUE.
788: IF FND_API.To_Boolean( p_init_msg_list ) THEN
789: FND_Msg_Pub.initialize;
790: END IF;
791:
792: -- Initialize API return status to success

Line 793: x_return_status := FND_API.G_RET_STS_SUCCESS;

789: FND_Msg_Pub.initialize;
790: END IF;
791:
792: -- Initialize API return status to success
793: x_return_status := FND_API.G_RET_STS_SUCCESS;
794:
795: -- Start OF API body --
796:
797: l_cust_acct_site_id := p_cust_acct_site_id;

Line 847: p_init_msg_list => FND_API.G_FALSE,

843: -- hz_customer_accounts_pub.create_acct_site_uses
844:
845:
846: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
847: p_init_msg_list => FND_API.G_FALSE,
848: p_cust_site_use_rec => l_acctsite_uses_rec,
849: p_customer_profile_rec => l_cust_profile_rec,
850: p_create_profile => FND_API.G_TRUE,
851: p_create_profile_amt => FND_API.G_TRUE,

Line 850: p_create_profile => FND_API.G_TRUE,

846: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
847: p_init_msg_list => FND_API.G_FALSE,
848: p_cust_site_use_rec => l_acctsite_uses_rec,
849: p_customer_profile_rec => l_cust_profile_rec,
850: p_create_profile => FND_API.G_TRUE,
851: p_create_profile_amt => FND_API.G_TRUE,
852: x_site_use_id => l_custacct_site_use_id,
853: x_return_status => x_return_status,
854: x_msg_count => x_msg_count,

Line 851: p_create_profile_amt => FND_API.G_TRUE,

847: p_init_msg_list => FND_API.G_FALSE,
848: p_cust_site_use_rec => l_acctsite_uses_rec,
849: p_customer_profile_rec => l_cust_profile_rec,
850: p_create_profile => FND_API.G_TRUE,
851: p_create_profile_amt => FND_API.G_TRUE,
852: x_site_use_id => l_custacct_site_use_id,
853: x_return_status => x_return_status,
854: x_msg_count => x_msg_count,
855: x_msg_data => x_msg_data );

Line 863: IF l_Return_Status = FND_API.G_RET_STS_SUCCESS THEN

859: Ibe_Util.debug('create_acct_site_use: x_return_status: '|| l_return_status);
860: Ibe_Util.debug('create_acct_site_use: l_custacct_site_use_id: '||l_custacct_site_use_id);
861: END IF;
862:
863: IF l_Return_Status = FND_API.G_RET_STS_SUCCESS THEN
864: x_custacct_site_use_id := l_custacct_site_use_id;
865: ELSE
866: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
867: Ibe_util.Debug('Exception in HZ create_cust_site_use: '|| x_msg_data);

Line 869: RAISE FND_API.G_EXC_ERROR;

865: ELSE
866: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
867: Ibe_util.Debug('Exception in HZ create_cust_site_use: '|| x_msg_data);
868: END IF;
869: RAISE FND_API.G_EXC_ERROR;
870: END IF;
871:
872: END IF; -- IF x_site_use is null
873:

Line 884: IF (l_party_site_use = NULL OR l_party_site_use = FND_API.G_MISS_NUM)

880: OPEN c_party_site_use(p_party_site_Id,p_acct_site_type);
881: FETCH c_party_site_use into l_party_site_use;
882: CLOSE c_party_site_use;
883:
884: IF (l_party_site_use = NULL OR l_party_site_use = FND_API.G_MISS_NUM)
885: then
886:
887: Create_Party_Site_Use(p_party_site_id => l_party_site_id,
888: p_party_site_use_type => p_acct_site_type,

Line 895: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

891: x_msg_count => x_msg_count,
892: x_msg_data => x_msg_data
893: );
894:
895: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
896: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
897: Ibe_util.Debug('Exception in HZ Create_Party_Site_Use: '|| x_msg_data);
898: END IF;
899: RAISE FND_API.G_EXC_ERROR;

Line 899: RAISE FND_API.G_EXC_ERROR;

895: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
896: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
897: Ibe_util.Debug('Exception in HZ Create_Party_Site_Use: '|| x_msg_data);
898: END IF;
899: RAISE FND_API.G_EXC_ERROR;
900: END IF;
901: END IF;
902:
903: */

Line 910: IF FND_API.to_Boolean( p_commit )

906: -- End of API body
907: --
908:
909: -- Standard check for p_commit
910: IF FND_API.to_Boolean( p_commit )
911: THEN
912: COMMIT WORK;
913: END IF;
914:

Line 926: WHEN FND_API.G_EXC_ERROR THEN

922: Ibe_util.Debug('End IBE_CUSTOMER_ACCT_PVT:Create_Cust_Acct_Site_Use');
923: END IF;
924:
925: EXCEPTION
926: WHEN FND_API.G_EXC_ERROR THEN
927: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITEUSE;
928: x_return_status := FND_API.G_RET_STS_ERROR;
929: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
930: p_count => x_msg_count,

Line 928: x_return_status := FND_API.G_RET_STS_ERROR;

924:
925: EXCEPTION
926: WHEN FND_API.G_EXC_ERROR THEN
927: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITEUSE;
928: x_return_status := FND_API.G_RET_STS_ERROR;
929: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
930: p_count => x_msg_count,
931: p_data => x_msg_data);
932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 929: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

925: EXCEPTION
926: WHEN FND_API.G_EXC_ERROR THEN
927: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITEUSE;
928: x_return_status := FND_API.G_RET_STS_ERROR;
929: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
930: p_count => x_msg_count,
931: p_data => x_msg_data);
932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
933: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Create_Cust_Acct_Site_Use()'|| sqlerrm);

Line 936: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

932: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
933: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Create_Cust_Acct_Site_Use()'|| sqlerrm);
934: END IF;
935:
936: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
937: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITEUSE;
938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
939: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
940: p_count => x_msg_count ,

Line 938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

934: END IF;
935:
936: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
937: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITEUSE;
938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
939: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
940: p_count => x_msg_count ,
941: p_data => x_msg_data);
942: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 939: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

935:
936: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
937: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITEUSE;
938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
939: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
940: p_count => x_msg_count ,
941: p_data => x_msg_data);
942: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
943: IBE_Util.Debug('UNEXPECTEDErr IBE_CUSTOMER_ACCT_PVT:Create_Cust_Acct_Site_Use()' || sqlerrm);

Line 948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

944: END IF;
945:
946: WHEN OTHERS THEN
947: ROLLBACK TO CUSTACCT_CREATCUSTACCTSITEUSE;
948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
949: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
950: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
951: L_API_NAME);
952: END IF;

Line 954: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

950: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
951: L_API_NAME);
952: END IF;
953:
954: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
955: p_count => x_msg_count ,
956: p_data => x_msg_data);
957: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
958: IBE_Util.Debug('OtherExc IBE_CUSTOMER_ACCT_PVT:Create_Cust_Acct_Site_Use()' || sqlerrm);

Line 1006: l_cust_siteid_notavl VARCHAR2(10) := FND_API.G_FALSE;

1002: l_cust_acct_site_status VARCHAR2(10) := '';
1003: l_site_use_id NUMBER := NULL;
1004: l_custsite_use_status VARCHAR2(10) := '';
1005: lx_cust_acct_site_id NUMBER := NULL;
1006: l_cust_siteid_notavl VARCHAR2(10) := FND_API.G_FALSE;
1007: l_cust_siteuseid_flow VARCHAR2(10) := FND_API.G_FALSE;
1008: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1009:
1010: l_return_values varchar2(2000);

Line 1007: l_cust_siteuseid_flow VARCHAR2(10) := FND_API.G_FALSE;

1003: l_site_use_id NUMBER := NULL;
1004: l_custsite_use_status VARCHAR2(10) := '';
1005: lx_cust_acct_site_id NUMBER := NULL;
1006: l_cust_siteid_notavl VARCHAR2(10) := FND_API.G_FALSE;
1007: l_cust_siteuseid_flow VARCHAR2(10) := FND_API.G_FALSE;
1008: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1009:
1010: l_return_values varchar2(2000);
1011: l_api_version NUMBER := 1.0;

Line 1008: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

1004: l_custsite_use_status VARCHAR2(10) := '';
1005: lx_cust_acct_site_id NUMBER := NULL;
1006: l_cust_siteid_notavl VARCHAR2(10) := FND_API.G_FALSE;
1007: l_cust_siteuseid_flow VARCHAR2(10) := FND_API.G_FALSE;
1008: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1009:
1010: l_return_values varchar2(2000);
1011: l_api_version NUMBER := 1.0;
1012: l_api_name VARCHAR2(30) := 'CUSTACCT_CUSTACCTSITEUSE';

Line 1024: IF NOT FND_API.Compatible_API_Call (l_api_version,

1020: -- Standard Start of API savepoint
1021: SAVEPOINT CUSTACCT_CUSTACCTSITEUSE;
1022:
1023: -- Standard call to check for call compatibility.
1024: IF NOT FND_API.Compatible_API_Call (l_api_version,
1025: P_Api_Version_Number,
1026: l_api_name,
1027: G_PKG_NAME )
1028: THEN

Line 1029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1025: P_Api_Version_Number,
1026: l_api_name,
1027: G_PKG_NAME )
1028: THEN
1029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1030: END IF;
1031:
1032: -- Initialize message list if p_init_msg_list is set to TRUE.
1033: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 1033: IF FND_API.To_Boolean( p_init_msg_list ) THEN

1029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1030: END IF;
1031:
1032: -- Initialize message list if p_init_msg_list is set to TRUE.
1033: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1034: FND_Msg_Pub.initialize;
1035: END IF;
1036:
1037: -- Initialize API return status to success

Line 1038: x_return_status := FND_API.G_RET_STS_SUCCESS;

1034: FND_Msg_Pub.initialize;
1035: END IF;
1036:
1037: -- Initialize API return status to success
1038: x_return_status := FND_API.G_RET_STS_SUCCESS;
1039:
1040: -- Start OF API body --
1041:
1042: -- PART I party site id fetching

Line 1043: IF (p_partysite_id is null OR p_partysite_id = FND_API.G_MISS_NUM) THEN

1039:
1040: -- Start OF API body --
1041:
1042: -- PART I party site id fetching
1043: IF (p_partysite_id is null OR p_partysite_id = FND_API.G_MISS_NUM) THEN
1044:
1045: /*** Use GetPartySiteId to use the Address rule.(primary, non primary or any valid address) ***/
1046:
1047: GetPartySiteId(p_party_id => p_party_id

Line 1082: l_cust_siteid_notavl := FND_API.G_TRUE;

1078:
1079: OPEN c_get_cust_site(p_cust_acct_id, lx_party_site_id);
1080: FETCH c_get_cust_site INTO l_cust_acct_site_id, l_cust_acct_site_status;
1081: IF (c_get_cust_site%NOTFOUND) THEN
1082: l_cust_siteid_notavl := FND_API.G_TRUE;
1083: END IF;
1084: CLOSE c_get_cust_site;
1085:
1086: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1091: IF FND_API.to_Boolean(l_cust_siteid_notavl) THEN

1087: Ibe_util.Debug('cust_acct_site_id: ' || l_cust_acct_site_id);
1088: Ibe_util.Debug('cust_acct_site_status: ' || l_cust_acct_site_status||' : '||l_cust_siteid_notavl);
1089: END IF;
1090:
1091: IF FND_API.to_Boolean(l_cust_siteid_notavl) THEN
1092:
1093: -- No Valid Cust Acct Site Id is present
1094: -- so try to create one
1095: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1110: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS OR

1106:
1107: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1108: Ibe_util.Debug('Create_Cust_Acct_Site returned id : ' || l_cust_acct_site_id);
1109: END IF;
1110: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS OR
1111: (l_cust_acct_site_id is null OR l_cust_acct_site_id = FND_API.G_MISS_NUM))
1112: THEN
1113: -- Creation Failed.
1114: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');

Line 1111: (l_cust_acct_site_id is null OR l_cust_acct_site_id = FND_API.G_MISS_NUM))

1107: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1108: Ibe_util.Debug('Create_Cust_Acct_Site returned id : ' || l_cust_acct_site_id);
1109: END IF;
1110: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS OR
1111: (l_cust_acct_site_id is null OR l_cust_acct_site_id = FND_API.G_MISS_NUM))
1112: THEN
1113: -- Creation Failed.
1114: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
1115: FND_Msg_Pub.Add;

Line 1116: RAISE FND_API.G_EXC_ERROR;

1112: THEN
1113: -- Creation Failed.
1114: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
1115: FND_Msg_Pub.Add;
1116: RAISE FND_API.G_EXC_ERROR;
1117: END IF;
1118:
1119: ELSIF (l_cust_acct_site_status <> 'A') THEN -- IF c_get_cust_site%NOTFOUND
1120:

Line 1132: RAISE FND_API.G_EXC_ERROR;

1128: ELSE
1129: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_INVALID_SHIPTO_ADDR'); -- need error message
1130: END IF;
1131: FND_MSG_PUB.ADD;
1132: RAISE FND_API.G_EXC_ERROR;
1133:
1134: END IF; -- c_get_cust_site%NOTFOUND
1135:
1136:

Line 1144: l_cust_siteuseid_flow := FND_API.G_TRUE; -- custacctsiteuseid not present.

1140:
1141: OPEN c_get_custsite_use(l_cust_acct_site_id,p_siteuse_type);
1142: FETCH c_get_custsite_use INTO l_site_use_id, l_custsite_use_status;
1143: IF (c_get_custsite_use%NOTFOUND) THEN
1144: l_cust_siteuseid_flow := FND_API.G_TRUE; -- custacctsiteuseid not present.
1145: END IF;
1146: CLOSE c_get_custsite_use;
1147:
1148: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1153: IF (FND_API.to_Boolean(l_cust_siteuseid_flow)) THEN

1149: Ibe_util.Debug('In l_site_use_id :' || l_site_use_id);
1150: Ibe_util.Debug('In l_custsite_use_status :' || l_custsite_use_status );
1151: END IF;
1152:
1153: IF (FND_API.to_Boolean(l_cust_siteuseid_flow)) THEN
1154:
1155: -- No valid Cust Acct Site Use Id present, so Create One.
1156: Create_Cust_Acct_Site_Use (p_Cust_Account_Id => p_cust_acct_id
1157: ,P_Party_Site_Id => lx_party_site_id

Line 1168: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS OR

1164: ,x_msg_data => x_msg_data
1165: );
1166:
1167:
1168: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS OR
1169: (l_cust_acct_site_id is null OR l_cust_acct_site_id = FND_API.G_MISS_NUM))
1170: THEN
1171: -- Creation Failed.
1172: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');

Line 1169: (l_cust_acct_site_id is null OR l_cust_acct_site_id = FND_API.G_MISS_NUM))

1165: );
1166:
1167:
1168: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS OR
1169: (l_cust_acct_site_id is null OR l_cust_acct_site_id = FND_API.G_MISS_NUM))
1170: THEN
1171: -- Creation Failed.
1172: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
1173: FND_Msg_Pub.Add;

Line 1174: RAISE FND_API.G_EXC_ERROR;

1170: THEN
1171: -- Creation Failed.
1172: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
1173: FND_Msg_Pub.Add;
1174: RAISE FND_API.G_EXC_ERROR;
1175: ELSE
1176: x_siteuse_id := l_site_use_id;
1177: END IF;
1178:

Line 1195: RAISE FND_API.G_EXC_ERROR;

1191: ELSE
1192: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_INVALID_SHIPTO_ADDR'); -- need error message
1193: END IF;
1194: FND_MSG_PUB.ADD;
1195: RAISE FND_API.G_EXC_ERROR;
1196:
1197: ELSE
1198: -- valid cust_acct_site_use_id available, so use it
1199: x_siteuse_id := l_site_use_id;

Line 1207: l_return_status := FND_API.G_RET_STS_ERROR;

1203: Ibe_util.Debug('x_siteuse_id: ' || x_siteuse_id);
1204: END IF;
1205:
1206: ELSE --party_site_id =-1
1207: l_return_status := FND_API.G_RET_STS_ERROR;
1208: END IF;
1209:
1210: --
1211: -- End of API body

Line 1215: IF FND_API.to_Boolean( p_commit )

1211: -- End of API body
1212: --
1213:
1214: -- Standard check for p_commit
1215: IF FND_API.to_Boolean( p_commit )
1216: THEN
1217: COMMIT WORK;
1218: END IF;
1219:

Line 1231: WHEN FND_API.G_EXC_ERROR THEN

1227: Ibe_util.Debug('End IBE_CUSTOMER_ACCT_PVT:Get_Cust_Account_Site_Use');
1228: END IF;
1229:
1230: EXCEPTION
1231: WHEN FND_API.G_EXC_ERROR THEN
1232: x_return_status := FND_API.G_RET_STS_ERROR;
1233: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1234: p_count => x_msg_count,
1235: p_data => x_msg_data);

Line 1232: x_return_status := FND_API.G_RET_STS_ERROR;

1228: END IF;
1229:
1230: EXCEPTION
1231: WHEN FND_API.G_EXC_ERROR THEN
1232: x_return_status := FND_API.G_RET_STS_ERROR;
1233: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1234: p_count => x_msg_count,
1235: p_data => x_msg_data);
1236: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1233: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1229:
1230: EXCEPTION
1231: WHEN FND_API.G_EXC_ERROR THEN
1232: x_return_status := FND_API.G_RET_STS_ERROR;
1233: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1234: p_count => x_msg_count,
1235: p_data => x_msg_data);
1236: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1237: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Get_Cust_Account_Site_Use()'|| sqlerrm);

Line 1240: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1236: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1237: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Get_Cust_Account_Site_Use()'|| sqlerrm);
1238: END IF;
1239:
1240: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1242: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1243: p_count => x_msg_count,
1244: p_data => x_msg_data);

Line 1241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1237: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Get_Cust_Account_Site_Use()'|| sqlerrm);
1238: END IF;
1239:
1240: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1242: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1243: p_count => x_msg_count,
1244: p_data => x_msg_data);
1245: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1242: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1238: END IF;
1239:
1240: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1242: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1243: p_count => x_msg_count,
1244: p_data => x_msg_data);
1245: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1246: IBE_Util.Debug('UnexError IBE_CUSTOMER_ACCT_PVT:Get_Cust_Account_Site_Use()'|| sqlerrm);

Line 1250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1246: IBE_Util.Debug('UnexError IBE_CUSTOMER_ACCT_PVT:Get_Cust_Account_Site_Use()'|| sqlerrm);
1247: END IF;
1248:
1249: WHEN OTHERS THEN
1250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1251: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1252: p_count => x_msg_count,
1253: p_data => x_msg_data);
1254: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1251: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1247: END IF;
1248:
1249: WHEN OTHERS THEN
1250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1251: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1252: p_count => x_msg_count,
1253: p_data => x_msg_data);
1254: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1255: IBE_Util.Debug('Others IBE_CUSTOMER_ACCT_PVT:Get_Cust_Account_Site_Use()'|| sqlerrm);

Line 1320: IF NOT FND_API.Compatible_API_Call (l_api_version,

1316: -- Standard Start of API savepoint
1317: SAVEPOINT CUSTACCT_GETCUSTACCTRLE;
1318:
1319: -- Standard call to check for call compatibility.
1320: IF NOT FND_API.Compatible_API_Call (l_api_version,
1321: P_Api_Version_Number,
1322: l_api_name,
1323: G_PKG_NAME )
1324: THEN

Line 1325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1321: P_Api_Version_Number,
1322: l_api_name,
1323: G_PKG_NAME )
1324: THEN
1325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1326: END IF;
1327:
1328: -- Initialize message list if p_init_msg_list is set to TRUE.
1329: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 1329: IF FND_API.To_Boolean( p_init_msg_list ) THEN

1325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1326: END IF;
1327:
1328: -- Initialize message list if p_init_msg_list is set to TRUE.
1329: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1330: FND_Msg_Pub.initialize;
1331: END IF;
1332:
1333: -- Initialize API return status to success

Line 1334: x_return_status := FND_API.G_RET_STS_SUCCESS;

1330: FND_Msg_Pub.initialize;
1331: END IF;
1332:
1333: -- Initialize API return status to success
1334: x_return_status := FND_API.G_RET_STS_SUCCESS;
1335:
1336: -- Start OF API body --
1337:
1338: --for the available site_use_id fetch cust_acct_id.

Line 1367: IF (l_cust_acct_role_id IS NULL or l_cust_acct_role_id = FND_API.G_MISS_NUM)

1363: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1364: Ibe_util.Debug('Get_Cust_Acct_Role cust_acct_role_id: '||l_cust_acct_role_id);
1365: end if;
1366:
1367: IF (l_cust_acct_role_id IS NULL or l_cust_acct_role_id = FND_API.G_MISS_NUM)
1368: THEN
1369: create_cust_account_role(p_party_id => p_party_id
1370: ,p_cust_acct_id => p_sold_to_orgid
1371: ,p_cust_acct_site_id => l_custacct_site_id

Line 1394: IF FND_API.to_Boolean( p_commit )

1390: -- End of API body
1391: --
1392:
1393: -- Standard check for p_commit
1394: IF FND_API.to_Boolean( p_commit )
1395: THEN
1396: COMMIT WORK;
1397: END IF;
1398:

Line 1405: WHEN FND_API.G_EXC_ERROR THEN

1401: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1402: p_data => x_msg_data);
1403:
1404: EXCEPTION
1405: WHEN FND_API.G_EXC_ERROR THEN
1406: ROLLBACK TO CUSTACCT_CUSTACCTSITEUSE;
1407: x_return_status := FND_API.G_RET_STS_ERROR;
1408: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1409: p_count => x_msg_count ,

Line 1407: x_return_status := FND_API.G_RET_STS_ERROR;

1403:
1404: EXCEPTION
1405: WHEN FND_API.G_EXC_ERROR THEN
1406: ROLLBACK TO CUSTACCT_CUSTACCTSITEUSE;
1407: x_return_status := FND_API.G_RET_STS_ERROR;
1408: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1409: p_count => x_msg_count ,
1410: p_data => x_msg_data);
1411: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1408: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1404: EXCEPTION
1405: WHEN FND_API.G_EXC_ERROR THEN
1406: ROLLBACK TO CUSTACCT_CUSTACCTSITEUSE;
1407: x_return_status := FND_API.G_RET_STS_ERROR;
1408: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1409: p_count => x_msg_count ,
1410: p_data => x_msg_data);
1411: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1412: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Get_Cust_Acct_Role()'|| sqlerrm);

Line 1415: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1411: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1412: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:Get_Cust_Acct_Role()'|| sqlerrm);
1413: END IF;
1414:
1415: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1416: ROLLBACK TO CUSTACCT_CUSTACCTSITEUSE;
1417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1418: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1419: p_count => x_msg_count ,

Line 1417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1413: END IF;
1414:
1415: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1416: ROLLBACK TO CUSTACCT_CUSTACCTSITEUSE;
1417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1418: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1419: p_count => x_msg_count ,
1420: p_data => x_msg_data);
1421: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1418: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1414:
1415: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1416: ROLLBACK TO CUSTACCT_CUSTACCTSITEUSE;
1417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1418: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1419: p_count => x_msg_count ,
1420: p_data => x_msg_data);
1421: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1422: IBE_Util.Debug('UNEXPECTEDErr IBE_CUSTOMER_ACCT_PVT:Get_Cust_Acct_Role()' || sqlerrm);

Line 1427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1423: END IF;
1424:
1425: WHEN OTHERS THEN
1426: ROLLBACK TO CUSTACCT_CUSTACCTSITEUSE;
1427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1429: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
1430: L_API_NAME);
1431: END IF;

Line 1433: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1429: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
1430: L_API_NAME);
1431: END IF;
1432:
1433: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1434: p_count => x_msg_count ,
1435: p_data => x_msg_data);
1436: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1437: IBE_Util.Debug('OtherExc IBE_CUSTOMER_ACCT_PVT:Get_Cust_Acct_Role()' || sqlerrm);

Line 1444: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

1440: END Get_Cust_Acct_Role;
1441:
1442: PROCEDURE GetCustomerAcctData(
1443: p_api_version_number IN NUMBER := 1
1444: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1445: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1446: ,p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1447: ,p_invoice_to_contact_id IN NUMBER := FND_API.G_MISS_NUM
1448: ,p_contact_party_id IN NUMBER := FND_API.G_MISS_NUM

Line 1445: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

1441:
1442: PROCEDURE GetCustomerAcctData(
1443: p_api_version_number IN NUMBER := 1
1444: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1445: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1446: ,p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1447: ,p_invoice_to_contact_id IN NUMBER := FND_API.G_MISS_NUM
1448: ,p_contact_party_id IN NUMBER := FND_API.G_MISS_NUM
1449: ,p_cust_account_id IN NUMBER := FND_API.G_MISS_NUM

Line 1446: ,p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM

1442: PROCEDURE GetCustomerAcctData(
1443: p_api_version_number IN NUMBER := 1
1444: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1445: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1446: ,p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1447: ,p_invoice_to_contact_id IN NUMBER := FND_API.G_MISS_NUM
1448: ,p_contact_party_id IN NUMBER := FND_API.G_MISS_NUM
1449: ,p_cust_account_id IN NUMBER := FND_API.G_MISS_NUM
1450: ,x_cust_account_id OUT NOCOPY NUMBER

Line 1447: ,p_invoice_to_contact_id IN NUMBER := FND_API.G_MISS_NUM

1443: p_api_version_number IN NUMBER := 1
1444: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1445: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1446: ,p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1447: ,p_invoice_to_contact_id IN NUMBER := FND_API.G_MISS_NUM
1448: ,p_contact_party_id IN NUMBER := FND_API.G_MISS_NUM
1449: ,p_cust_account_id IN NUMBER := FND_API.G_MISS_NUM
1450: ,x_cust_account_id OUT NOCOPY NUMBER
1451: ,x_cust_party_name OUT NOCOPY VARCHAR2

Line 1448: ,p_contact_party_id IN NUMBER := FND_API.G_MISS_NUM

1444: ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1445: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1446: ,p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1447: ,p_invoice_to_contact_id IN NUMBER := FND_API.G_MISS_NUM
1448: ,p_contact_party_id IN NUMBER := FND_API.G_MISS_NUM
1449: ,p_cust_account_id IN NUMBER := FND_API.G_MISS_NUM
1450: ,x_cust_account_id OUT NOCOPY NUMBER
1451: ,x_cust_party_name OUT NOCOPY VARCHAR2
1452: ,x_cust_party_id OUT NOCOPY NUMBER

Line 1449: ,p_cust_account_id IN NUMBER := FND_API.G_MISS_NUM

1445: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1446: ,p_invoice_to_org_id IN NUMBER := FND_API.G_MISS_NUM
1447: ,p_invoice_to_contact_id IN NUMBER := FND_API.G_MISS_NUM
1448: ,p_contact_party_id IN NUMBER := FND_API.G_MISS_NUM
1449: ,p_cust_account_id IN NUMBER := FND_API.G_MISS_NUM
1450: ,x_cust_account_id OUT NOCOPY NUMBER
1451: ,x_cust_party_name OUT NOCOPY VARCHAR2
1452: ,x_cust_party_id OUT NOCOPY NUMBER
1453: ,x_cust_party_type OUT NOCOPY VARCHAR2

Line 1530: IF NOT FND_API.Compatible_API_Call (l_api_version,

1526: -- Standard Start of API savepoint
1527: SAVEPOINT CUSTACCT_CUSTOMERDATA;
1528:
1529: -- Standard call to check for call compatibility.
1530: IF NOT FND_API.Compatible_API_Call (l_api_version,
1531: P_Api_Version_Number,
1532: l_api_name,
1533: G_PKG_NAME )
1534: THEN

Line 1535: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1531: P_Api_Version_Number,
1532: l_api_name,
1533: G_PKG_NAME )
1534: THEN
1535: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1536: END IF;
1537:
1538: -- Initialize message list if p_init_msg_list is set to TRUE.
1539: IF FND_API.To_Boolean( p_init_msg_list ) THEN

Line 1539: IF FND_API.To_Boolean( p_init_msg_list ) THEN

1535: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1536: END IF;
1537:
1538: -- Initialize message list if p_init_msg_list is set to TRUE.
1539: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1540: FND_Msg_Pub.initialize;
1541: END IF;
1542:
1543: -- Initialize API return status to success

Line 1544: x_return_status := FND_API.G_RET_STS_SUCCESS;

1540: FND_Msg_Pub.initialize;
1541: END IF;
1542:
1543: -- Initialize API return status to success
1544: x_return_status := FND_API.G_RET_STS_SUCCESS;
1545:
1546: -- Start OF API body --
1547:
1548:

Line 1565: if(p_invoice_to_org_id is not null AND p_invoice_to_org_id <> FND_API.G_MISS_NUM) then

1561: IBE_Util.Debug('p_cust_account_id: '|| p_cust_account_id);
1562:
1563: END IF;
1564:
1565: if(p_invoice_to_org_id is not null AND p_invoice_to_org_id <> FND_API.G_MISS_NUM) then
1566: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1567: IBE_Util.Debug('Inside invoiceToorg id IF loop');
1568: END IF;
1569: open c_cust_acct_det(p_invoice_to_org_id);

Line 1574: RAISE FND_API.G_EXC_ERROR;

1570: fetch c_cust_acct_det into lc_cust_acct_det;
1571: if(c_cust_acct_det%notfound) then
1572: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_CUST'); --need err msg
1573: FND_Msg_Pub.Add;
1574: RAISE FND_API.G_EXC_ERROR;
1575: else
1576: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1577: IBE_Util.Debug('Customer details available');
1578: END IF;

Line 1584: elsif(p_cust_account_id is not null AND p_cust_account_id <> FND_API.G_MISS_NUM) then

1580: l_partysite_id := lc_cust_acct_det.party_site_id;
1581: l_partysite_stat := lc_cust_acct_det.status;
1582: end if;
1583: close c_cust_acct_det;
1584: elsif(p_cust_account_id is not null AND p_cust_account_id <> FND_API.G_MISS_NUM) then
1585: -- this flow would be reached for Contact/ Address getting changed in UI.
1586: l_cust_account_id := p_cust_account_id;
1587: l_partysite_id := null;
1588: l_partysite_stat := '';

Line 1606: RAISE FND_API.G_EXC_ERROR;

1602: fetch c_customer_details into lc_customer_details;
1603: if(c_customer_details%notfound) then
1604: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_CUST'); --need err msg
1605: FND_Msg_Pub.Add;
1606: RAISE FND_API.G_EXC_ERROR;
1607: else
1608: x_cust_party_id := lc_customer_details.party_id;
1609: x_cust_party_name := lc_customer_details.party_name;
1610: x_cust_party_type := lc_customer_details.party_type;

Line 1628: if (p_invoice_to_contact_id is not null AND p_invoice_to_contact_id <> FND_API.G_MISS_NUM) then

1624: -- If InvoiceToContactId is passed Retrieve the ContactPartyId and fetch the related Contact details.
1625: -- Else if ConatctPartyId is directly passed from UI then fetch the related details.
1626: -- ContactName, phone and email would be sent back.
1627:
1628: if (p_invoice_to_contact_id is not null AND p_invoice_to_contact_id <> FND_API.G_MISS_NUM) then
1629: open c_contact_partyid(p_invoice_to_contact_id);
1630: fetch c_contact_partyid into l_cntct_partyid;
1631: CLOSE c_contact_partyid;
1632:

Line 1633: elsif(p_contact_party_id is not null AND p_contact_party_id <> FND_API.G_MISS_NUM) then

1629: open c_contact_partyid(p_invoice_to_contact_id);
1630: fetch c_contact_partyid into l_cntct_partyid;
1631: CLOSE c_contact_partyid;
1632:
1633: elsif(p_contact_party_id is not null AND p_contact_party_id <> FND_API.G_MISS_NUM) then
1634: l_cntct_partyid := p_contact_party_id;
1635: end if; -- (p_invoice_to_contact_id <> FND_API.G_MISS_NUM
1636:
1637: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1635: end if; -- (p_invoice_to_contact_id <> FND_API.G_MISS_NUM

1631: CLOSE c_contact_partyid;
1632:
1633: elsif(p_contact_party_id is not null AND p_contact_party_id <> FND_API.G_MISS_NUM) then
1634: l_cntct_partyid := p_contact_party_id;
1635: end if; -- (p_invoice_to_contact_id <> FND_API.G_MISS_NUM
1636:
1637: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1638: IBE_Util.Debug('l_cntct_partyid: '|| l_cntct_partyid);
1639: END IF;

Line 1642: if (l_cntct_partyid is null OR l_cntct_partyid = FND_API.G_MISS_NUM) then

1638: IBE_Util.Debug('l_cntct_partyid: '|| l_cntct_partyid);
1639: END IF;
1640:
1641:
1642: if (l_cntct_partyid is null OR l_cntct_partyid = FND_API.G_MISS_NUM) then
1643: x_contact_party_id := null;
1644: x_contact_party_name := '';
1645: x_contact_phone := '';
1646: x_contact_email := '';

Line 1691: WHEN FND_API.G_EXC_ERROR THEN

1687: IBE_Util.Debug('IBE_CUSTOMER_ACCT_PVT:GetCustomerAcctData() -END');
1688: END If;
1689:
1690: EXCEPTION
1691: WHEN FND_API.G_EXC_ERROR THEN
1692: ROLLBACK TO CUSTACCT_CUSTOMERDATA;
1693: x_return_status := FND_API.G_RET_STS_ERROR;
1694: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1695: p_count => x_msg_count ,

Line 1693: x_return_status := FND_API.G_RET_STS_ERROR;

1689:
1690: EXCEPTION
1691: WHEN FND_API.G_EXC_ERROR THEN
1692: ROLLBACK TO CUSTACCT_CUSTOMERDATA;
1693: x_return_status := FND_API.G_RET_STS_ERROR;
1694: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1695: p_count => x_msg_count ,
1696: p_data => x_msg_data);
1697: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1694: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1690: EXCEPTION
1691: WHEN FND_API.G_EXC_ERROR THEN
1692: ROLLBACK TO CUSTACCT_CUSTOMERDATA;
1693: x_return_status := FND_API.G_RET_STS_ERROR;
1694: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1695: p_count => x_msg_count ,
1696: p_data => x_msg_data);
1697: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1698: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:GetCustomerAcctData()'|| sqlerrm);

Line 1701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1697: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1698: IBE_Util.Debug('Error IBE_CUSTOMER_ACCT_PVT:GetCustomerAcctData()'|| sqlerrm);
1699: END IF;
1700:
1701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1702: ROLLBACK TO CUSTACCT_CUSTOMERDATA;
1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1705: p_count => x_msg_count ,

Line 1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1699: END IF;
1700:
1701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1702: ROLLBACK TO CUSTACCT_CUSTOMERDATA;
1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1705: p_count => x_msg_count ,
1706: p_data => x_msg_data);
1707: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1704: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1700:
1701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1702: ROLLBACK TO CUSTACCT_CUSTOMERDATA;
1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1705: p_count => x_msg_count ,
1706: p_data => x_msg_data);
1707: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1708: IBE_Util.Debug('UNEXPECTEDErr IBE_CUSTOMER_ACCT_PVT:GetCustomerAcctData()' || sqlerrm);

Line 1713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1709: END IF;
1710:
1711: WHEN OTHERS THEN
1712: ROLLBACK TO CUSTACCT_CUSTOMERDATA;
1713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1714: IF FND_Msg_Pub.Check_Msg_Level( FND_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1715: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
1716: L_API_NAME);
1717: END IF;

Line 1719: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,

1715: FND_Msg_Pub.Add_Exc_Msg(G_PKG_NAME,
1716: L_API_NAME);
1717: END IF;
1718:
1719: FND_Msg_Pub.Count_And_Get(p_encoded => FND_API.G_FALSE,
1720: p_count => x_msg_count ,
1721: p_data => x_msg_data);
1722: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1723: IBE_Util.Debug('OtherExc IBE_CUSTOMER_ACCT_PVT:GetCustomerAcctData()' || sqlerrm);