14: --
15: -- Parameters :
16: -- IN : p_api_version NUMBER Require
17: -- p_init_msg_list VARCHAR2 Optional
18: -- Default = FND_API.G_FALSE
19: -- p_commit VARCHAR2 Optional
20: -- Default = FND_API.G_FALSE
21: -- p_validation_level NUMBER Optional
22: -- Default = FND_API.G_VALID_LEVEL_FULL
16: -- IN : p_api_version NUMBER Require
17: -- p_init_msg_list VARCHAR2 Optional
18: -- Default = FND_API.G_FALSE
19: -- p_commit VARCHAR2 Optional
20: -- Default = FND_API.G_FALSE
21: -- p_validation_level NUMBER Optional
22: -- Default = FND_API.G_VALID_LEVEL_FULL
23: -- OUT : x_return_status VARCHAR2(1)
24: -- x_msg_count NUMBER
18: -- Default = FND_API.G_FALSE
19: -- p_commit VARCHAR2 Optional
20: -- Default = FND_API.G_FALSE
21: -- p_validation_level NUMBER Optional
22: -- Default = FND_API.G_VALID_LEVEL_FULL
23: -- OUT : x_return_status VARCHAR2(1)
24: -- x_msg_count NUMBER
25: -- x_msg_data VARCHAR2(2000)
26: -- IN : p_mgr_id NUMBER
41:
42: PROCEDURE Get_Psum_Data
43: (
44: p_api_version IN NUMBER,
45: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
46: p_commit IN VARCHAR2 := FND_API.G_FALSE,
47: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
48: x_return_status OUT NOCOPY VARCHAR2,
49: x_msg_count OUT NOCOPY NUMBER,
42: PROCEDURE Get_Psum_Data
43: (
44: p_api_version IN NUMBER,
45: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
46: p_commit IN VARCHAR2 := FND_API.G_FALSE,
47: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
48: x_return_status OUT NOCOPY VARCHAR2,
49: x_msg_count OUT NOCOPY NUMBER,
50: x_msg_data OUT NOCOPY VARCHAR2,
43: (
44: p_api_version IN NUMBER,
45: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
46: p_commit IN VARCHAR2 := FND_API.G_FALSE,
47: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
48: x_return_status OUT NOCOPY VARCHAR2,
49: x_msg_count OUT NOCOPY NUMBER,
50: x_msg_data OUT NOCOPY VARCHAR2,
51: p_mgr_id IN NUMBER,
72: BEGIN
73: -- Standard Start of API savepoint
74: SAVEPOINT Get_Psum_Data_SP;
75: -- Standard call to check for call compatibility.
76: IF NOT FND_API.compatible_api_call
77: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
78: THEN
79: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
80: END IF;
75: -- Standard call to check for call compatibility.
76: IF NOT FND_API.compatible_api_call
77: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
78: THEN
79: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
80: END IF;
81: -- Initialize message list if p_init_msg_list is set to TRUE.
82: IF FND_API.to_Boolean( p_init_msg_list ) THEN
83: FND_MSG_PUB.initialize;
78: THEN
79: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
80: END IF;
81: -- Initialize message list if p_init_msg_list is set to TRUE.
82: IF FND_API.to_Boolean( p_init_msg_list ) THEN
83: FND_MSG_PUB.initialize;
84: END IF;
85: -- Initialize API return status to success
86: x_return_status := FND_API.G_RET_STS_SUCCESS;
82: IF FND_API.to_Boolean( p_init_msg_list ) THEN
83: FND_MSG_PUB.initialize;
84: END IF;
85: -- Initialize API return status to success
86: x_return_status := FND_API.G_RET_STS_SUCCESS;
87: x_total_rows := 0;
88:
89: -- API body
90: IF (p_mgr_dtl_flag = 'N') THEN
96:
97:
98: CN_SRP_HIER_PROC_PVT.Get_desc_role_info
99: ( p_api_version => 1.0,
100: p_init_msg_list => FND_API.G_FALSE,
101: p_commit => FND_API.G_FALSE,
102: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
103: p_srp => l_srp_group_rec,
104: p_return_current => 'N',
97:
98: CN_SRP_HIER_PROC_PVT.Get_desc_role_info
99: ( p_api_version => 1.0,
100: p_init_msg_list => FND_API.G_FALSE,
101: p_commit => FND_API.G_FALSE,
102: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
103: p_srp => l_srp_group_rec,
104: p_return_current => 'N',
105: x_return_status => l_return_status,
98: CN_SRP_HIER_PROC_PVT.Get_desc_role_info
99: ( p_api_version => 1.0,
100: p_init_msg_list => FND_API.G_FALSE,
101: p_commit => FND_API.G_FALSE,
102: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
103: p_srp => l_srp_group_rec,
104: p_return_current => 'N',
105: x_return_status => l_return_status,
106: x_msg_count => l_msg_count,
108: x_srp => l_srp_role_info_tbl,
109: x_returned_rows => l_returned_rows
110: );
111:
112: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
115: THEN
116: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
109: x_returned_rows => l_returned_rows
110: );
111:
112: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
115: THEN
116: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
117: END IF;
110: );
111:
112: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
115: THEN
116: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
117: END IF;
118:
112: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
113: RAISE FND_API.G_EXC_ERROR;
114: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
115: THEN
116: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
117: END IF;
118:
119:
120: SELECT name
159: l_srp_group_rec.effective_date := p_effective_date;
160:
161: CN_SRP_HIER_PROC_PVT.Get_Descendant_group_mbrs(
162: p_api_version => 1.0,
163: p_init_msg_list => FND_API.G_FALSE,
164: p_commit => FND_API.G_FALSE,
165: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
166: p_srp => l_srp_group_rec,
167: p_first_level_only => 'Y',
160:
161: CN_SRP_HIER_PROC_PVT.Get_Descendant_group_mbrs(
162: p_api_version => 1.0,
163: p_init_msg_list => FND_API.G_FALSE,
164: p_commit => FND_API.G_FALSE,
165: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
166: p_srp => l_srp_group_rec,
167: p_first_level_only => 'Y',
168: x_return_status => l_return_status,
161: CN_SRP_HIER_PROC_PVT.Get_Descendant_group_mbrs(
162: p_api_version => 1.0,
163: p_init_msg_list => FND_API.G_FALSE,
164: p_commit => FND_API.G_FALSE,
165: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
166: p_srp => l_srp_group_rec,
167: p_first_level_only => 'Y',
168: x_return_status => l_return_status,
169: x_msg_count => l_msg_count,
171: x_srp => l_srp,
172: x_returned_rows => l_returned_rows
173: );
174:
175: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
176: RAISE FND_API.G_EXC_ERROR;
177: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
178: THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: x_returned_rows => l_returned_rows
173: );
174:
175: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
176: RAISE FND_API.G_EXC_ERROR;
177: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
178: THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: END IF;
173: );
174:
175: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
176: RAISE FND_API.G_EXC_ERROR;
177: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
178: THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: END IF;
181:
175: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
176: RAISE FND_API.G_EXC_ERROR;
177: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
178: THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: END IF;
181:
182: l_agg_counter := 1;
183: -- dbms_output.put_line('Count from Get_Descendant_group_mbrs is : ' || l_srp.COUNT);
189:
190: IF p_mgr_id <> l_srp(i).salesrep_id THEN
191: CN_SRP_HIER_PROC_PVT.Get_desc_role_info
192: (p_api_version => 1.0,
193: p_init_msg_list => FND_API.G_FALSE,
194: p_commit => FND_API.G_FALSE,
195: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
196: p_srp => l_srp_group_rec,
197: p_return_current => 'N',
190: IF p_mgr_id <> l_srp(i).salesrep_id THEN
191: CN_SRP_HIER_PROC_PVT.Get_desc_role_info
192: (p_api_version => 1.0,
193: p_init_msg_list => FND_API.G_FALSE,
194: p_commit => FND_API.G_FALSE,
195: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
196: p_srp => l_srp_group_rec,
197: p_return_current => 'N',
198: x_return_status => l_return_status,
191: CN_SRP_HIER_PROC_PVT.Get_desc_role_info
192: (p_api_version => 1.0,
193: p_init_msg_list => FND_API.G_FALSE,
194: p_commit => FND_API.G_FALSE,
195: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
196: p_srp => l_srp_group_rec,
197: p_return_current => 'N',
198: x_return_status => l_return_status,
199: x_msg_count => l_msg_count,
201: x_srp => l_srp_role_info_tbl,
202: x_returned_rows => l_returned_rows
203: );
204:
205: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
206: RAISE FND_API.G_EXC_ERROR;
207: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
208: THEN
209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
202: x_returned_rows => l_returned_rows
203: );
204:
205: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
206: RAISE FND_API.G_EXC_ERROR;
207: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
208: THEN
209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
210: END IF;
203: );
204:
205: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
206: RAISE FND_API.G_EXC_ERROR;
207: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
208: THEN
209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
210: END IF;
211:
205: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
206: RAISE FND_API.G_EXC_ERROR;
207: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
208: THEN
209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
210: END IF;
211:
212:
213: SELECT name INTO l_mgr_name FROM cn_srp_hr_data WHERE srp_id = l_srp_group_rec.salesrep_id;
250:
251: << end_api >>
252:
253: -- Standard check of p_commit.
254: IF FND_API.To_Boolean( p_commit ) THEN
255: COMMIT WORK;
256: END IF;
257: -- Standard call to get message count and if count is 1, get message info.
258: FND_MSG_PUB.Count_And_Get
258: FND_MSG_PUB.Count_And_Get
259: (
260: p_count => x_msg_count ,
261: p_data => x_msg_data ,
262: p_encoded => FND_API.G_FALSE
263: );
264:
265: EXCEPTION
266: WHEN FND_API.G_EXC_ERROR THEN
262: p_encoded => FND_API.G_FALSE
263: );
264:
265: EXCEPTION
266: WHEN FND_API.G_EXC_ERROR THEN
267: ROLLBACK TO Get_Psum_Data_SP ;
268: x_return_status := FND_API.G_RET_STS_ERROR ;
269: FND_MSG_PUB.Count_And_Get
270: (
264:
265: EXCEPTION
266: WHEN FND_API.G_EXC_ERROR THEN
267: ROLLBACK TO Get_Psum_Data_SP ;
268: x_return_status := FND_API.G_RET_STS_ERROR ;
269: FND_MSG_PUB.Count_And_Get
270: (
271: p_count => x_msg_count ,
272: p_data => x_msg_data ,
269: FND_MSG_PUB.Count_And_Get
270: (
271: p_count => x_msg_count ,
272: p_data => x_msg_data ,
273: p_encoded => FND_API.G_FALSE
274: );
275:
276: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
277: ROLLBACK TO Get_Psum_Data_SP ;
272: p_data => x_msg_data ,
273: p_encoded => FND_API.G_FALSE
274: );
275:
276: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
277: ROLLBACK TO Get_Psum_Data_SP ;
278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
279: FND_MSG_PUB.Count_And_Get
280: (
274: );
275:
276: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
277: ROLLBACK TO Get_Psum_Data_SP ;
278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
279: FND_MSG_PUB.Count_And_Get
280: (
281: p_count => x_msg_count ,
282: p_data => x_msg_data ,
279: FND_MSG_PUB.Count_And_Get
280: (
281: p_count => x_msg_count ,
282: p_data => x_msg_data ,
283: p_encoded => FND_API.G_FALSE
284: );
285: WHEN OTHERS THEN
286: ROLLBACK TO Get_Psum_Data_SP ;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
283: p_encoded => FND_API.G_FALSE
284: );
285: WHEN OTHERS THEN
286: ROLLBACK TO Get_Psum_Data_SP ;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
288: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
289: THEN
290: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
291: END IF;
292: FND_MSG_PUB.Count_And_Get
293: (
294: p_count => x_msg_count ,
295: p_data => x_msg_data ,
296: p_encoded => FND_API.G_FALSE
297: );
298: END Get_Psum_Data;
299:
300: -- ***********************************
302: -- ***********************************
303: PROCEDURE Get_MO_Psum_Data
304: (
305: p_api_version IN NUMBER,
306: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
307: p_commit IN VARCHAR2 := FND_API.G_FALSE,
308: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
309: x_return_status OUT NOCOPY VARCHAR2,
310: x_msg_count OUT NOCOPY NUMBER,
303: PROCEDURE Get_MO_Psum_Data
304: (
305: p_api_version IN NUMBER,
306: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
307: p_commit IN VARCHAR2 := FND_API.G_FALSE,
308: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
309: x_return_status OUT NOCOPY VARCHAR2,
310: x_msg_count OUT NOCOPY NUMBER,
311: x_msg_data OUT NOCOPY VARCHAR2,
304: (
305: p_api_version IN NUMBER,
306: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
307: p_commit IN VARCHAR2 := FND_API.G_FALSE,
308: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
309: x_return_status OUT NOCOPY VARCHAR2,
310: x_msg_count OUT NOCOPY NUMBER,
311: x_msg_data OUT NOCOPY VARCHAR2,
312: p_mgr_id IN NUMBER,
334: BEGIN
335: -- Standard Start of API savepoint
336: SAVEPOINT Get_MO_Psum_Data_SP;
337: -- Standard call to check for call compatibility.
338: IF NOT FND_API.compatible_api_call
339: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
340: THEN
341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
342: END IF;
337: -- Standard call to check for call compatibility.
338: IF NOT FND_API.compatible_api_call
339: ( l_api_version ,p_api_version ,l_api_name ,G_PKG_NAME )
340: THEN
341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
342: END IF;
343: -- Initialize message list if p_init_msg_list is set to TRUE.
344: IF FND_API.to_Boolean( p_init_msg_list ) THEN
345: FND_MSG_PUB.initialize;
340: THEN
341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
342: END IF;
343: -- Initialize message list if p_init_msg_list is set to TRUE.
344: IF FND_API.to_Boolean( p_init_msg_list ) THEN
345: FND_MSG_PUB.initialize;
346: END IF;
347: -- Initialize API return status to success
348: x_return_status := FND_API.G_RET_STS_SUCCESS;
344: IF FND_API.to_Boolean( p_init_msg_list ) THEN
345: FND_MSG_PUB.initialize;
346: END IF;
347: -- Initialize API return status to success
348: x_return_status := FND_API.G_RET_STS_SUCCESS;
349: x_total_rows := 0;
350:
351: -- API body
352: IF (p_mgr_dtl_flag = 'N') THEN
358:
359:
360: CN_SRP_HIER_PROC_PVT.Get_MO_desc_role_info
361: ( p_api_version => 1.0,
362: p_init_msg_list => FND_API.G_FALSE,
363: p_commit => FND_API.G_FALSE,
364: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
365: p_srp => l_srp_group_rec,
366: p_return_current => 'N',
359:
360: CN_SRP_HIER_PROC_PVT.Get_MO_desc_role_info
361: ( p_api_version => 1.0,
362: p_init_msg_list => FND_API.G_FALSE,
363: p_commit => FND_API.G_FALSE,
364: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
365: p_srp => l_srp_group_rec,
366: p_return_current => 'N',
367: p_is_multiorg => p_is_multiorg,
360: CN_SRP_HIER_PROC_PVT.Get_MO_desc_role_info
361: ( p_api_version => 1.0,
362: p_init_msg_list => FND_API.G_FALSE,
363: p_commit => FND_API.G_FALSE,
364: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
365: p_srp => l_srp_group_rec,
366: p_return_current => 'N',
367: p_is_multiorg => p_is_multiorg,
368: x_return_status => l_return_status,
371: x_srp => l_srp_role_info_tbl,
372: x_returned_rows => l_returned_rows
373: );
374:
375: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
376: RAISE FND_API.G_EXC_ERROR;
377: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
378: THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
372: x_returned_rows => l_returned_rows
373: );
374:
375: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
376: RAISE FND_API.G_EXC_ERROR;
377: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
378: THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
373: );
374:
375: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
376: RAISE FND_API.G_EXC_ERROR;
377: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
378: THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
381:
375: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
376: RAISE FND_API.G_EXC_ERROR;
377: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
378: THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
381:
382: IF p_is_multiorg = 'Y' THEN
383: SELECT RE.RESOURCE_NAME INTO l_mgr_name
426: l_srp_group_rec.effective_date := p_effective_date;
427:
428: CN_SRP_HIER_PROC_PVT.Get_MO_Descendant_group_mbrs(
429: p_api_version => 1.0,
430: p_init_msg_list => FND_API.G_FALSE,
431: p_commit => FND_API.G_FALSE,
432: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
433: p_srp => l_srp_group_rec,
434: p_first_level_only => 'Y',
427:
428: CN_SRP_HIER_PROC_PVT.Get_MO_Descendant_group_mbrs(
429: p_api_version => 1.0,
430: p_init_msg_list => FND_API.G_FALSE,
431: p_commit => FND_API.G_FALSE,
432: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
433: p_srp => l_srp_group_rec,
434: p_first_level_only => 'Y',
435: p_is_multiorg => p_is_multiorg,
428: CN_SRP_HIER_PROC_PVT.Get_MO_Descendant_group_mbrs(
429: p_api_version => 1.0,
430: p_init_msg_list => FND_API.G_FALSE,
431: p_commit => FND_API.G_FALSE,
432: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
433: p_srp => l_srp_group_rec,
434: p_first_level_only => 'Y',
435: p_is_multiorg => p_is_multiorg,
436: x_return_status => l_return_status,
439: x_srp => l_srp,
440: x_returned_rows => l_returned_rows
441: );
442:
443: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
444: RAISE FND_API.G_EXC_ERROR;
445: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
446: THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
440: x_returned_rows => l_returned_rows
441: );
442:
443: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
444: RAISE FND_API.G_EXC_ERROR;
445: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
446: THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END IF;
441: );
442:
443: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
444: RAISE FND_API.G_EXC_ERROR;
445: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
446: THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END IF;
449:
443: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
444: RAISE FND_API.G_EXC_ERROR;
445: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
446: THEN
447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
448: END IF;
449:
450: l_agg_counter := 1;
451: -- dbms_output.put_line('Count from Get_Descendant_group_mbrs is : ' || l_srp.COUNT);
457:
458: IF p_mgr_id <> l_srp(i).salesrep_id THEN
459: CN_SRP_HIER_PROC_PVT.Get_MO_desc_role_info
460: (p_api_version => 1.0,
461: p_init_msg_list => FND_API.G_FALSE,
462: p_commit => FND_API.G_FALSE,
463: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
464: p_srp => l_srp_group_rec,
465: p_return_current => 'N',
458: IF p_mgr_id <> l_srp(i).salesrep_id THEN
459: CN_SRP_HIER_PROC_PVT.Get_MO_desc_role_info
460: (p_api_version => 1.0,
461: p_init_msg_list => FND_API.G_FALSE,
462: p_commit => FND_API.G_FALSE,
463: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
464: p_srp => l_srp_group_rec,
465: p_return_current => 'N',
466: p_is_multiorg => p_is_multiorg,
459: CN_SRP_HIER_PROC_PVT.Get_MO_desc_role_info
460: (p_api_version => 1.0,
461: p_init_msg_list => FND_API.G_FALSE,
462: p_commit => FND_API.G_FALSE,
463: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
464: p_srp => l_srp_group_rec,
465: p_return_current => 'N',
466: p_is_multiorg => p_is_multiorg,
467: x_return_status => l_return_status,
470: x_srp => l_srp_role_info_tbl,
471: x_returned_rows => l_returned_rows
472: );
473:
474: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
475: RAISE FND_API.G_EXC_ERROR;
476: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
477: THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
471: x_returned_rows => l_returned_rows
472: );
473:
474: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
475: RAISE FND_API.G_EXC_ERROR;
476: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
477: THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
479: END IF;
472: );
473:
474: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
475: RAISE FND_API.G_EXC_ERROR;
476: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
477: THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
479: END IF;
480:
474: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
475: RAISE FND_API.G_EXC_ERROR;
476: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
477: THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
479: END IF;
480:
481:
482: IF p_is_multiorg = 'Y' THEN
527:
528: << end_api >>
529:
530: -- Standard check of p_commit.
531: IF FND_API.To_Boolean( p_commit ) THEN
532: COMMIT WORK;
533: END IF;
534: -- Standard call to get message count and if count is 1, get message info.
535: FND_MSG_PUB.Count_And_Get
535: FND_MSG_PUB.Count_And_Get
536: (
537: p_count => x_msg_count ,
538: p_data => x_msg_data ,
539: p_encoded => FND_API.G_FALSE
540: );
541:
542: EXCEPTION
543: WHEN FND_API.G_EXC_ERROR THEN
539: p_encoded => FND_API.G_FALSE
540: );
541:
542: EXCEPTION
543: WHEN FND_API.G_EXC_ERROR THEN
544: ROLLBACK TO Get_MO_Psum_Data_SP ;
545: x_return_status := FND_API.G_RET_STS_ERROR ;
546: FND_MSG_PUB.Count_And_Get
547: (
541:
542: EXCEPTION
543: WHEN FND_API.G_EXC_ERROR THEN
544: ROLLBACK TO Get_MO_Psum_Data_SP ;
545: x_return_status := FND_API.G_RET_STS_ERROR ;
546: FND_MSG_PUB.Count_And_Get
547: (
548: p_count => x_msg_count ,
549: p_data => x_msg_data ,
546: FND_MSG_PUB.Count_And_Get
547: (
548: p_count => x_msg_count ,
549: p_data => x_msg_data ,
550: p_encoded => FND_API.G_FALSE
551: );
552:
553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
554: ROLLBACK TO Get_MO_Psum_Data_SP ;
549: p_data => x_msg_data ,
550: p_encoded => FND_API.G_FALSE
551: );
552:
553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
554: ROLLBACK TO Get_MO_Psum_Data_SP ;
555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
556: FND_MSG_PUB.Count_And_Get
557: (
551: );
552:
553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
554: ROLLBACK TO Get_MO_Psum_Data_SP ;
555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
556: FND_MSG_PUB.Count_And_Get
557: (
558: p_count => x_msg_count ,
559: p_data => x_msg_data ,
556: FND_MSG_PUB.Count_And_Get
557: (
558: p_count => x_msg_count ,
559: p_data => x_msg_data ,
560: p_encoded => FND_API.G_FALSE
561: );
562: WHEN OTHERS THEN
563: ROLLBACK TO Get_MO_Psum_Data_SP ;
564: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
560: p_encoded => FND_API.G_FALSE
561: );
562: WHEN OTHERS THEN
563: ROLLBACK TO Get_MO_Psum_Data_SP ;
564: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
565: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
566: THEN
567: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
568: END IF;
569: FND_MSG_PUB.Count_And_Get
570: (
571: p_count => x_msg_count ,
572: p_data => x_msg_data ,
573: p_encoded => FND_API.G_FALSE
574: );
575: END Get_MO_Psum_Data;
576:
577: