23: -- Pre-reqs : None.
24: -- Parameters :
25: -- IN : p_api_version NUMBER Required
26: -- p_init_msg_list VARCHAR2 Optional
27: -- Default = FND_API.G_FALSE
28: -- p_commit VARCHAR2 Optional
29: -- Default = FND_API.G_FALSE
30: -- p_validation_level NUMBER Optional
31: -- Default = FND_API.G_VALID_LEVEL_FULL
25: -- IN : p_api_version NUMBER Required
26: -- p_init_msg_list VARCHAR2 Optional
27: -- Default = FND_API.G_FALSE
28: -- p_commit VARCHAR2 Optional
29: -- Default = FND_API.G_FALSE
30: -- p_validation_level NUMBER Optional
31: -- Default = FND_API.G_VALID_LEVEL_FULL
32:
33: -- OUT : x_return_status VARCHAR2(1)
27: -- Default = FND_API.G_FALSE
28: -- p_commit VARCHAR2 Optional
29: -- Default = FND_API.G_FALSE
30: -- p_validation_level NUMBER Optional
31: -- Default = FND_API.G_VALID_LEVEL_FULL
32:
33: -- OUT : x_return_status VARCHAR2(1)
34: -- x_msg_count NUMBER
35: -- x_msg_data VARCHAR2(2000)
39: -- End of comments
40:
41: PROCEDURE get_assignments
42: ( p_api_version IN NUMBER,
43: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
44: p_commit IN VARCHAR2 := FND_API.G_FALSE,
45: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
46: x_start_period_id IN cn_periods.period_id%TYPE,
47: x_end_period_id IN cn_periods.period_id%TYPE,
40:
41: PROCEDURE get_assignments
42: ( p_api_version IN NUMBER,
43: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
44: p_commit IN VARCHAR2 := FND_API.G_FALSE,
45: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
46: x_start_period_id IN cn_periods.period_id%TYPE,
47: x_end_period_id IN cn_periods.period_id%TYPE,
48: x_conc_program_id IN NUMBER,
41: PROCEDURE get_assignments
42: ( p_api_version IN NUMBER,
43: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
44: p_commit IN VARCHAR2 := FND_API.G_FALSE,
45: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
46: x_start_period_id IN cn_periods.period_id%TYPE,
47: x_end_period_id IN cn_periods.period_id%TYPE,
48: x_conc_program_id IN NUMBER,
49: x_return_status OUT NOCOPY VARCHAR2,
81: SAVEPOINT get_assignments;
82: --+
83: -- Standard call to check for call compatibility.
84: --+
85: IF NOT FND_API.Compatible_API_Call ( l_api_version,
86: p_api_version,
87: l_api_name,
88: G_PKG_NAME )
89: THEN
86: p_api_version,
87: l_api_name,
88: G_PKG_NAME )
89: THEN
90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
91: END IF;
92:
93: -- Initialize message list if p_init_msg_list is set to TRUE.
94: IF FND_API.to_Boolean( p_init_msg_list )
90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
91: END IF;
92:
93: -- Initialize message list if p_init_msg_list is set to TRUE.
94: IF FND_API.to_Boolean( p_init_msg_list )
95: THEN
96: FND_MSG_PUB.initialize;
97: END IF;
98:
96: FND_MSG_PUB.initialize;
97: END IF;
98:
99: -- Initialize API return status to success
100: x_return_status := FND_API.G_RET_STS_SUCCESS;
101:
102: --+
103: -- User hooks
104: --+
117: x_return_status => x_return_status,
118: x_msg_count => x_msg_count,
119: x_msg_data => x_msg_data);
120:
121: IF x_return_status = fnd_api.g_ret_sts_error THEN
122: RAISE fnd_api.g_exc_error;
123: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
124: RAISE fnd_api.g_exc_unexpected_error;
125: END IF;
118: x_msg_count => x_msg_count,
119: x_msg_data => x_msg_data);
120:
121: IF x_return_status = fnd_api.g_ret_sts_error THEN
122: RAISE fnd_api.g_exc_error;
123: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
124: RAISE fnd_api.g_exc_unexpected_error;
125: END IF;
126: END IF;
119: x_msg_data => x_msg_data);
120:
121: IF x_return_status = fnd_api.g_ret_sts_error THEN
122: RAISE fnd_api.g_exc_error;
123: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
124: RAISE fnd_api.g_exc_unexpected_error;
125: END IF;
126: END IF;
127:
120:
121: IF x_return_status = fnd_api.g_ret_sts_error THEN
122: RAISE fnd_api.g_exc_error;
123: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
124: RAISE fnd_api.g_exc_unexpected_error;
125: END IF;
126: END IF;
127:
128: -- vertical industry pre-processing section
139: x_return_status => x_return_status,
140: x_msg_count => x_msg_count,
141: x_msg_data => x_msg_data);
142:
143: IF x_return_status = fnd_api.g_ret_sts_error THEN
144: RAISE fnd_api.g_exc_error;
145: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
146: RAISE fnd_api.g_exc_unexpected_error;
147: END IF;
140: x_msg_count => x_msg_count,
141: x_msg_data => x_msg_data);
142:
143: IF x_return_status = fnd_api.g_ret_sts_error THEN
144: RAISE fnd_api.g_exc_error;
145: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
146: RAISE fnd_api.g_exc_unexpected_error;
147: END IF;
148: END IF;
141: x_msg_data => x_msg_data);
142:
143: IF x_return_status = fnd_api.g_ret_sts_error THEN
144: RAISE fnd_api.g_exc_error;
145: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
146: RAISE fnd_api.g_exc_unexpected_error;
147: END IF;
148: END IF;
149:
142:
143: IF x_return_status = fnd_api.g_ret_sts_error THEN
144: RAISE fnd_api.g_exc_error;
145: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
146: RAISE fnd_api.g_exc_unexpected_error;
147: END IF;
148: END IF;
149:
150: --+
184: fnd_file.put_line(fnd_file.Log, 'Start: collect trans data<<');
185: -- Begin --
186: jty_assign_bulk_pub.collect_trans_data
187: ( p_api_version_number => 1.0,
188: p_init_msg_list => FND_API.G_FALSE,
189: p_source_id => -1001,
190: p_trans_id => -1002,
191: p_program_name => 'SALES/INCENTIVE COMPENSATION PROGRAM',
192: p_mode => 'DATE EFFECTIVE',
204: IF (retcode = 0) THEN
205: fnd_file.put_line(fnd_file.Log, 'Start: get winners<<');
206: jty_assign_bulk_pub.get_winners
207: ( p_api_version_number => 1.0,
208: p_init_msg_list => FND_API.G_FALSE,
209: p_source_id => -1001,
210: p_trans_id => -1002,
211: p_program_name => 'SALES/INCENTIVE COMPENSATION PROGRAM',
212: p_mode => 'DATE EFFECTIVE',
220: );
221: fnd_file.put_line(fnd_file.Log, 'End: get winners<<');
222: END IF;
223: IF retcode <> 0 THEN
224: RAISE fnd_api.g_exc_error;
225: END IF;
226:
227: IF retcode=0 THEN
228: fnd_file.put_line(fnd_file.Log, 'Start: Cn : Process trx records<<');
239: p_org_id => l_org_id);
240: fnd_file.put_line(fnd_file.Log, 'End: Cn : Process trx records<<');
241: END IF;
242:
243: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
244: RAISE FND_API.G_EXC_ERROR ;
245: END IF;
246:
247: -- +
240: fnd_file.put_line(fnd_file.Log, 'End: Cn : Process trx records<<');
241: END IF;
242:
243: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
244: RAISE FND_API.G_EXC_ERROR ;
245: END IF;
246:
247: -- +
248: -- End of API body.
268: x_return_status => x_return_status,
269: x_msg_count => x_msg_count,
270: x_msg_data => x_msg_data);
271:
272: IF x_return_status = fnd_api.g_ret_sts_error THEN
273: RAISE fnd_api.g_exc_error;
274: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
275: RAISE fnd_api.g_exc_unexpected_error;
276: END IF;
269: x_msg_count => x_msg_count,
270: x_msg_data => x_msg_data);
271:
272: IF x_return_status = fnd_api.g_ret_sts_error THEN
273: RAISE fnd_api.g_exc_error;
274: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
275: RAISE fnd_api.g_exc_unexpected_error;
276: END IF;
277: END IF;
270: x_msg_data => x_msg_data);
271:
272: IF x_return_status = fnd_api.g_ret_sts_error THEN
273: RAISE fnd_api.g_exc_error;
274: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
275: RAISE fnd_api.g_exc_unexpected_error;
276: END IF;
277: END IF;
278:
271:
272: IF x_return_status = fnd_api.g_ret_sts_error THEN
273: RAISE fnd_api.g_exc_error;
274: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
275: RAISE fnd_api.g_exc_unexpected_error;
276: END IF;
277: END IF;
278:
279: -- customer post processing section
290: x_return_status => x_return_status,
291: x_msg_count => x_msg_count,
292: x_msg_data => x_msg_data);
293:
294: IF x_return_status = fnd_api.g_ret_sts_error THEN
295: RAISE fnd_api.g_exc_error;
296: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
297: RAISE fnd_api.g_exc_unexpected_error;
298: END IF;
291: x_msg_count => x_msg_count,
292: x_msg_data => x_msg_data);
293:
294: IF x_return_status = fnd_api.g_ret_sts_error THEN
295: RAISE fnd_api.g_exc_error;
296: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
297: RAISE fnd_api.g_exc_unexpected_error;
298: END IF;
299: END IF;
292: x_msg_data => x_msg_data);
293:
294: IF x_return_status = fnd_api.g_ret_sts_error THEN
295: RAISE fnd_api.g_exc_error;
296: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
297: RAISE fnd_api.g_exc_unexpected_error;
298: END IF;
299: END IF;
300: -- SK End of post processing hooks
293:
294: IF x_return_status = fnd_api.g_ret_sts_error THEN
295: RAISE fnd_api.g_exc_error;
296: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
297: RAISE fnd_api.g_exc_unexpected_error;
298: END IF;
299: END IF;
300: -- SK End of post processing hooks
301:
299: END IF;
300: -- SK End of post processing hooks
301:
302: -- Standard check of p_commit.
303: IF FND_API.To_Boolean( p_commit )
304: THEN
305: COMMIT WORK;
306: END IF;
307:
310: (p_count => x_msg_count,
311: p_data => x_msg_data
312: );
313: EXCEPTION
314: WHEN FND_API.G_EXC_ERROR THEN
315: ROLLBACK TO get_assignments;
316: x_return_status := FND_API.G_RET_STS_ERROR;
317: x_msg_count := l_msg_count;
318: x_msg_data := l_msg_data;
312: );
313: EXCEPTION
314: WHEN FND_API.G_EXC_ERROR THEN
315: ROLLBACK TO get_assignments;
316: x_return_status := FND_API.G_RET_STS_ERROR;
317: x_msg_count := l_msg_count;
318: x_msg_data := l_msg_data;
319: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
320: ROLLBACK TO get_assignments;
315: ROLLBACK TO get_assignments;
316: x_return_status := FND_API.G_RET_STS_ERROR;
317: x_msg_count := l_msg_count;
318: x_msg_data := l_msg_data;
319: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
320: ROLLBACK TO get_assignments;
321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
322: FND_MSG_PUB.Count_And_Get
323: (p_count => x_msg_count,
317: x_msg_count := l_msg_count;
318: x_msg_data := l_msg_data;
319: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
320: ROLLBACK TO get_assignments;
321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
322: FND_MSG_PUB.Count_And_Get
323: (p_count => x_msg_count,
324: p_data => x_msg_data,
325: p_encoded => fnd_api.g_false
321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
322: FND_MSG_PUB.Count_And_Get
323: (p_count => x_msg_count,
324: p_data => x_msg_data,
325: p_encoded => fnd_api.g_false
326: );
327: WHEN OTHERS THEN
328: ROLLBACK TO get_assignments;
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
325: p_encoded => fnd_api.g_false
326: );
327: WHEN OTHERS THEN
328: ROLLBACK TO get_assignments;
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: IF FND_MSG_PUB.Check_Msg_Level
331: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
332: THEN
333: FND_MSG_PUB.Add_Exc_Msg
335: END IF;
336: FND_MSG_PUB.Count_And_Get
337: (p_count => x_msg_count,
338: p_data => x_msg_data,
339: p_encoded => fnd_api.g_false
340: );
341: END get_assignments;
342:
343: END CN_POST_COLLECTION_TAE_PUB;