6:
7:
8: PROCEDURE check_success(p_return_status IN VARCHAR2) IS
9: BEGIN
10: IF p_return_status = FND_API.G_RET_STS_ERROR THEN
11: RAISE FND_API.G_EXC_ERROR;
12: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14: END IF;
7:
8: PROCEDURE check_success(p_return_status IN VARCHAR2) IS
9: BEGIN
10: IF p_return_status = FND_API.G_RET_STS_ERROR THEN
11: RAISE FND_API.G_EXC_ERROR;
12: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14: END IF;
15: END;
8: PROCEDURE check_success(p_return_status IN VARCHAR2) IS
9: BEGIN
10: IF p_return_status = FND_API.G_RET_STS_ERROR THEN
11: RAISE FND_API.G_EXC_ERROR;
12: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14: END IF;
15: END;
16:
9: BEGIN
10: IF p_return_status = FND_API.G_RET_STS_ERROR THEN
11: RAISE FND_API.G_EXC_ERROR;
12: ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14: END IF;
15: END;
16:
17: FUNCTION check_exist_group(p_grp_list IN grpnum_tbl_type,
88: -- Pre-reqs : None.
89: -- Parameters :
90: -- IN : p_api_version IN NUMBER Required
91: -- p_init_msg_list IN VARCHAR2 Optional
92: -- Default = FND_API.G_FALSE
93: -- p_commit IN VARCHAR2 Optional
94: -- Default = FND_API.G_FALSE
95: -- p_validation_level IN NUMBER Optional
96: -- Default = FND_API.G_VALID_LEVEL_FULL
90: -- IN : p_api_version IN NUMBER Required
91: -- p_init_msg_list IN VARCHAR2 Optional
92: -- Default = FND_API.G_FALSE
93: -- p_commit IN VARCHAR2 Optional
94: -- Default = FND_API.G_FALSE
95: -- p_validation_level IN NUMBER Optional
96: -- Default = FND_API.G_VALID_LEVEL_FULL
97: -- p_selected_groups IN DBMS_SQL.NUMBER_TABLE,
98: -- p_effective_date
92: -- Default = FND_API.G_FALSE
93: -- p_commit IN VARCHAR2 Optional
94: -- Default = FND_API.G_FALSE
95: -- p_validation_level IN NUMBER Optional
96: -- Default = FND_API.G_VALID_LEVEL_FULL
97: -- p_selected_groups IN DBMS_SQL.NUMBER_TABLE,
98: -- p_effective_date
99: -- OUT : x_return_status OUT VARCHAR2(1)
100: -- x_msg_count OUT NUMBER
110: -- End of comments
111:
112: PROCEDURE Get_Descendant_Groups
113: ( p_api_version IN NUMBER,
114: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
115: p_commit IN VARCHAR2 := FND_API.G_FALSE,
116: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
117: p_selected_groups IN grpnum_tbl_type,
118: p_effective_date IN DATE := SYSDATE,
111:
112: PROCEDURE Get_Descendant_Groups
113: ( p_api_version IN NUMBER,
114: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
115: p_commit IN VARCHAR2 := FND_API.G_FALSE,
116: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
117: p_selected_groups IN grpnum_tbl_type,
118: p_effective_date IN DATE := SYSDATE,
119: x_descendant_groups OUT NOCOPY grpnum_tbl_type,
112: PROCEDURE Get_Descendant_Groups
113: ( p_api_version IN NUMBER,
114: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
115: p_commit IN VARCHAR2 := FND_API.G_FALSE,
116: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
117: p_selected_groups IN grpnum_tbl_type,
118: p_effective_date IN DATE := SYSDATE,
119: x_descendant_groups OUT NOCOPY grpnum_tbl_type,
120: x_return_status OUT NOCOPY VARCHAR2 ,
148: BEGIN
149:
150: SAVEPOINT Get_Descendant_Groups;
151: -- Standard call to check for call compatibility.
152: IF NOT FND_API.compatible_api_call
153: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
154: THEN
155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
156: END IF;
151: -- Standard call to check for call compatibility.
152: IF NOT FND_API.compatible_api_call
153: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
154: THEN
155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
156: END IF;
157:
158: -- Initialize message list if p_init_msg_list is set to TRUE.
159: IF FND_API.to_Boolean( p_init_msg_list ) THEN
155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
156: END IF;
157:
158: -- Initialize message list if p_init_msg_list is set to TRUE.
159: IF FND_API.to_Boolean( p_init_msg_list ) THEN
160: FND_MSG_PUB.initialize;
161: END IF;
162: -- Initialize API return status to success
163: x_return_status := FND_API.G_RET_STS_SUCCESS;
159: IF FND_API.to_Boolean( p_init_msg_list ) THEN
160: FND_MSG_PUB.initialize;
161: END IF;
162: -- Initialize API return status to success
163: x_return_status := FND_API.G_RET_STS_SUCCESS;
164:
165: -- API body
166: /* OLD CODE WITH NO ORDERING */
167: /*
200: << end_Get_Descendant_Groups >>
201: NULL;
202:
203: -- Standard check of p_commit.
204: IF FND_API.To_Boolean( p_commit ) THEN
205: COMMIT WORK;
206: END IF;
207: -- Standard call to get message count and if count is 1, get message info.
208: FND_MSG_PUB.Count_And_Get
208: FND_MSG_PUB.Count_And_Get
209: (
210: p_count => x_msg_count ,
211: p_data => x_msg_data ,
212: p_encoded => FND_API.G_FALSE
213: );
214:
215: EXCEPTION
216: WHEN FND_API.G_EXC_ERROR THEN
212: p_encoded => FND_API.G_FALSE
213: );
214:
215: EXCEPTION
216: WHEN FND_API.G_EXC_ERROR THEN
217: ROLLBACK TO Get_Descendant_Groups ;
218: x_return_status := FND_API.G_RET_STS_ERROR ;
219: FND_MSG_PUB.Count_And_Get
220: (
214:
215: EXCEPTION
216: WHEN FND_API.G_EXC_ERROR THEN
217: ROLLBACK TO Get_Descendant_Groups ;
218: x_return_status := FND_API.G_RET_STS_ERROR ;
219: FND_MSG_PUB.Count_And_Get
220: (
221: p_count => x_msg_count ,
222: p_data => x_msg_data ,
219: FND_MSG_PUB.Count_And_Get
220: (
221: p_count => x_msg_count ,
222: p_data => x_msg_data ,
223: p_encoded => FND_API.G_FALSE
224: );
225:
226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
227: ROLLBACK TO Get_Descendant_Groups ;
222: p_data => x_msg_data ,
223: p_encoded => FND_API.G_FALSE
224: );
225:
226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
227: ROLLBACK TO Get_Descendant_Groups ;
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
229: FND_MSG_PUB.Count_And_Get
230: (
224: );
225:
226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
227: ROLLBACK TO Get_Descendant_Groups ;
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
229: FND_MSG_PUB.Count_And_Get
230: (
231: p_count => x_msg_count ,
232: p_data => x_msg_data ,
229: FND_MSG_PUB.Count_And_Get
230: (
231: p_count => x_msg_count ,
232: p_data => x_msg_data ,
233: p_encoded => FND_API.G_FALSE
234: );
235: WHEN OTHERS THEN
236: ROLLBACK TO Get_Descendant_Groups ;
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
233: p_encoded => FND_API.G_FALSE
234: );
235: WHEN OTHERS THEN
236: ROLLBACK TO Get_Descendant_Groups ;
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
238: FND_MSG_PUB.Count_And_Get
239: (
240: p_count => x_msg_count ,
241: p_data => x_msg_data ,
238: FND_MSG_PUB.Count_And_Get
239: (
240: p_count => x_msg_count ,
241: p_data => x_msg_data ,
242: p_encoded => FND_API.G_FALSE
243: );
244: END Get_Descendant_Groups;
245:
246:
251: -- Pre-reqs : None.
252: -- Parameters :
253: -- IN : p_api_version IN NUMBER Required
254: -- p_init_msg_list IN VARCHAR2 Optional
255: -- Default = FND_API.G_FALSE
256: -- p_commit IN VARCHAR2 Optional
257: -- Default = FND_API.G_FALSE
258: -- p_validation_level IN NUMBER Optional
259: -- Default = FND_API.G_VALID_LEVEL_FULL
253: -- IN : p_api_version IN NUMBER Required
254: -- p_init_msg_list IN VARCHAR2 Optional
255: -- Default = FND_API.G_FALSE
256: -- p_commit IN VARCHAR2 Optional
257: -- Default = FND_API.G_FALSE
258: -- p_validation_level IN NUMBER Optional
259: -- Default = FND_API.G_VALID_LEVEL_FULL
260: -- p_selected_groups IN DBMS_SQL.NUMBER_TABLE,
261: -- p_status IN VARCHAR2
255: -- Default = FND_API.G_FALSE
256: -- p_commit IN VARCHAR2 Optional
257: -- Default = FND_API.G_FALSE
258: -- p_validation_level IN NUMBER Optional
259: -- Default = FND_API.G_VALID_LEVEL_FULL
260: -- p_selected_groups IN DBMS_SQL.NUMBER_TABLE,
261: -- p_status IN VARCHAR2
262: -- p_effective_date IN DATE
263: -- OUT : x_return_status OUT VARCHAR2(1)
276: -- End of comments
277:
278: PROCEDURE Get_Salesrep_Roles
279: ( p_api_version IN NUMBER,
280: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
281: p_commit IN VARCHAR2 := FND_API.G_FALSE,
282: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
283: p_selected_groups IN grpnum_tbl_type,
284: p_status IN VARCHAR2 := 'ALL',
277:
278: PROCEDURE Get_Salesrep_Roles
279: ( p_api_version IN NUMBER,
280: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
281: p_commit IN VARCHAR2 := FND_API.G_FALSE,
282: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
283: p_selected_groups IN grpnum_tbl_type,
284: p_status IN VARCHAR2 := 'ALL',
285: p_effective_date IN DATE := SYSDATE,
278: PROCEDURE Get_Salesrep_Roles
279: ( p_api_version IN NUMBER,
280: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
281: p_commit IN VARCHAR2 := FND_API.G_FALSE,
282: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
283: p_selected_groups IN grpnum_tbl_type,
284: p_status IN VARCHAR2 := 'ALL',
285: p_effective_date IN DATE := SYSDATE,
286: x_salesrep_roles OUT NOCOPY srprole_tbl_type,
323:
324: BEGIN
325: SAVEPOINT Get_Salesrep_Roles;
326: -- Standard call to check for call compatibility.
327: IF NOT FND_API.compatible_api_call
328: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
329: THEN
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: END IF;
326: -- Standard call to check for call compatibility.
327: IF NOT FND_API.compatible_api_call
328: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
329: THEN
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: END IF;
332:
333: -- Initialize message list if p_init_msg_list is set to TRUE.
334: IF FND_API.to_Boolean( p_init_msg_list ) THEN
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: END IF;
332:
333: -- Initialize message list if p_init_msg_list is set to TRUE.
334: IF FND_API.to_Boolean( p_init_msg_list ) THEN
335: FND_MSG_PUB.initialize;
336: END IF;
337: -- Initialize API return status to success
338: x_return_status := FND_API.G_RET_STS_SUCCESS;
334: IF FND_API.to_Boolean( p_init_msg_list ) THEN
335: FND_MSG_PUB.initialize;
336: END IF;
337: -- Initialize API return status to success
338: x_return_status := FND_API.G_RET_STS_SUCCESS;
339:
340: -- API body
341: l_status := p_status;
342: IF (l_status = 'ALL') THEN
386:
387: -- End of API body.
388: << end_Get_Salesrep_Roles >>
389: -- Standard check of p_commit.
390: IF FND_API.To_Boolean( p_commit ) THEN
391: COMMIT WORK;
392: END IF;
393: -- Standard call to get message count and if count is 1, get message info.
394: FND_MSG_PUB.Count_And_Get
394: FND_MSG_PUB.Count_And_Get
395: (
396: p_count => x_msg_count ,
397: p_data => x_msg_data ,
398: p_encoded => FND_API.G_FALSE
399: );
400:
401: EXCEPTION
402: WHEN FND_API.G_EXC_ERROR THEN
398: p_encoded => FND_API.G_FALSE
399: );
400:
401: EXCEPTION
402: WHEN FND_API.G_EXC_ERROR THEN
403: ROLLBACK TO Get_Salesrep_Roles ;
404: x_return_status := FND_API.G_RET_STS_ERROR ;
405: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
406: p_data => x_msg_data ,
400:
401: EXCEPTION
402: WHEN FND_API.G_EXC_ERROR THEN
403: ROLLBACK TO Get_Salesrep_Roles ;
404: x_return_status := FND_API.G_RET_STS_ERROR ;
405: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
406: p_data => x_msg_data ,
407: p_encoded => FND_API.G_FALSE);
408:
403: ROLLBACK TO Get_Salesrep_Roles ;
404: x_return_status := FND_API.G_RET_STS_ERROR ;
405: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
406: p_data => x_msg_data ,
407: p_encoded => FND_API.G_FALSE);
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: ROLLBACK TO Get_Salesrep_Roles ;
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
405: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
406: p_data => x_msg_data ,
407: p_encoded => FND_API.G_FALSE);
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: ROLLBACK TO Get_Salesrep_Roles ;
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
412: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
413: p_data => x_msg_data ,
407: p_encoded => FND_API.G_FALSE);
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: ROLLBACK TO Get_Salesrep_Roles ;
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
412: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
413: p_data => x_msg_data ,
414: p_encoded => FND_API.G_FALSE);
415: WHEN OTHERS THEN
410: ROLLBACK TO Get_Salesrep_Roles ;
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
412: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
413: p_data => x_msg_data ,
414: p_encoded => FND_API.G_FALSE);
415: WHEN OTHERS THEN
416: ROLLBACK TO Get_Salesrep_Roles ;
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
418: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
413: p_data => x_msg_data ,
414: p_encoded => FND_API.G_FALSE);
415: WHEN OTHERS THEN
416: ROLLBACK TO Get_Salesrep_Roles ;
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
418: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
419: THEN
420: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name) ;
421: END IF ;
420: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name) ;
421: END IF ;
422: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
423: p_data => x_msg_data ,
424: p_encoded => FND_API.G_FALSE);
425: END Get_Salesrep_Roles;
426:
427: -- Start of comments
428: -- API name : Get_Grp_Organization_Access
431: -- Pre-reqs : None.
432: -- Parameters :
433: -- IN : p_api_version IN NUMBER Required
434: -- p_init_msg_list IN VARCHAR2 Optional
435: -- Default = FND_API.G_FALSE
436: -- p_commit IN VARCHAR2 Optional
437: -- Default = FND_API.G_FALSE
438: -- p_validation_level IN NUMBER Optional
439: -- Default = FND_API.G_VALID_LEVEL_FULL
433: -- IN : p_api_version IN NUMBER Required
434: -- p_init_msg_list IN VARCHAR2 Optional
435: -- Default = FND_API.G_FALSE
436: -- p_commit IN VARCHAR2 Optional
437: -- Default = FND_API.G_FALSE
438: -- p_validation_level IN NUMBER Optional
439: -- Default = FND_API.G_VALID_LEVEL_FULL
440: -- p_comp_group_id IN NUMBER,
441: -- p_effective_date IN DATE
435: -- Default = FND_API.G_FALSE
436: -- p_commit IN VARCHAR2 Optional
437: -- Default = FND_API.G_FALSE
438: -- p_validation_level IN NUMBER Optional
439: -- Default = FND_API.G_VALID_LEVEL_FULL
440: -- p_comp_group_id IN NUMBER,
441: -- p_effective_date IN DATE
442: -- OUT : x_return_status OUT VARCHAR2(1)
443: -- x_msg_count OUT NUMBER
457: -- End of comments
458:
459: PROCEDURE Get_Grp_Organization_Access
460: ( p_api_version IN NUMBER,
461: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
462: p_commit IN VARCHAR2 := FND_API.G_FALSE,
463: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
464: p_comp_group_id IN NUMBER,
465: p_effective_date IN DATE := SYSDATE,
458:
459: PROCEDURE Get_Grp_Organization_Access
460: ( p_api_version IN NUMBER,
461: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
462: p_commit IN VARCHAR2 := FND_API.G_FALSE,
463: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
464: p_comp_group_id IN NUMBER,
465: p_effective_date IN DATE := SYSDATE,
466: x_updview_organization OUT NOCOPY grporg_tbl_type,
459: PROCEDURE Get_Grp_Organization_Access
460: ( p_api_version IN NUMBER,
461: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
462: p_commit IN VARCHAR2 := FND_API.G_FALSE,
463: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
464: p_comp_group_id IN NUMBER,
465: p_effective_date IN DATE := SYSDATE,
466: x_updview_organization OUT NOCOPY grporg_tbl_type,
467: x_upd_organization OUT NOCOPY grporg_tbl_type,
494:
495: BEGIN
496: SAVEPOINT Get_Grp_Organization_Access;
497: -- Standard call to check for call compatibility.
498: IF NOT FND_API.compatible_api_call
499: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
500: THEN
501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
502: END IF;
497: -- Standard call to check for call compatibility.
498: IF NOT FND_API.compatible_api_call
499: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
500: THEN
501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
502: END IF;
503:
504: -- Initialize message list if p_init_msg_list is set to TRUE.
505: IF FND_API.to_Boolean( p_init_msg_list ) THEN
501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
502: END IF;
503:
504: -- Initialize message list if p_init_msg_list is set to TRUE.
505: IF FND_API.to_Boolean( p_init_msg_list ) THEN
506: FND_MSG_PUB.initialize;
507: END IF;
508: -- Initialize API return status to success
509: x_return_status := FND_API.G_RET_STS_SUCCESS;
505: IF FND_API.to_Boolean( p_init_msg_list ) THEN
506: FND_MSG_PUB.initialize;
507: END IF;
508: -- Initialize API return status to success
509: x_return_status := FND_API.G_RET_STS_SUCCESS;
510:
511: -- API body
512: for eachrec in c_lkup LOOP
513: l_view_groups.delete;
519: x_view_groups => l_view_groups,
520: x_return_status => l_return_status,
521: x_msg_count => l_msg_count,
522: x_msg_data => l_msg_data);
523: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
524: cn_sfp_srp_util_pvt.get_group_access(p_api_version => l_api_version,
525: p_group_id => p_comp_group_id,
526: p_update_groups => l_update_groups,
527: p_view_groups => l_view_groups,
567:
568: -- End of API body.
569: << end_Get_Grp_Organ_Access >>
570: -- Standard check of p_commit.
571: IF FND_API.To_Boolean( p_commit ) THEN
572: COMMIT WORK;
573: END IF;
574: -- Standard call to get message count and if count is 1, get message info.
575: FND_MSG_PUB.Count_And_Get
575: FND_MSG_PUB.Count_And_Get
576: (
577: p_count => x_msg_count ,
578: p_data => x_msg_data ,
579: p_encoded => FND_API.G_FALSE
580: );
581:
582: EXCEPTION
583: WHEN FND_API.G_EXC_ERROR THEN
579: p_encoded => FND_API.G_FALSE
580: );
581:
582: EXCEPTION
583: WHEN FND_API.G_EXC_ERROR THEN
584: ROLLBACK TO Get_Grp_Organization_Access ;
585: x_return_status := FND_API.G_RET_STS_ERROR ;
586: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
587: p_data => x_msg_data ,
581:
582: EXCEPTION
583: WHEN FND_API.G_EXC_ERROR THEN
584: ROLLBACK TO Get_Grp_Organization_Access ;
585: x_return_status := FND_API.G_RET_STS_ERROR ;
586: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
587: p_data => x_msg_data ,
588: p_encoded => FND_API.G_FALSE);
589:
584: ROLLBACK TO Get_Grp_Organization_Access ;
585: x_return_status := FND_API.G_RET_STS_ERROR ;
586: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
587: p_data => x_msg_data ,
588: p_encoded => FND_API.G_FALSE);
589:
590: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
591: ROLLBACK TO Get_Grp_Organization_Access ;
592: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
586: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
587: p_data => x_msg_data ,
588: p_encoded => FND_API.G_FALSE);
589:
590: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
591: ROLLBACK TO Get_Grp_Organization_Access ;
592: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
593: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
594: p_data => x_msg_data ,
588: p_encoded => FND_API.G_FALSE);
589:
590: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
591: ROLLBACK TO Get_Grp_Organization_Access ;
592: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
593: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
594: p_data => x_msg_data ,
595: p_encoded => FND_API.G_FALSE);
596: WHEN OTHERS THEN
591: ROLLBACK TO Get_Grp_Organization_Access ;
592: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
593: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
594: p_data => x_msg_data ,
595: p_encoded => FND_API.G_FALSE);
596: WHEN OTHERS THEN
597: ROLLBACK TO Get_Grp_Organization_Access ;
598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
599: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
594: p_data => x_msg_data ,
595: p_encoded => FND_API.G_FALSE);
596: WHEN OTHERS THEN
597: ROLLBACK TO Get_Grp_Organization_Access ;
598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
599: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
600: THEN
601: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name) ;
602: END IF ;
601: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,l_api_name) ;
602: END IF ;
603: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count ,
604: p_data => x_msg_data ,
605: p_encoded => FND_API.G_FALSE);
606: END Get_Grp_Organization_Access;
607:
608: END CN_SFP_GROUP_UTIL_PVT;