17: BEGIN
18: fnd_message.set_name('OKL', 'OKL_API_ALL_MISSING_PARAM');
19: fnd_message.set_token('API_NAME', p_api_name);
20: fnd_message.set_token('MISSING_PARAM', p_param_name);
21: fnd_msg_pub.add;
22:
23: END AddMissingArgMsg;
24:
25: /**Name AddFailMsg
34: BEGIN
35: fnd_message.set_name('OKL', 'OKL_FAILED_OPERATION');
36: fnd_message.set_token('OBJECT', p_object);
37: fnd_message.set_token('OPERATION', p_operation);
38: fnd_msg_pub.add;
39:
40: END AddfailMsg;
41:
42:
69:
70: BEGIN
71: FOR l_count in 1..p_message_count LOOP
72:
73: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_true);
74: fnd_message.parse_encoded(l_temp_msg, l_appl_short_name, l_message_name);
75: OPEN Get_Appl_Id (l_appl_short_name);
76: FETCH Get_Appl_Id into l_id;
77: CLOSE Get_Appl_Id;
84: FETCH Get_Message_Num into l_message_num;
85: CLOSE Get_Message_Num;
86: END IF;
87:
88: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_previous, fnd_api.g_true);
89:
90: IF NVL(l_message_num, 0) <> 0
91: THEN
92: l_temp_msg := 'APP-' || to_char(l_message_num) || ': ';
96:
97: IF l_count = 1
98: THEN
99: l_msg_list := l_msg_list || l_temp_msg ||
100: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
101: ELSE
102: l_msg_list := l_msg_list || l_temp_msg ||
103: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
104: END IF;
99: l_msg_list := l_msg_list || l_temp_msg ||
100: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
101: ELSE
102: l_msg_list := l_msg_list || l_temp_msg ||
103: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
104: END IF;
105:
106: l_msg_list := l_msg_list || '';
107:
251: END IF;
252: END IF;
253:
254:
255: FND_MSG_PUB.Count_And_Get
256: ( p_count => x_msg_count,
257: p_data => x_msg_data
258: );
259:
265: okl_debug_pub.logmessage('OKL_CURE_WF: invoke_report_wf : error launching cure request wf');
266: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
267: x_msg_count := l_msg_count ;
268: x_msg_data := l_msg_data ;
269: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_CURE_WF','INVOKE_REPORT_WF');
270: Fnd_Msg_Pub.count_and_get(
271: p_count => x_msg_count
272: ,p_data => x_msg_data);
273:
266: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
267: x_msg_count := l_msg_count ;
268: x_msg_data := l_msg_data ;
269: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_CURE_WF','INVOKE_REPORT_WF');
270: Fnd_Msg_Pub.count_and_get(
271: p_count => x_msg_count
272: ,p_data => x_msg_data);
273:
274: End invoke_REPORT_wf;
307: SAVEPOINT APPROVE_CURE_REPORTS;
308: -- Initialize message list if p_init_msg_list is set to TRUE.
309: IF FND_API.to_Boolean( p_init_msg_list )
310: THEN
311: FND_MSG_PUB.initialize;
312: END IF;
313:
314: x_return_status := FND_API.G_RET_STS_SUCCESS;
315: --call refund_workflow
329: END IF;
330: END IF;
331: raise FND_API.G_EXC_ERROR;
332: ELSE
333: FND_MSG_PUB.initialize;
334: END IF;
335:
336:
337: --Update Cure REPORTS headers table
374: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
375: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Success -updated cure refund header' );
376: END IF;
377: END IF;
378: FND_MSG_PUB.initialize;
379: END IF;
380:
381: IF x_return_status =FND_API.G_RET_STS_SUCCESS THEN
382: FND_MSG_PUB.initialize;
378: FND_MSG_PUB.initialize;
379: END IF;
380:
381: IF x_return_status =FND_API.G_RET_STS_SUCCESS THEN
382: FND_MSG_PUB.initialize;
383: END IF;
384:
385: -- Standard check for p_commit
386: IF FND_API.to_Boolean( p_commit )THEN
386: IF FND_API.to_Boolean( p_commit )THEN
387: COMMIT WORK;
388: END IF;
389:
390: FND_MSG_PUB.Count_And_Get
391: ( p_count => x_msg_count,
392: p_data => x_msg_data
393: );
394:
400: okl_debug_pub.logmessage('OKL_CURE_WF: approve_cure_reports : Fnd_Api.G_EXC_ERROR');
401: x_return_status := Fnd_Api.G_RET_STS_ERROR;
402: x_msg_count := l_msg_count ;
403: x_msg_data := l_msg_data ;
404: Fnd_Msg_Pub.count_and_get(
405: p_count => x_msg_count
406: ,p_data => x_msg_data);
407: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
408: ROLLBACK TO APPROVE_CURE_REPORTS;
409: okl_debug_pub.logmessage('OKL_CURE_WF: approve_cure_reports : Fnd_Api.G_EXC_UNEXPECTED_ERROR');
410: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
411: x_msg_count := l_msg_count ;
412: x_msg_data := l_msg_data ;
413: Fnd_Msg_Pub.count_and_get(
414: p_count => x_msg_count
415: ,p_data => x_msg_data);
416: WHEN OTHERS THEN
417: ROLLBACK TO APPROVE_CURE_REPORTS;
418: okl_debug_pub.logmessage('OKL_CURE_WF: approve_cure_reports : OTHERS');
419: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
420: x_msg_count := l_msg_count ;
421: x_msg_data := l_msg_data ;
422: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_CURE_WF','APPROVE_CURE_REPORTS');
423: Fnd_Msg_Pub.count_and_get(
424: p_count => x_msg_count
425: ,p_data => x_msg_data);
426:
419: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
420: x_msg_count := l_msg_count ;
421: x_msg_data := l_msg_data ;
422: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_CURE_WF','APPROVE_CURE_REPORTS');
423: Fnd_Msg_Pub.count_and_get(
424: p_count => x_msg_count
425: ,p_data => x_msg_data);
426:
427: