51: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
52: END IF;
53:
54: IF (g_fnd_debug = 'Y') THEN
55: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
56: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
57: l_api_name || '.invoked', 'po_header_id: ' ||
58: NVL(TO_CHAR(p_po_header_id), ' ') || ' po_release_id: ' ||
59: NVL(TO_CHAR(p_po_release_id), ' ') );
52: END IF;
53:
54: IF (g_fnd_debug = 'Y') THEN
55: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
56: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
57: l_api_name || '.invoked', 'po_header_id: ' ||
58: NVL(TO_CHAR(p_po_header_id), ' ') || ' po_release_id: ' ||
59: NVL(TO_CHAR(p_po_release_id), ' ') );
60: END IF;
66: p_po_header_id => p_po_header_id,
67: p_po_release_id => p_po_release_id );
68:
69: IF (g_fnd_debug = 'Y') THEN
70: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
71: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
72: l_api_name || '.before return', 'status_code: ' ||
73: NVL(l_status_code, ''));
74: END IF;
67: p_po_release_id => p_po_release_id );
68:
69: IF (g_fnd_debug = 'Y') THEN
70: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
71: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
72: l_api_name || '.before return', 'status_code: ' ||
73: NVL(l_status_code, ''));
74: END IF;
75: END IF;
80: WHEN OTHERS THEN
81: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
82: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
83: IF (g_fnd_debug = 'Y') THEN
84: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
85: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
86: l_api_name || '.others_exception', sqlcode);
87: END IF;
88: END IF;
81: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
82: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
83: IF (g_fnd_debug = 'Y') THEN
84: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
85: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
86: l_api_name || '.others_exception', sqlcode);
87: END IF;
88: END IF;
89: END IF;
132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
133: END IF;
134:
135: IF (g_fnd_debug = 'Y') THEN
136: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
137: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
138: l_api_name || '.invoked', 'line_location_id: ' ||
139: NVL(TO_CHAR(P_line_location_id), ''));
140: END IF;
133: END IF;
134:
135: IF (g_fnd_debug = 'Y') THEN
136: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
137: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
138: l_api_name || '.invoked', 'line_location_id: ' ||
139: NVL(TO_CHAR(P_line_location_id), ''));
140: END IF;
141: END IF;
149: p_revision_num => p_revision_num );
150:
151:
152: IF (g_fnd_debug = 'Y') THEN
153: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
154: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
155: l_api_name || '.before return', 'shipment_status: ' ||
156: NVL(l_shipment_status, ''));
157: END IF;
150:
151:
152: IF (g_fnd_debug = 'Y') THEN
153: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
154: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
155: l_api_name || '.before return', 'shipment_status: ' ||
156: NVL(l_shipment_status, ''));
157: END IF;
158: END IF;
163: WHEN OTHERS THEN
164: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
165: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
166: IF (g_fnd_debug = 'Y') THEN
167: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
168: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
169: l_api_name || '.others_exception', sqlcode);
170: END IF;
171: END IF;
164: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
165: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
166: IF (g_fnd_debug = 'Y') THEN
167: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
168: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
169: l_api_name || '.others_exception', sqlcode);
170: END IF;
171: END IF;
172: END IF;
224:
225: x_return_status := FND_API.G_RET_STS_SUCCESS;
226:
227: IF (g_fnd_debug = 'Y') THEN
228: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
229: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
230: l_api_name || '.invoked', 'Line_location_id: ' ||
231: NVL(TO_CHAR(p_line_location_id),'null'));
232: END IF;
225: x_return_status := FND_API.G_RET_STS_SUCCESS;
226:
227: IF (g_fnd_debug = 'Y') THEN
228: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
229: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
230: l_api_name || '.invoked', 'Line_location_id: ' ||
231: NVL(TO_CHAR(p_line_location_id),'null'));
232: END IF;
233: END IF;
256: x_return_status := FND_API.g_ret_sts_unexp_error;
257: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
258: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
259: IF (g_fnd_debug = 'Y') THEN
260: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
261: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
262: l_api_name || '.others_exception', sqlcode);
263: END IF;
264: END IF;
257: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
258: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
259: IF (g_fnd_debug = 'Y') THEN
260: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
261: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
262: l_api_name || '.others_exception', sqlcode);
263: END IF;
264: END IF;
265: END IF;
307:
308: x_return_status := FND_API.G_RET_STS_SUCCESS;
309:
310: IF (g_fnd_debug = 'Y') THEN
311: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
312: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
313: l_api_name || '.invoked', 'po_header_id: ' ||
314: NVL(TO_CHAR(p_po_header_id),'null') || ' po_release_id: ' ||
315: NVL(TO_CHAR(p_po_release_id),'null'));
308: x_return_status := FND_API.G_RET_STS_SUCCESS;
309:
310: IF (g_fnd_debug = 'Y') THEN
311: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
312: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
313: l_api_name || '.invoked', 'po_header_id: ' ||
314: NVL(TO_CHAR(p_po_header_id),'null') || ' po_release_id: ' ||
315: NVL(TO_CHAR(p_po_release_id),'null'));
316: END IF;
334: x_return_status := FND_API.g_ret_sts_unexp_error;
335: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
336: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
337: IF (g_fnd_debug = 'Y') THEN
338: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
339: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
340: l_api_name || '.others_exception', sqlcode);
341: END IF;
342: END IF;
335: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
336: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
337: IF (g_fnd_debug = 'Y') THEN
338: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
339: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
340: l_api_name || '.others_exception', sqlcode);
341: END IF;
342: END IF;
343: END IF;
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
381:
382: IF (g_fnd_debug = 'Y') THEN
383: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
384: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
385: l_api_name || '.invoked', 'po_header_id: ' ||
386: NVL(TO_CHAR(p_po_header_id), ' ') || ' po_release_id: ' ||
387: NVL(TO_CHAR(p_po_release_id), ' ') || ' revision_num: ' ||
380: END IF;
381:
382: IF (g_fnd_debug = 'Y') THEN
383: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
384: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
385: l_api_name || '.invoked', 'po_header_id: ' ||
386: NVL(TO_CHAR(p_po_header_id), ' ') || ' po_release_id: ' ||
387: NVL(TO_CHAR(p_po_release_id), ' ') || ' revision_num: ' ||
388: NVL(TO_CHAR(p_revision_num), ' '));
396: p_po_release_id => p_po_release_id,
397: p_revision_num => p_revision_num );
398:
399: IF (g_fnd_debug = 'Y') THEN
400: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
401: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
402: l_api_name || '.before return', 'All shipments acknowledged: ' ||
403: NVL(l_result, ''));
404: END IF;
397: p_revision_num => p_revision_num );
398:
399: IF (g_fnd_debug = 'Y') THEN
400: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
401: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
402: l_api_name || '.before return', 'All shipments acknowledged: ' ||
403: NVL(l_result, ''));
404: END IF;
405: END IF;
410: WHEN OTHERS THEN
411: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
412: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
413: IF (g_fnd_debug = 'Y') THEN
414: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
415: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
416: l_api_name || '.others_exception', sqlcode);
417: END IF;
418: END IF;
411: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
412: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
413: IF (g_fnd_debug = 'Y') THEN
414: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
415: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
416: l_api_name || '.others_exception', sqlcode);
417: END IF;
418: END IF;
419: END IF;
463:
464: x_return_status := FND_API.G_RET_STS_SUCCESS;
465:
466: IF (g_fnd_debug = 'Y') THEN
467: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
468: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
469: l_api_name || '.invoked', 'po_header_id: ' ||
470: NVL(TO_CHAR(p_po_header_id),'null') || ' po_release_id: ' ||
471: NVL(TO_CHAR(p_po_release_id),'null'));
464: x_return_status := FND_API.G_RET_STS_SUCCESS;
465:
466: IF (g_fnd_debug = 'Y') THEN
467: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
468: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix ||
469: l_api_name || '.invoked', 'po_header_id: ' ||
470: NVL(TO_CHAR(p_po_header_id),'null') || ' po_release_id: ' ||
471: NVL(TO_CHAR(p_po_release_id),'null'));
472: END IF;
489: x_return_status := FND_API.g_ret_sts_unexp_error;
490: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
491: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
492: IF (g_fnd_debug = 'Y') THEN
493: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
494: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
495: l_api_name || '.others_exception', sqlcode);
496: END IF;
497: END IF;
490: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
491: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
492: IF (g_fnd_debug = 'Y') THEN
493: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
494: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
495: l_api_name || '.others_exception', sqlcode);
496: END IF;
497: END IF;
498: END IF;