85:
86:
87: PROCEDURE GET_NEXT_WORK_ITEMS
88: (p_api_version IN NUMBER,
89: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
90: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
91: p_strategy_id IN NUMBER,
92: x_return_status OUT NOCOPY VARCHAR2,
93: x_msg_count OUT NOCOPY NUMBER,
86:
87: PROCEDURE GET_NEXT_WORK_ITEMS
88: (p_api_version IN NUMBER,
89: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
90: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
91: p_strategy_id IN NUMBER,
92: x_return_status OUT NOCOPY VARCHAR2,
93: x_msg_count OUT NOCOPY NUMBER,
94: x_msg_data OUT NOCOPY VARCHAR2,
141:
142: SAVEPOINT GET_NEXT_WORK_ITEMS_PUB;
143:
144: -- Standard call to check for call compatibility.
145: IF NOT FND_API.Compatible_API_Call (l_api_version,
146: p_api_version,
147: l_api_name,
148: G_PKG_NAME) THEN
149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
145: IF NOT FND_API.Compatible_API_Call (l_api_version,
146: p_api_version,
147: l_api_name,
148: G_PKG_NAME) THEN
149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
150: END IF;
151:
152: -- Check p_init_msg_list
153: IF FND_API.to_Boolean( p_init_msg_list ) THEN
149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
150: END IF;
151:
152: -- Check p_init_msg_list
153: IF FND_API.to_Boolean( p_init_msg_list ) THEN
154: FND_MSG_PUB.initialize;
155: END IF;
156:
157: x_return_status := FND_API.G_RET_STS_SUCCESS;
153: IF FND_API.to_Boolean( p_init_msg_list ) THEN
154: FND_MSG_PUB.initialize;
155: END IF;
156:
157: x_return_status := FND_API.G_RET_STS_SUCCESS;
158:
159: -- Check for required parameter p_strategy_id
160: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
161: -- IF PG_DEBUG < 10 THEN
156:
157: x_return_status := FND_API.G_RET_STS_SUCCESS;
158:
159: -- Check for required parameter p_strategy_id
160: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
161: -- IF PG_DEBUG < 10 THEN
162: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
163: IEX_DEBUG_PUB.LogMessage('GET_NEXT_WORK_ITEMS: ' || 'Required Parameter p_strategy_id is invalid');
164: END IF;
164: END IF;
165: AddMissingArgMsg(
166: p_api_name => l_api_name_full,
167: p_param_name => 'p_strategy_id' );
168: RAISE FND_API.G_EXC_ERROR;
169: END IF;
170: -- IF PG_DEBUG < 10 THEN
171: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
172: IEX_DEBUG_PUB.LogMessage('GET_NEXT_WORK_ITEMS: ' || 'after p_strategy_id check');
184: END IF;
185: AddMissingArgMsg(
186: p_api_name => l_api_name_full,
187: p_param_name => 'l_template_id' );
188: RAISE FND_API.G_EXC_ERROR;
189: END IF;
190: -- IF PG_DEBUG < 10 THEN
191: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
192: IEX_DEBUG_PUB.LogMessage('GET_NEXT_WORK_ITEMS: ' || 'after l_template_id check'||l_template_id);
205:
206:
207:
208: -- Standard check of p_commit
209: IF FND_API.To_Boolean(p_commit) THEN
210: COMMIT WORK;
211: END IF;
212:
213: -- Standard call to get message count and if count is 1, get message info
214: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
215:
216:
217: EXCEPTION
218: WHEN FND_API.G_EXC_ERROR THEN
219: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
222:
216:
217: EXCEPTION
218: WHEN FND_API.G_EXC_ERROR THEN
219: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
222:
223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
224: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
219: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
220: x_return_status := FND_API.G_RET_STS_ERROR;
221: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
222:
223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
224: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
227:
221: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
222:
223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
224: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
227:
228: WHEN OTHERS THEN
229: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
226: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
227:
228: WHEN OTHERS THEN
229: ROLLBACK TO GET_NEXT_WORK_ITEMS_PUB;
230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
232: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
233: END IF;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
241: **/
242:
243: PROCEDURE CLOSE_STRY_AND_WITEMS
244: (p_api_version IN NUMBER,
245: p_commit IN VARCHAR2 DEFAULT FND_API.G_TRUE,
246: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
247: p_strategy_id IN NUMBER,
248: p_status IN VARCHAR2,
249: x_return_status OUT NOCOPY VARCHAR2,
242:
243: PROCEDURE CLOSE_STRY_AND_WITEMS
244: (p_api_version IN NUMBER,
245: p_commit IN VARCHAR2 DEFAULT FND_API.G_TRUE,
246: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
247: p_strategy_id IN NUMBER,
248: p_status IN VARCHAR2,
249: x_return_status OUT NOCOPY VARCHAR2,
250: x_msg_count OUT NOCOPY NUMBER,
275:
276: SAVEPOINT CLOSE_STRY_AND_WITEMS_PUB;
277:
278: -- Standard call to check for call compatibility.
279: IF NOT FND_API.Compatible_API_Call (l_api_version,
280: p_api_version,
281: l_api_name,
282: G_PKG_NAME) THEN
283: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
279: IF NOT FND_API.Compatible_API_Call (l_api_version,
280: p_api_version,
281: l_api_name,
282: G_PKG_NAME) THEN
283: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
284: END IF;
285:
286: -- Check p_init_msg_list
287: IF FND_API.to_Boolean( p_init_msg_list ) THEN
283: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
284: END IF;
285:
286: -- Check p_init_msg_list
287: IF FND_API.to_Boolean( p_init_msg_list ) THEN
288: FND_MSG_PUB.initialize;
289: END IF;
290: -- IF PG_DEBUG < 10 THEN
291: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
291: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
292: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after init');
293: END IF;
294:
295: x_return_status := FND_API.G_RET_STS_SUCCESS;
296:
297: -- Check for required parameter p_strategy_id
298: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
299: -- IF PG_DEBUG < 10 THEN
294:
295: x_return_status := FND_API.G_RET_STS_SUCCESS;
296:
297: -- Check for required parameter p_strategy_id
298: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
299: -- IF PG_DEBUG < 10 THEN
300: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
301: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'Required Parameter p_strategy_id is invalid');
302: END IF;
302: END IF;
303: AddMissingArgMsg(
304: p_api_name => l_api_name_full,
305: p_param_name => 'p_strategy_id' );
306: RAISE FND_API.G_EXC_ERROR;
307: END IF;
308: -- IF PG_DEBUG < 10 THEN
309: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
310: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after p_strategy_id check');
310: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after p_strategy_id check');
311: END IF;
312:
313: -- Check for required parameter p_status_id
314: IF (p_status IS NULL) OR (p_status = FND_API.G_MISS_CHAR) THEN
315: -- IF PG_DEBUG < 10 THEN
316: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
317: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'Required Parameter p_status is invalid');
318: END IF;
318: END IF;
319: AddMissingArgMsg(
320: p_api_name => l_api_name_full,
321: p_param_name => 'p_status' );
322: RAISE FND_API.G_EXC_ERROR;
323: END IF;
324: -- IF PG_DEBUG < 10 THEN
325: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
326: IEX_DEBUG_PUB.LogMessage('CLOSE_STRY_AND_WITEMS: ' || 'after p_status check');
350:
351: IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items(
352: P_Api_Version_Number =>l_api_version_number,
353: P_strategy_work_item_Rec =>l_strategy_work_item_Rec,
354: P_Init_Msg_List => p_init_msg_list, --FND_API.G_TRUE, bug 9462104
355: p_commit => p_commit, --FND_API.G_TRUE,
356: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
357: x_msg_count => l_msg_count,
358: x_msg_data => l_msg_data,
351: IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items(
352: P_Api_Version_Number =>l_api_version_number,
353: P_strategy_work_item_Rec =>l_strategy_work_item_Rec,
354: P_Init_Msg_List => p_init_msg_list, --FND_API.G_TRUE, bug 9462104
355: p_commit => p_commit, --FND_API.G_TRUE,
356: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
357: x_msg_count => l_msg_count,
358: x_msg_data => l_msg_data,
359: x_return_status => l_return_status,
352: P_Api_Version_Number =>l_api_version_number,
353: P_strategy_work_item_Rec =>l_strategy_work_item_Rec,
354: P_Init_Msg_List => p_init_msg_list, --FND_API.G_TRUE, bug 9462104
355: p_commit => p_commit, --FND_API.G_TRUE,
356: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
357: x_msg_count => l_msg_count,
358: x_msg_data => l_msg_data,
359: x_return_status => l_return_status,
360: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
362: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
363: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'After Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items '||
364: 'and Status =>'||l_return_status);
365: END IF;
366: IF l_return_status = FND_API.G_RET_STS_ERROR then
367: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
368: p_operation => 'UPDATE' );
369: raise FND_API.G_EXC_ERROR;
370: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
365: END IF;
366: IF l_return_status = FND_API.G_RET_STS_ERROR then
367: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
368: p_operation => 'UPDATE' );
369: raise FND_API.G_EXC_ERROR;
370: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
371: raise FND_API.G_EXC_UNEXPECTED_ERROR;
372: END IF;
373:
366: IF l_return_status = FND_API.G_RET_STS_ERROR then
367: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
368: p_operation => 'UPDATE' );
369: raise FND_API.G_EXC_ERROR;
370: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
371: raise FND_API.G_EXC_UNEXPECTED_ERROR;
372: END IF;
373:
374: END LOOP;
367: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
368: p_operation => 'UPDATE' );
369: raise FND_API.G_EXC_ERROR;
370: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
371: raise FND_API.G_EXC_UNEXPECTED_ERROR;
372: END IF;
373:
374: END LOOP;
375: -- IF PG_DEBUG < 10 THEN
393: AddInvalidArgMsg(
394: p_api_name => l_api_name_full,
395: p_param_value => p_strategy_id,
396: p_param_name => 'p_stragey_id' );
397: RAISE FND_API.G_EXC_ERROR;
398: WHEN OTHERS THEN
399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
400: END;
401:
395: p_param_value => p_strategy_id,
396: p_param_name => 'p_stragey_id' );
397: RAISE FND_API.G_EXC_ERROR;
398: WHEN OTHERS THEN
399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
400: END;
401:
402: l_strategy_Rec.object_version_number := l_object_version_number;
403:
412:
413: IEX_STRATEGY_PVT.Update_strategy(
414: P_Api_Version_Number =>l_api_version_number,
415: P_strategy_Rec =>l_strategy_Rec,
416: P_Init_Msg_List =>p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
417: p_commit =>p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
418: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
419: x_msg_count => l_msg_count,
420: x_msg_data => l_msg_data,
413: IEX_STRATEGY_PVT.Update_strategy(
414: P_Api_Version_Number =>l_api_version_number,
415: P_strategy_Rec =>l_strategy_Rec,
416: P_Init_Msg_List =>p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
417: p_commit =>p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
418: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
419: x_msg_count => l_msg_count,
420: x_msg_data => l_msg_data,
421: x_return_status => l_return_status,
414: P_Api_Version_Number =>l_api_version_number,
415: P_strategy_Rec =>l_strategy_Rec,
416: P_Init_Msg_List =>p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
417: p_commit =>p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
418: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
419: x_msg_count => l_msg_count,
420: x_msg_data => l_msg_data,
421: x_return_status => l_return_status,
422: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
425: iex_debug_pub.logMessage('CLOSE_STRY_AND_WITEMS: ' || 'After Calling IEX_STRATEGY_PVT.Update_strategy '||
426: 'and Status =>'||l_return_status);
427: END IF;
428:
429: IF l_return_status = FND_API.G_RET_STS_ERROR then
430: AddFailMsg( p_object => 'STRATEGY',
431: p_operation => 'UPDATE' );
432: raise FND_API.G_EXC_ERROR;
433: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
428:
429: IF l_return_status = FND_API.G_RET_STS_ERROR then
430: AddFailMsg( p_object => 'STRATEGY',
431: p_operation => 'UPDATE' );
432: raise FND_API.G_EXC_ERROR;
433: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
434: raise FND_API.G_EXC_UNEXPECTED_ERROR;
435: END IF;
436:
429: IF l_return_status = FND_API.G_RET_STS_ERROR then
430: AddFailMsg( p_object => 'STRATEGY',
431: p_operation => 'UPDATE' );
432: raise FND_API.G_EXC_ERROR;
433: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
434: raise FND_API.G_EXC_UNEXPECTED_ERROR;
435: END IF;
436:
437:
430: AddFailMsg( p_object => 'STRATEGY',
431: p_operation => 'UPDATE' );
432: raise FND_API.G_EXC_ERROR;
433: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
434: raise FND_API.G_EXC_UNEXPECTED_ERROR;
435: END IF;
436:
437:
438: -- Standard check of p_commit
435: END IF;
436:
437:
438: -- Standard check of p_commit
439: IF FND_API.To_Boolean(p_commit) THEN
440: COMMIT WORK;
441: END IF;
442: --Begin bug#5874874 gnramasa 25-Apr-2007
443: --Update the UWQ summary table after closing the strategy.
450: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
451:
452:
453: EXCEPTION
454: WHEN FND_API.G_EXC_ERROR THEN
455: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
456: x_return_status := FND_API.G_RET_STS_ERROR;
457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
458:
452:
453: EXCEPTION
454: WHEN FND_API.G_EXC_ERROR THEN
455: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
456: x_return_status := FND_API.G_RET_STS_ERROR;
457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
458:
459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
460: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
455: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
456: x_return_status := FND_API.G_RET_STS_ERROR;
457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
458:
459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
460: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
462: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
463:
457: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
458:
459: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
460: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
462: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
463:
464: WHEN OTHERS THEN
465: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
462: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
463:
464: WHEN OTHERS THEN
465: ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
468: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
469: END IF;
470: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
477: **/
478:
479: PROCEDURE CLOSE_STRATEGY
480: (p_api_version IN NUMBER,
481: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
482: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
483: p_strategy_id IN NUMBER,
484: p_status IN VARCHAR2,
485: x_return_status OUT NOCOPY VARCHAR2,
478:
479: PROCEDURE CLOSE_STRATEGY
480: (p_api_version IN NUMBER,
481: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
482: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
483: p_strategy_id IN NUMBER,
484: p_status IN VARCHAR2,
485: x_return_status OUT NOCOPY VARCHAR2,
486: x_msg_count OUT NOCOPY NUMBER,
508:
509: SAVEPOINT CLOSE_STRATEGY_PUB;
510:
511: -- Standard call to check for call compatibility.
512: IF NOT FND_API.Compatible_API_Call (l_api_version,
513: p_api_version,
514: l_api_name,
515: G_PKG_NAME) THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
512: IF NOT FND_API.Compatible_API_Call (l_api_version,
513: p_api_version,
514: l_api_name,
515: G_PKG_NAME) THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
517: END IF;
518:
519: -- Check p_init_msg_list
520: IF FND_API.to_Boolean( p_init_msg_list ) THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
517: END IF;
518:
519: -- Check p_init_msg_list
520: IF FND_API.to_Boolean( p_init_msg_list ) THEN
521: FND_MSG_PUB.initialize;
522: END IF;
523:
524: x_return_status := FND_API.G_RET_STS_SUCCESS;
520: IF FND_API.to_Boolean( p_init_msg_list ) THEN
521: FND_MSG_PUB.initialize;
522: END IF;
523:
524: x_return_status := FND_API.G_RET_STS_SUCCESS;
525:
526: -- Check for required parameter p_strategy_id
527: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
528: -- IF PG_DEBUG < 10 THEN
523:
524: x_return_status := FND_API.G_RET_STS_SUCCESS;
525:
526: -- Check for required parameter p_strategy_id
527: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
528: -- IF PG_DEBUG < 10 THEN
529: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
530: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'Required Parameter p_strategy_id is invalid');
531: END IF;
531: END IF;
532: AddMissingArgMsg(
533: p_api_name => l_api_name_full,
534: p_param_name => 'p_strategy_id' );
535: RAISE FND_API.G_EXC_ERROR;
536: END IF;
537: -- IF PG_DEBUG < 10 THEN
538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
539: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'after p_strategy_id check');
539: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'after p_strategy_id check');
540: END IF;
541:
542: -- Check for required parameter p_status_id
543: IF (p_status IS NULL) OR (p_status = FND_API.G_MISS_CHAR) THEN
544: -- IF PG_DEBUG < 10 THEN
545: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
546: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'Required Parameter p_status is invalid');
547: END IF;
547: END IF;
548: AddMissingArgMsg(
549: p_api_name => l_api_name_full,
550: p_param_name => 'p_status' );
551: RAISE FND_API.G_EXC_ERROR;
552: END IF;
553: -- IF PG_DEBUG < 10 THEN
554: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
555: IEX_DEBUG_PUB.LogMessage('CLOSE_STRATEGY: ' || 'after p_status check');
571: AddInvalidArgMsg(
572: p_api_name => l_api_name_full,
573: p_param_value => p_strategy_id,
574: p_param_name => 'p_stragey_id' );
575: RAISE FND_API.G_EXC_ERROR;
576: WHEN OTHERS THEN
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END;
579:
573: p_param_value => p_strategy_id,
574: p_param_name => 'p_stragey_id' );
575: RAISE FND_API.G_EXC_ERROR;
576: WHEN OTHERS THEN
577: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
578: END;
579:
580: l_strategy_Rec.object_version_number := l_object_version_number;
581:
589: END IF;
590:
591: IEX_STRATEGY_PVT.Update_strategy(
592: P_Api_Version_Number =>2.0,
593: P_Init_Msg_List => p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
594: p_commit => p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
595: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
596: P_strategy_Rec =>l_strategy_Rec,
597: x_msg_count => l_msg_count,
590:
591: IEX_STRATEGY_PVT.Update_strategy(
592: P_Api_Version_Number =>2.0,
593: P_Init_Msg_List => p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
594: p_commit => p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
595: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
596: P_strategy_Rec =>l_strategy_Rec,
597: x_msg_count => l_msg_count,
598: x_msg_data => l_msg_data,
591: IEX_STRATEGY_PVT.Update_strategy(
592: P_Api_Version_Number =>2.0,
593: P_Init_Msg_List => p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
594: p_commit => p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
595: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
596: P_strategy_Rec =>l_strategy_Rec,
597: x_msg_count => l_msg_count,
598: x_msg_data => l_msg_data,
599: x_return_status => l_return_status,
603: iex_debug_pub.logMessage('CLOSE_STRATEGY: ' || 'After Calling IEX_STRATEGY_PVT.Update_strategy '||
604: 'and Status =>'||l_return_status);
605: END IF;
606:
607: IF l_return_status = FND_API.G_RET_STS_ERROR then
608: AddFailMsg( p_object => 'STRATEGY',
609: p_operation => 'UPDATE' );
610: raise FND_API.G_EXC_ERROR;
611: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
606:
607: IF l_return_status = FND_API.G_RET_STS_ERROR then
608: AddFailMsg( p_object => 'STRATEGY',
609: p_operation => 'UPDATE' );
610: raise FND_API.G_EXC_ERROR;
611: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
612: raise FND_API.G_EXC_UNEXPECTED_ERROR;
613: END IF;
614:
607: IF l_return_status = FND_API.G_RET_STS_ERROR then
608: AddFailMsg( p_object => 'STRATEGY',
609: p_operation => 'UPDATE' );
610: raise FND_API.G_EXC_ERROR;
611: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
612: raise FND_API.G_EXC_UNEXPECTED_ERROR;
613: END IF;
614:
615:
608: AddFailMsg( p_object => 'STRATEGY',
609: p_operation => 'UPDATE' );
610: raise FND_API.G_EXC_ERROR;
611: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
612: raise FND_API.G_EXC_UNEXPECTED_ERROR;
613: END IF;
614:
615:
616: -- Standard check of p_commit
613: END IF;
614:
615:
616: -- Standard check of p_commit
617: IF FND_API.To_Boolean(p_commit) THEN
618: COMMIT WORK;
619: END IF;
620:
621: -- Standard call to get message count and if count is 1, get message info
622: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
623:
624:
625: EXCEPTION
626: WHEN FND_API.G_EXC_ERROR THEN
627: ROLLBACK TO CLOSE_STRATEGY_PUB;
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
630:
624:
625: EXCEPTION
626: WHEN FND_API.G_EXC_ERROR THEN
627: ROLLBACK TO CLOSE_STRATEGY_PUB;
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
630:
631: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
632: ROLLBACK TO CLOSE_STRATEGY_PUB;
627: ROLLBACK TO CLOSE_STRATEGY_PUB;
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
630:
631: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
632: ROLLBACK TO CLOSE_STRATEGY_PUB;
633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
634: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
635:
629: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
630:
631: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
632: ROLLBACK TO CLOSE_STRATEGY_PUB;
633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
634: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
635:
636: WHEN OTHERS THEN
637: ROLLBACK TO CLOSE_STRATEGY_PUB;
634: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
635:
636: WHEN OTHERS THEN
637: ROLLBACK TO CLOSE_STRATEGY_PUB;
638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
639: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
640: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
641: END IF;
642: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
650: **/
651:
652: PROCEDURE UPDATE_WORK_ITEM
653: (p_api_version IN NUMBER,
654: p_commit IN VARCHAR2 DEFAULT FND_API.G_TRUE,
655: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
656: p_work_item_id IN NUMBER,
657: p_status IN VARCHAR2,
658: x_return_status OUT NOCOPY VARCHAR2,
651:
652: PROCEDURE UPDATE_WORK_ITEM
653: (p_api_version IN NUMBER,
654: p_commit IN VARCHAR2 DEFAULT FND_API.G_TRUE,
655: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
656: p_work_item_id IN NUMBER,
657: p_status IN VARCHAR2,
658: x_return_status OUT NOCOPY VARCHAR2,
659: x_msg_count OUT NOCOPY NUMBER,
682:
683: SAVEPOINT UPDATE_WORK_ITEM_PUB;
684:
685: -- Standard call to check for call compatibility.
686: IF NOT FND_API.Compatible_API_Call (l_api_version,
687: p_api_version,
688: l_api_name,
689: G_PKG_NAME) THEN
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
686: IF NOT FND_API.Compatible_API_Call (l_api_version,
687: p_api_version,
688: l_api_name,
689: G_PKG_NAME) THEN
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
691: END IF;
692:
693: -- Check p_init_msg_list
694: IF FND_API.to_Boolean( p_init_msg_list ) THEN
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
691: END IF;
692:
693: -- Check p_init_msg_list
694: IF FND_API.to_Boolean( p_init_msg_list ) THEN
695: FND_MSG_PUB.initialize;
696: END IF;
697: -- IF PG_DEBUG < 10 THEN
698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
698: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
699: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after init');
700: END IF;
701:
702: x_return_status := FND_API.G_RET_STS_SUCCESS;
703:
704: -- Check for required parameter p_strategy_id
705: IF (p_work_item_id IS NULL) OR (p_work_item_id = FND_API.G_MISS_NUM) THEN
706: -- IF PG_DEBUG < 10 THEN
701:
702: x_return_status := FND_API.G_RET_STS_SUCCESS;
703:
704: -- Check for required parameter p_strategy_id
705: IF (p_work_item_id IS NULL) OR (p_work_item_id = FND_API.G_MISS_NUM) THEN
706: -- IF PG_DEBUG < 10 THEN
707: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
708: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'Required Parameter p_work_item_id is invalid');
709: END IF;
709: END IF;
710: AddMissingArgMsg(
711: p_api_name => l_api_name_full,
712: p_param_name => 'p_work_item_id' );
713: RAISE FND_API.G_EXC_ERROR;
714: END IF;
715: -- IF PG_DEBUG < 10 THEN
716: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
717: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after p_work_item_id check');
717: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after p_work_item_id check');
718: END IF;
719:
720: -- Check for required parameter p_status_id
721: IF (p_status IS NULL) OR (p_status = FND_API.G_MISS_CHAR) THEN
722: -- IF PG_DEBUG < 10 THEN
723: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
724: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'Required Parameter p_status is invalid');
725: END IF;
725: END IF;
726: AddMissingArgMsg(
727: p_api_name => l_api_name_full,
728: p_param_name => 'p_status' );
729: RAISE FND_API.G_EXC_ERROR;
730: END IF;
731: -- IF PG_DEBUG < 10 THEN
732: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
733: IEX_DEBUG_PUB.LogMessage('UPDATE_WORK_ITEM: ' || 'after p_status check');
751:
752: IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items(
753: P_Api_Version_Number =>l_api_version_number,
754: P_strategy_work_item_Rec =>l_strategy_work_item_Rec,
755: P_Init_Msg_List => p_init_msg_list, --FND_API.G_TRUE,
756: p_commit => p_commit , --FND_API.G_TRUE,
757: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
758: x_msg_count => l_msg_count,
759: x_msg_data => l_msg_data,
752: IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items(
753: P_Api_Version_Number =>l_api_version_number,
754: P_strategy_work_item_Rec =>l_strategy_work_item_Rec,
755: P_Init_Msg_List => p_init_msg_list, --FND_API.G_TRUE,
756: p_commit => p_commit , --FND_API.G_TRUE,
757: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
758: x_msg_count => l_msg_count,
759: x_msg_data => l_msg_data,
760: x_return_status => l_return_status,
753: P_Api_Version_Number =>l_api_version_number,
754: P_strategy_work_item_Rec =>l_strategy_work_item_Rec,
755: P_Init_Msg_List => p_init_msg_list, --FND_API.G_TRUE,
756: p_commit => p_commit , --FND_API.G_TRUE,
757: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
758: x_msg_count => l_msg_count,
759: x_msg_data => l_msg_data,
760: x_return_status => l_return_status,
761: XO_OBJECT_VERSION_NUMBER =>l_object_version_number );
763: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
764: iex_debug_pub.logMessage('UPDATE_WORK_ITEM: ' || 'After Calling IEX_STRATEGY_WORK_ITEMS_PVT.Update_strategy_work_items '||
765: 'and Status =>'||l_return_status);
766: END IF;
767: IF l_return_status = FND_API.G_RET_STS_ERROR then
768: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
769: p_operation => 'UPDATE' );
770: raise FND_API.G_EXC_ERROR;
771: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
766: END IF;
767: IF l_return_status = FND_API.G_RET_STS_ERROR then
768: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
769: p_operation => 'UPDATE' );
770: raise FND_API.G_EXC_ERROR;
771: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
772: raise FND_API.G_EXC_UNEXPECTED_ERROR;
773: END IF;
774:
767: IF l_return_status = FND_API.G_RET_STS_ERROR then
768: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
769: p_operation => 'UPDATE' );
770: raise FND_API.G_EXC_ERROR;
771: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
772: raise FND_API.G_EXC_UNEXPECTED_ERROR;
773: END IF;
774:
775: END LOOP;
768: AddFailMsg( p_object => 'STRATEGY_WORK_ITEMS',
769: p_operation => 'UPDATE' );
770: raise FND_API.G_EXC_ERROR;
771: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
772: raise FND_API.G_EXC_UNEXPECTED_ERROR;
773: END IF;
774:
775: END LOOP;
776: -- IF PG_DEBUG < 10 THEN
780:
781:
782:
783: -- Standard check of p_commit
784: IF FND_API.To_Boolean(p_commit) THEN
785: COMMIT WORK;
786: END IF;
787:
788: -- Standard call to get message count and if count is 1, get message info
789: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
790:
791:
792: EXCEPTION
793: WHEN FND_API.G_EXC_ERROR THEN
794: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
795: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
796: x_return_status := FND_API.G_RET_STS_ERROR;
797: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
792: EXCEPTION
793: WHEN FND_API.G_EXC_ERROR THEN
794: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
795: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
796: x_return_status := FND_API.G_RET_STS_ERROR;
797: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
798:
799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
800: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
795: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
796: x_return_status := FND_API.G_RET_STS_ERROR;
797: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
798:
799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
800: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
801: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
803: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
798:
799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
800: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
801: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
803: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
804:
805: WHEN OTHERS THEN
806: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
804:
805: WHEN OTHERS THEN
806: --ROLLBACK TO CLOSE_STRY_AND_WITEMS_PUB;
807: ROLLBACK TO UPDATE_WORK_ITEM_PUB;
808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
809: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
810: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
811: END IF;
812: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
817: * when a work item is created
818: **/
819: PROCEDURE UPDATE_NEXT_WORK_ITEM
820: (p_api_version IN NUMBER,
821: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
822: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
823: p_work_item_id IN NUMBER,
824: p_strategy_id IN NUMBER,
825: x_return_status OUT NOCOPY VARCHAR2,
818: **/
819: PROCEDURE UPDATE_NEXT_WORK_ITEM
820: (p_api_version IN NUMBER,
821: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
822: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
823: p_work_item_id IN NUMBER,
824: p_strategy_id IN NUMBER,
825: x_return_status OUT NOCOPY VARCHAR2,
826: x_msg_count OUT NOCOPY NUMBER,
843:
844: SAVEPOINT UPDATE_NEXT_WORK_ITEM_PUB;
845:
846: -- Standard call to check for call compatibility.
847: IF NOT FND_API.Compatible_API_Call (l_api_version,
848: p_api_version,
849: l_api_name,
850: G_PKG_NAME) THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
847: IF NOT FND_API.Compatible_API_Call (l_api_version,
848: p_api_version,
849: l_api_name,
850: G_PKG_NAME) THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: END IF;
853:
854: -- Check p_init_msg_list
855: IF FND_API.to_Boolean( p_init_msg_list ) THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: END IF;
853:
854: -- Check p_init_msg_list
855: IF FND_API.to_Boolean( p_init_msg_list ) THEN
856: FND_MSG_PUB.initialize;
857: END IF;
858:
859: x_return_status := FND_API.G_RET_STS_SUCCESS;
855: IF FND_API.to_Boolean( p_init_msg_list ) THEN
856: FND_MSG_PUB.initialize;
857: END IF;
858:
859: x_return_status := FND_API.G_RET_STS_SUCCESS;
860:
861: -- Check for required parameter p_strategy_id
862: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
863: -- IF PG_DEBUG < 10 THEN
858:
859: x_return_status := FND_API.G_RET_STS_SUCCESS;
860:
861: -- Check for required parameter p_strategy_id
862: IF (p_strategy_id IS NULL) OR (p_strategy_id = FND_API.G_MISS_NUM) THEN
863: -- IF PG_DEBUG < 10 THEN
864: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
865: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'Required Parameter p_strategy_id is invalid');
866: END IF;
866: END IF;
867: AddMissingArgMsg(
868: p_api_name => l_api_name_full,
869: p_param_name => 'p_strategy_id' );
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872: -- IF PG_DEBUG < 10 THEN
873: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
874: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'after p_strategy_id check');
874: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'after p_strategy_id check');
875: END IF;
876:
877: -- Check for required parameter p_work_item_id
878: IF (p_work_item_id IS NULL) OR (p_work_item_id = FND_API.G_MISS_NUM) THEN
879: -- IF PG_DEBUG < 10 THEN
880: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
881: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'Required Parameter p_work_item_id is invalid');
882: END IF;
882: END IF;
883: AddMissingArgMsg(
884: p_api_name => l_api_name_full,
885: p_param_name => 'p_work_item_id' );
886: RAISE FND_API.G_EXC_ERROR;
887: END IF;
888: -- IF PG_DEBUG < 10 THEN
889: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
890: IEX_DEBUG_PUB.LogMessage('UPDATE_NEXT_WORK_ITEM: ' || 'after p_work_item_id check');
905: AddInvalidArgMsg(
906: p_api_name => l_api_name_full,
907: p_param_value => p_strategy_id,
908: p_param_name => 'p_stragey_id' );
909: RAISE FND_API.G_EXC_ERROR;
910: WHEN OTHERS THEN
911: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
912: END;
913:
907: p_param_value => p_strategy_id,
908: p_param_name => 'p_stragey_id' );
909: RAISE FND_API.G_EXC_ERROR;
910: WHEN OTHERS THEN
911: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
912: END;
913:
914: l_strategy_Rec.object_version_number := l_object_version_number;
915:
923: END IF;
924:
925: IEX_STRATEGY_PVT.Update_strategy(
926: P_Api_Version_Number =>2.0,
927: P_Init_Msg_List =>p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
928: p_commit =>p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
929: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
930: P_strategy_Rec =>l_strategy_Rec,
931: x_msg_count => l_msg_count,
924:
925: IEX_STRATEGY_PVT.Update_strategy(
926: P_Api_Version_Number =>2.0,
927: P_Init_Msg_List =>p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
928: p_commit =>p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
929: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
930: P_strategy_Rec =>l_strategy_Rec,
931: x_msg_count => l_msg_count,
932: x_msg_data => l_msg_data,
925: IEX_STRATEGY_PVT.Update_strategy(
926: P_Api_Version_Number =>2.0,
927: P_Init_Msg_List =>p_init_msg_list, -- FND_API.G_TRUE, Bug 14053089 bibeura
928: p_commit =>p_commit, -- FND_API.G_TRUE, Bug 14053089 bibeura
929: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
930: P_strategy_Rec =>l_strategy_Rec,
931: x_msg_count => l_msg_count,
932: x_msg_data => l_msg_data,
933: x_return_status => l_return_status,
937: iex_debug_pub.logMessage('UPDATE_NEXT_WORK_ITEM: ' || 'After Calling IEX_STRATEGY_PVT.Update_strategy '||
938: 'and Status =>'||l_return_status);
939: END IF;
940:
941: IF l_return_status = FND_API.G_RET_STS_ERROR then
942: AddFailMsg( p_object => 'STRATEGY',
943: p_operation => 'UPDATE' );
944: raise FND_API.G_EXC_ERROR;
945: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
940:
941: IF l_return_status = FND_API.G_RET_STS_ERROR then
942: AddFailMsg( p_object => 'STRATEGY',
943: p_operation => 'UPDATE' );
944: raise FND_API.G_EXC_ERROR;
945: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
946: raise FND_API.G_EXC_UNEXPECTED_ERROR;
947: END IF;
948:
941: IF l_return_status = FND_API.G_RET_STS_ERROR then
942: AddFailMsg( p_object => 'STRATEGY',
943: p_operation => 'UPDATE' );
944: raise FND_API.G_EXC_ERROR;
945: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
946: raise FND_API.G_EXC_UNEXPECTED_ERROR;
947: END IF;
948:
949:
942: AddFailMsg( p_object => 'STRATEGY',
943: p_operation => 'UPDATE' );
944: raise FND_API.G_EXC_ERROR;
945: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
946: raise FND_API.G_EXC_UNEXPECTED_ERROR;
947: END IF;
948:
949:
950: -- Standard check of p_commit
947: END IF;
948:
949:
950: -- Standard check of p_commit
951: IF FND_API.To_Boolean(p_commit) THEN
952: COMMIT WORK;
953: END IF;
954:
955: -- Standard call to get message count and if count is 1, get message info
956: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
957:
958:
959: EXCEPTION
960: WHEN FND_API.G_EXC_ERROR THEN
961: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
962: x_return_status := FND_API.G_RET_STS_ERROR;
963: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
964:
958:
959: EXCEPTION
960: WHEN FND_API.G_EXC_ERROR THEN
961: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
962: x_return_status := FND_API.G_RET_STS_ERROR;
963: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
964:
965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
966: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
961: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
962: x_return_status := FND_API.G_RET_STS_ERROR;
963: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
964:
965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
966: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
968: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
969:
963: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
964:
965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
966: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
968: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
969:
970: WHEN OTHERS THEN
971: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
968: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
969:
970: WHEN OTHERS THEN
971: ROLLBACK TO UPDATE_NEXT_WORK_ITEM_PUB;
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
973: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
974: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
975: END IF;
976: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1341: if l_strategy_status not in ('OPEN','ONHOLD') or l_workitem_status<>'OPEN' or l_work_type='AUTOMATIC' then
1342: close c_strategy_summary;
1343: clear_uwq_str_summ(l_jtf_object_id,l_jtf_object_type);
1344: -- Added IF condition for Bug #14053089 bibeura
1345: IF FND_API.To_Boolean(p_commit) THEN
1346: COMMIT WORK;
1347: END IF;
1348: return;
1349: end if;
1418:
1419: END IF;
1420: close c_strategy_summary;
1421: -- Added IF condition for Bug #14053089 bibeura
1422: IF FND_API.To_Boolean(p_commit) THEN
1423: COMMIT WORK;
1424: END IF;
1425: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1426: iex_debug_pub.logmessage ('**** END refresh_uwq_str_summ ************');
1441: **/
1442: /*
1443: PROCEDURE REASSIGN_STRATEGY( p_strategy_id IN NUMBER,
1444: p_status IN VARCHAR2,
1445: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1446: x_return_status OUT NOCOPY VARCHAR2,
1447: x_msg_count OUT NOCOPY NUMBER,
1448: x_msg_data OUT NOCOPY VARCHAR2) IS
1449:
1468: BEGIN
1469:
1470: SAVEPOINT REASSIGN_STRATEGY_PUB;
1471:
1472: x_return_status := FND_API.G_RET_STS_ERROR;
1473:
1474:
1475: IEX_STRATEGY_WF.SEND_SIGNAL(process => 'IEXSTRY',
1476: strategy_id => p_strategy_id,
1509: END IF;
1510:
1511: IEX_STRATEGY_PUB.CREATE_STRATEGY
1512: (p_api_version_number => 2.0,
1513: p_init_msg_list => FND_API.G_TRUE,
1514: p_commit => p_commit,
1515: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1516: p_delinquencyId => l_delinquency_id ,
1517: p_objecttype => l_object_type,
1511: IEX_STRATEGY_PUB.CREATE_STRATEGY
1512: (p_api_version_number => 2.0,
1513: p_init_msg_list => FND_API.G_TRUE,
1514: p_commit => p_commit,
1515: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1516: p_delinquencyId => l_delinquency_id ,
1517: p_objecttype => l_object_type,
1518: p_objectid => l_object_id ,
1519: x_return_status => l_return_status,
1535: RETURN;
1536: END if; --l_status =cancelled
1537:
1538: -- Standard check of p_commit
1539: IF FND_API.To_Boolean(p_commit) THEN
1540: COMMIT WORK;
1541: END IF;
1542:
1543: EXCEPTION
1555:
1556: /*
1557: PROCEDURE UPDATE_AND_SENDSIGNAL( P_strategy_work_item_Rec IN
1558: iex_strategy_work_items_pvt.strategy_work_item_Rec_Type,
1559: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1560: x_return_status OUT NOCOPY VARCHAR2,
1561: x_msg_count OUT NOCOPY NUMBER,
1562: x_msg_data OUT NOCOPY VARCHAR2)IS
1563:
1570: BEGIN
1571:
1572: SAVEPOINT UPDATE_AND_SENDSIGNAL;
1573:
1574: x_return_status := FND_API.G_RET_STS_SUCCESS;
1575:
1576: iex_strategy_work_items_pvt.update_strategy_work_items(
1577: p_api_version_number => 2.0,
1578: p_init_msg_list => FND_API.G_TRUE,
1574: x_return_status := FND_API.G_RET_STS_SUCCESS;
1575:
1576: iex_strategy_work_items_pvt.update_strategy_work_items(
1577: p_api_version_number => 2.0,
1578: p_init_msg_list => FND_API.G_TRUE,
1579: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1580: p_commit => p_commit,
1581: x_return_status => l_return_status,
1582: x_msg_count => l_msg_count,
1575:
1576: iex_strategy_work_items_pvt.update_strategy_work_items(
1577: p_api_version_number => 2.0,
1578: p_init_msg_list => FND_API.G_TRUE,
1579: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1580: p_commit => p_commit,
1581: x_return_status => l_return_status,
1582: x_msg_count => l_msg_count,
1583: x_msg_data => l_msg_data,
1583: x_msg_data => l_msg_data,
1584: p_strategy_work_item_rec => p_strategy_work_item_rec,
1585: xo_object_version_number => l_object_version_number);
1586:
1587: If l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1588: x_msg_count :=l_msg_count;
1589: x_msg_data :=l_msg_data;
1590: x_return_status :=l_return_status;
1591: ROLLBACK TO UPDATE_AND_SENDSIGNAL;
1616: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1617: IEX_DEBUG_PUB.logmessage('UPDATE_AND_SENDSIGNAL: ' || 'send signal has failed ');
1618: END IF;
1619: rollback to UPDATE_AND_SENDSIGNAL;
1620: x_return_status := FND_API.G_RET_STS_ERROR;
1621: return;
1622: else
1623: -- IF PG_DEBUG < 10 THEN
1624: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1627: end if;
1628: END IF; --if status is successful
1629:
1630: -- Standard check of p_commit
1631: IF FND_API.To_Boolean(p_commit) THEN
1632: COMMIT WORK;
1633: END IF;
1634:
1635: EXCEPTION