13: pg_debug VARCHAR2(1) := nvl(fnd_profile.value('AFLOG_ENABLED'), 'N');
14:
15: PROCEDURE default_reasons (
16: p_api_version IN NUMBER,
17: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
18: p_commit IN VARCHAR2 := fnd_api.g_false,
19: p_mode IN VARCHAR2 DEFAULT 'ALL',
20: x_return_status OUT NOCOPY VARCHAR2,
21: x_msg_count OUT NOCOPY NUMBER,
14:
15: PROCEDURE default_reasons (
16: p_api_version IN NUMBER,
17: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
18: p_commit IN VARCHAR2 := fnd_api.g_false,
19: p_mode IN VARCHAR2 DEFAULT 'ALL',
20: x_return_status OUT NOCOPY VARCHAR2,
21: x_msg_count OUT NOCOPY NUMBER,
22: x_msg_data OUT NOCOPY VARCHAR2) IS
29: -- Standard Start of API savepoint
30: SAVEPOINT default_reasons_grp;
31:
32: -- Standard call to check for call compatibility.
33: IF NOT FND_API.Compatible_API_Call (
34: p_current_version_number => l_api_version,
35: p_caller_version_number => p_api_version,
36: p_api_name => l_api_name,
37: p_pkg_name => g_pkg_name) THEN
35: p_caller_version_number => p_api_version,
36: p_api_name => l_api_name,
37: p_pkg_name => g_pkg_name) THEN
38:
39: RAISE fnd_api.g_exc_unexpected_error;
40:
41: END IF;
42:
43: -- Initialize message list if p_init_msg_list is set to TRUE.
40:
41: END IF;
42:
43: -- Initialize message list if p_init_msg_list is set to TRUE.
44: IF FND_API.to_Boolean( p_init_msg_list ) THEN
45: fnd_msg_pub.initialize;
46: END IF;
47:
48: -- Initialize API return status to success
45: fnd_msg_pub.initialize;
46: END IF;
47:
48: -- Initialize API return status to success
49: x_return_status := FND_API.G_RET_STS_SUCCESS;
50:
51: fun_rule_pub.apply_rule_bulk (
52: p_application_short_name => 'AR',
53: p_rule_object_name => ar_revenue_management_pvt.c_rule_object_name,
56: p_primary_key_column_name => 'SOURCE_LINE_ID'
57: );
58:
59: EXCEPTION
60: WHEN fnd_api.g_exc_error THEN
61: ROLLBACK TO default_reasons_grp;
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: fnd_msg_pub.count_and_get (
64: p_encoded => fnd_api.g_false,
58:
59: EXCEPTION
60: WHEN fnd_api.g_exc_error THEN
61: ROLLBACK TO default_reasons_grp;
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: fnd_msg_pub.count_and_get (
64: p_encoded => fnd_api.g_false,
65: p_count => x_msg_count,
66: p_data => x_msg_data);
60: WHEN fnd_api.g_exc_error THEN
61: ROLLBACK TO default_reasons_grp;
62: x_return_status := FND_API.G_RET_STS_ERROR ;
63: fnd_msg_pub.count_and_get (
64: p_encoded => fnd_api.g_false,
65: p_count => x_msg_count,
66: p_data => x_msg_data);
67:
68: WHEN fnd_api.g_exc_unexpected_error THEN
64: p_encoded => fnd_api.g_false,
65: p_count => x_msg_count,
66: p_data => x_msg_data);
67:
68: WHEN fnd_api.g_exc_unexpected_error THEN
69: ROLLBACK TO default_reasons_grp;
70: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
71: fnd_msg_pub.count_and_get (
72: p_encoded => fnd_api.g_false,
66: p_data => x_msg_data);
67:
68: WHEN fnd_api.g_exc_unexpected_error THEN
69: ROLLBACK TO default_reasons_grp;
70: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
71: fnd_msg_pub.count_and_get (
72: p_encoded => fnd_api.g_false,
73: p_count => x_msg_count,
74: p_data => x_msg_data);
68: WHEN fnd_api.g_exc_unexpected_error THEN
69: ROLLBACK TO default_reasons_grp;
70: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
71: fnd_msg_pub.count_and_get (
72: p_encoded => fnd_api.g_false,
73: p_count => x_msg_count,
74: p_data => x_msg_data);
75:
76: WHEN OTHERS THEN
74: p_data => x_msg_data);
75:
76: WHEN OTHERS THEN
77: ROLLBACK TO default_reasons_grp;
78: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
79: fnd_msg_pub.count_and_get (
80: p_encoded => fnd_api.g_false,
81: p_count => x_msg_count,
82: p_data => x_msg_data);
76: WHEN OTHERS THEN
77: ROLLBACK TO default_reasons_grp;
78: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
79: fnd_msg_pub.count_and_get (
80: p_encoded => fnd_api.g_false,
81: p_count => x_msg_count,
82: p_data => x_msg_data);
83:
84: END default_reasons;
85:
86:
87: PROCEDURE record_acceptance (
88: p_api_version IN NUMBER,
89: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
90: p_commit IN VARCHAR2 := fnd_api.g_false,
91: p_order_line IN line_flex_rec,
92: x_return_status OUT NOCOPY VARCHAR2,
93: x_msg_count OUT NOCOPY NUMBER,
86:
87: PROCEDURE record_acceptance (
88: p_api_version IN NUMBER,
89: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
90: p_commit IN VARCHAR2 := fnd_api.g_false,
91: p_order_line IN line_flex_rec,
92: x_return_status OUT NOCOPY VARCHAR2,
93: x_msg_count OUT NOCOPY NUMBER,
94: x_msg_data OUT NOCOPY VARCHAR2) IS
133: -- Standard Start of API savepoint
134: SAVEPOINT record_acceptance_grp;
135:
136: -- Standard call to check for call compatibility.
137: IF NOT FND_API.Compatible_API_Call (
138: p_current_version_number => l_api_version,
139: p_caller_version_number => p_api_version,
140: p_api_name => l_api_name,
141: p_pkg_name => g_pkg_name) THEN
139: p_caller_version_number => p_api_version,
140: p_api_name => l_api_name,
141: p_pkg_name => g_pkg_name) THEN
142:
143: RAISE fnd_api.g_exc_unexpected_error;
144:
145: END IF;
146:
147: -- Initialize message list if p_init_msg_list is set to TRUE.
144:
145: END IF;
146:
147: -- Initialize message list if p_init_msg_list is set to TRUE.
148: IF FND_API.to_Boolean( p_init_msg_list ) THEN
149: fnd_msg_pub.initialize;
150: END IF;
151:
152: /* 5283886 - initialize ar_raapi_util */
152: /* 5283886 - initialize ar_raapi_util */
153: ar_raapi_util.constant_system_values;
154:
155: -- Initialize API return status to success
156: x_return_status := FND_API.G_RET_STS_SUCCESS;
157:
158: /* Parent or target lines */
159: FOR p_line_rec IN parent_lines LOOP
160: IF pg_debug IN ('Y','C')
297: arp_debug.debug('ar_deferral_reasons_grp.record_acceptance()-');
298: END IF;
299:
300: EXCEPTION
301: WHEN fnd_api.g_exc_error THEN
302: arp_debug.debug('EXCEPTION: fnd_api.g_exc_error');
303: ROLLBACK TO record_acceptance_grp;
304: x_return_status := FND_API.G_RET_STS_ERROR ;
305: fnd_msg_pub.count_and_get (
298: END IF;
299:
300: EXCEPTION
301: WHEN fnd_api.g_exc_error THEN
302: arp_debug.debug('EXCEPTION: fnd_api.g_exc_error');
303: ROLLBACK TO record_acceptance_grp;
304: x_return_status := FND_API.G_RET_STS_ERROR ;
305: fnd_msg_pub.count_and_get (
306: p_encoded => fnd_api.g_false,
300: EXCEPTION
301: WHEN fnd_api.g_exc_error THEN
302: arp_debug.debug('EXCEPTION: fnd_api.g_exc_error');
303: ROLLBACK TO record_acceptance_grp;
304: x_return_status := FND_API.G_RET_STS_ERROR ;
305: fnd_msg_pub.count_and_get (
306: p_encoded => fnd_api.g_false,
307: p_count => x_msg_count,
308: p_data => x_msg_data);
302: arp_debug.debug('EXCEPTION: fnd_api.g_exc_error');
303: ROLLBACK TO record_acceptance_grp;
304: x_return_status := FND_API.G_RET_STS_ERROR ;
305: fnd_msg_pub.count_and_get (
306: p_encoded => fnd_api.g_false,
307: p_count => x_msg_count,
308: p_data => x_msg_data);
309:
310: WHEN fnd_api.g_exc_unexpected_error THEN
306: p_encoded => fnd_api.g_false,
307: p_count => x_msg_count,
308: p_data => x_msg_data);
309:
310: WHEN fnd_api.g_exc_unexpected_error THEN
311: arp_debug.debug('EXCEPTION: fnd_api.g_exc_unexpected_error');
312: ROLLBACK TO record_acceptance_grp;
313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
314: fnd_msg_pub.count_and_get (
307: p_count => x_msg_count,
308: p_data => x_msg_data);
309:
310: WHEN fnd_api.g_exc_unexpected_error THEN
311: arp_debug.debug('EXCEPTION: fnd_api.g_exc_unexpected_error');
312: ROLLBACK TO record_acceptance_grp;
313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
314: fnd_msg_pub.count_and_get (
315: p_encoded => fnd_api.g_false,
309:
310: WHEN fnd_api.g_exc_unexpected_error THEN
311: arp_debug.debug('EXCEPTION: fnd_api.g_exc_unexpected_error');
312: ROLLBACK TO record_acceptance_grp;
313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
314: fnd_msg_pub.count_and_get (
315: p_encoded => fnd_api.g_false,
316: p_count => x_msg_count,
317: p_data => x_msg_data);
311: arp_debug.debug('EXCEPTION: fnd_api.g_exc_unexpected_error');
312: ROLLBACK TO record_acceptance_grp;
313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
314: fnd_msg_pub.count_and_get (
315: p_encoded => fnd_api.g_false,
316: p_count => x_msg_count,
317: p_data => x_msg_data);
318:
319: WHEN OTHERS THEN
318:
319: WHEN OTHERS THEN
320: arp_debug.debug('EXCEPTION: Others');
321: ROLLBACK TO record_acceptance_grp;
322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
323: fnd_msg_pub.count_and_get (
324: p_encoded => fnd_api.g_false,
325: p_count => x_msg_count,
326: p_data => x_msg_data);
320: arp_debug.debug('EXCEPTION: Others');
321: ROLLBACK TO record_acceptance_grp;
322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
323: fnd_msg_pub.count_and_get (
324: p_encoded => fnd_api.g_false,
325: p_count => x_msg_count,
326: p_data => x_msg_data);
327:
328: END record_acceptance;
329:
330:
331: PROCEDURE record_proof_of_delivery (
332: p_api_version IN NUMBER,
333: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
334: p_commit IN VARCHAR2 := fnd_api.g_false,
335: p_delivery_id IN NUMBER,
336: p_pod_date IN DATE,
337: x_return_status OUT NOCOPY VARCHAR2,
330:
331: PROCEDURE record_proof_of_delivery (
332: p_api_version IN NUMBER,
333: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
334: p_commit IN VARCHAR2 := fnd_api.g_false,
335: p_delivery_id IN NUMBER,
336: p_pod_date IN DATE,
337: x_return_status OUT NOCOPY VARCHAR2,
338: x_msg_count OUT NOCOPY NUMBER,
369: -- Standard Start of API savepoint
370: SAVEPOINT record_proof_of_delivery_grp;
371:
372: -- Standard call to check for call compatibility.
373: IF NOT FND_API.Compatible_API_Call (
374: p_current_version_number => l_api_version,
375: p_caller_version_number => p_api_version,
376: p_api_name => l_api_name,
377: p_pkg_name => g_pkg_name) THEN
375: p_caller_version_number => p_api_version,
376: p_api_name => l_api_name,
377: p_pkg_name => g_pkg_name) THEN
378:
379: RAISE fnd_api.g_exc_unexpected_error;
380:
381: END IF;
382:
383: -- Initialize message list if p_init_msg_list is set to TRUE.
380:
381: END IF;
382:
383: -- Initialize message list if p_init_msg_list is set to TRUE.
384: IF FND_API.to_Boolean( p_init_msg_list ) THEN
385: fnd_msg_pub.initialize;
386: END IF;
387:
388: -- Initialize API return status to success
385: fnd_msg_pub.initialize;
386: END IF;
387:
388: -- Initialize API return status to success
389: x_return_status := FND_API.G_RET_STS_SUCCESS;
390:
391: -- event name: oracle.apps.fte.delivery.pod.podreceived
392: -- l_delivery_id := p_event.GetValueForParameter('DELIVERY_ID');
393: -- l_pod_date := p_event.GetValueForParameter('POD_DATE');
406: , x_msg_count => x_msg_count
407: , x_msg_data => x_msg_data
408: );
409:
410: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
411: THEN
412: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
413: END IF;
414:
408: );
409:
410: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR
411: THEN
412: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
413: END IF;
414:
415: -- for each invoice line call ar_revenue_managemet_id with
416: -- invoice line id andpod date
426:
427: END LOOP;
428:
429: EXCEPTION
430: WHEN fnd_api.g_exc_error THEN
431: ROLLBACK TO record_proof_of_delivery_grp;
432: x_return_status := FND_API.G_RET_STS_ERROR ;
433: fnd_msg_pub.count_and_get (
434: p_encoded => fnd_api.g_false,
428:
429: EXCEPTION
430: WHEN fnd_api.g_exc_error THEN
431: ROLLBACK TO record_proof_of_delivery_grp;
432: x_return_status := FND_API.G_RET_STS_ERROR ;
433: fnd_msg_pub.count_and_get (
434: p_encoded => fnd_api.g_false,
435: p_count => x_msg_count,
436: p_data => x_msg_data);
430: WHEN fnd_api.g_exc_error THEN
431: ROLLBACK TO record_proof_of_delivery_grp;
432: x_return_status := FND_API.G_RET_STS_ERROR ;
433: fnd_msg_pub.count_and_get (
434: p_encoded => fnd_api.g_false,
435: p_count => x_msg_count,
436: p_data => x_msg_data);
437:
438: WHEN fnd_api.g_exc_unexpected_error THEN
434: p_encoded => fnd_api.g_false,
435: p_count => x_msg_count,
436: p_data => x_msg_data);
437:
438: WHEN fnd_api.g_exc_unexpected_error THEN
439: ROLLBACK TO record_proof_of_delivery_grp;
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: fnd_msg_pub.count_and_get (
442: p_encoded => fnd_api.g_false,
436: p_data => x_msg_data);
437:
438: WHEN fnd_api.g_exc_unexpected_error THEN
439: ROLLBACK TO record_proof_of_delivery_grp;
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: fnd_msg_pub.count_and_get (
442: p_encoded => fnd_api.g_false,
443: p_count => x_msg_count,
444: p_data => x_msg_data);
438: WHEN fnd_api.g_exc_unexpected_error THEN
439: ROLLBACK TO record_proof_of_delivery_grp;
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: fnd_msg_pub.count_and_get (
442: p_encoded => fnd_api.g_false,
443: p_count => x_msg_count,
444: p_data => x_msg_data);
445:
446: WHEN OTHERS THEN
444: p_data => x_msg_data);
445:
446: WHEN OTHERS THEN
447: ROLLBACK TO record_proof_of_delivery_grp;
448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
449: fnd_msg_pub.count_and_get (
450: p_encoded => fnd_api.g_false,
451: p_count => x_msg_count,
452: p_data => x_msg_data);
446: WHEN OTHERS THEN
447: ROLLBACK TO record_proof_of_delivery_grp;
448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
449: fnd_msg_pub.count_and_get (
450: p_encoded => fnd_api.g_false,
451: p_count => x_msg_count,
452: p_data => x_msg_data);
453:
454: END record_proof_of_delivery;