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: --+
182: fnd_file.put_line(fnd_file.Log, 'Start: collect trans data<<');
183: -- Begin --
184: jty_assign_bulk_pub.collect_trans_data
185: ( p_api_version_number => 1.0,
186: p_init_msg_list => FND_API.G_FALSE,
187: p_source_id => -1001,
188: p_trans_id => -1002,
189: p_program_name => 'SALES/INCENTIVE COMPENSATION PROGRAM',
190: p_mode => 'DATE EFFECTIVE',
202: IF (retcode = 0) THEN
203: fnd_file.put_line(fnd_file.Log, 'Start: get winners<<');
204: jty_assign_bulk_pub.get_winners
205: ( p_api_version_number => 1.0,
206: p_init_msg_list => FND_API.G_FALSE,
207: p_source_id => -1001,
208: p_trans_id => -1002,
209: p_program_name => 'SALES/INCENTIVE COMPENSATION PROGRAM',
210: p_mode => 'DATE EFFECTIVE',
218: );
219: fnd_file.put_line(fnd_file.Log, 'End: get winners<<');
220: END IF;
221: IF retcode <> 0 THEN
222: RAISE fnd_api.g_exc_error;
223: END IF;
224:
225: IF retcode=0 THEN
226: fnd_file.put_line(fnd_file.Log, 'Start: Cn : Process trx records<<');
237: p_org_id => l_org_id);
238: fnd_file.put_line(fnd_file.Log, 'End: Cn : Process trx records<<');
239: END IF;
240:
241: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
242: RAISE FND_API.G_EXC_ERROR ;
243: END IF;
244:
245: -- +
238: fnd_file.put_line(fnd_file.Log, 'End: Cn : Process trx records<<');
239: END IF;
240:
241: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
242: RAISE FND_API.G_EXC_ERROR ;
243: END IF;
244:
245: -- +
246: -- End of API body.
266: x_return_status => x_return_status,
267: x_msg_count => x_msg_count,
268: x_msg_data => x_msg_data);
269:
270: IF x_return_status = fnd_api.g_ret_sts_error THEN
271: RAISE fnd_api.g_exc_error;
272: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
273: RAISE fnd_api.g_exc_unexpected_error;
274: END IF;
267: x_msg_count => x_msg_count,
268: x_msg_data => x_msg_data);
269:
270: IF x_return_status = fnd_api.g_ret_sts_error THEN
271: RAISE fnd_api.g_exc_error;
272: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
273: RAISE fnd_api.g_exc_unexpected_error;
274: END IF;
275: END IF;
268: x_msg_data => x_msg_data);
269:
270: IF x_return_status = fnd_api.g_ret_sts_error THEN
271: RAISE fnd_api.g_exc_error;
272: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
273: RAISE fnd_api.g_exc_unexpected_error;
274: END IF;
275: END IF;
276:
269:
270: IF x_return_status = fnd_api.g_ret_sts_error THEN
271: RAISE fnd_api.g_exc_error;
272: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
273: RAISE fnd_api.g_exc_unexpected_error;
274: END IF;
275: END IF;
276:
277: -- customer post processing section
288: x_return_status => x_return_status,
289: x_msg_count => x_msg_count,
290: x_msg_data => x_msg_data);
291:
292: IF x_return_status = fnd_api.g_ret_sts_error THEN
293: RAISE fnd_api.g_exc_error;
294: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
295: RAISE fnd_api.g_exc_unexpected_error;
296: END IF;
289: x_msg_count => x_msg_count,
290: x_msg_data => x_msg_data);
291:
292: IF x_return_status = fnd_api.g_ret_sts_error THEN
293: RAISE fnd_api.g_exc_error;
294: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
295: RAISE fnd_api.g_exc_unexpected_error;
296: END IF;
297: END IF;
290: x_msg_data => x_msg_data);
291:
292: IF x_return_status = fnd_api.g_ret_sts_error THEN
293: RAISE fnd_api.g_exc_error;
294: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
295: RAISE fnd_api.g_exc_unexpected_error;
296: END IF;
297: END IF;
298: -- SK End of post processing hooks
291:
292: IF x_return_status = fnd_api.g_ret_sts_error THEN
293: RAISE fnd_api.g_exc_error;
294: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
295: RAISE fnd_api.g_exc_unexpected_error;
296: END IF;
297: END IF;
298: -- SK End of post processing hooks
299:
297: END IF;
298: -- SK End of post processing hooks
299:
300: -- Standard check of p_commit.
301: IF FND_API.To_Boolean( p_commit )
302: THEN
303: COMMIT WORK;
304: END IF;
305:
308: (p_count => x_msg_count,
309: p_data => x_msg_data
310: );
311: EXCEPTION
312: WHEN FND_API.G_EXC_ERROR THEN
313: ROLLBACK TO get_assignments;
314: x_return_status := FND_API.G_RET_STS_ERROR;
315: x_msg_count := l_msg_count;
316: x_msg_data := l_msg_data;
310: );
311: EXCEPTION
312: WHEN FND_API.G_EXC_ERROR THEN
313: ROLLBACK TO get_assignments;
314: x_return_status := FND_API.G_RET_STS_ERROR;
315: x_msg_count := l_msg_count;
316: x_msg_data := l_msg_data;
317: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
318: ROLLBACK TO get_assignments;
313: ROLLBACK TO get_assignments;
314: x_return_status := FND_API.G_RET_STS_ERROR;
315: x_msg_count := l_msg_count;
316: x_msg_data := l_msg_data;
317: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
318: ROLLBACK TO get_assignments;
319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
320: FND_MSG_PUB.Count_And_Get
321: (p_count => x_msg_count,
315: x_msg_count := l_msg_count;
316: x_msg_data := l_msg_data;
317: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
318: ROLLBACK TO get_assignments;
319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
320: FND_MSG_PUB.Count_And_Get
321: (p_count => x_msg_count,
322: p_data => x_msg_data,
323: p_encoded => fnd_api.g_false
319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
320: FND_MSG_PUB.Count_And_Get
321: (p_count => x_msg_count,
322: p_data => x_msg_data,
323: p_encoded => fnd_api.g_false
324: );
325: WHEN OTHERS THEN
326: ROLLBACK TO get_assignments;
327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
323: p_encoded => fnd_api.g_false
324: );
325: WHEN OTHERS THEN
326: ROLLBACK TO get_assignments;
327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
328: IF FND_MSG_PUB.Check_Msg_Level
329: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
330: THEN
331: FND_MSG_PUB.Add_Exc_Msg
333: END IF;
334: FND_MSG_PUB.Count_And_Get
335: (p_count => x_msg_count,
336: p_data => x_msg_data,
337: p_encoded => fnd_api.g_false
338: );
339: END get_assignments;
340:
341: END CN_POST_COLLECTION_TAE_PUB;