DBA Data[Home] [Help]

APPS.PO_DOCUMENT_CANCEL_PVT dependencies on FND_API

Line 31: * FND_API.G_TRUE. Appends to API message list on error.

27: * Encumbrance is recalculated for cancelled entities if enabled. If the
28: * cancel action is successful, the document's cancel and who columns will be
29: * updated at the specified entity level. Otherwise, the document will remain
30: * unchanged. All changes will be committed upon success if p_commit is
31: * FND_API.G_TRUE. Appends to API message list on error.
32: * Returns:
33: * x_return_status - FND_API.G_RET_STS_SUCCESS if cancel action succeeds
34: * FND_API.G_RET_STS_ERROR if cancel action fails
35: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs

Line 33: * x_return_status - FND_API.G_RET_STS_SUCCESS if cancel action succeeds

29: * updated at the specified entity level. Otherwise, the document will remain
30: * unchanged. All changes will be committed upon success if p_commit is
31: * FND_API.G_TRUE. Appends to API message list on error.
32: * Returns:
33: * x_return_status - FND_API.G_RET_STS_SUCCESS if cancel action succeeds
34: * FND_API.G_RET_STS_ERROR if cancel action fails
35: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
36: */
37: PROCEDURE cancel_document

Line 34: * FND_API.G_RET_STS_ERROR if cancel action fails

30: * unchanged. All changes will be committed upon success if p_commit is
31: * FND_API.G_TRUE. Appends to API message list on error.
32: * Returns:
33: * x_return_status - FND_API.G_RET_STS_SUCCESS if cancel action succeeds
34: * FND_API.G_RET_STS_ERROR if cancel action fails
35: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
36: */
37: PROCEDURE cancel_document
38: (p_api_version IN NUMBER,

Line 35: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs

31: * FND_API.G_TRUE. Appends to API message list on error.
32: * Returns:
33: * x_return_status - FND_API.G_RET_STS_SUCCESS if cancel action succeeds
34: * FND_API.G_RET_STS_ERROR if cancel action fails
35: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
36: */
37: PROCEDURE cancel_document
38: (p_api_version IN NUMBER,
39: p_init_msg_list IN VARCHAR2,

Line 71: IF FND_API.to_boolean(p_init_msg_list) THEN

67: l_use_gldate VARCHAR2(1); --
68:
69: BEGIN
70: -- Start standard API initialization
71: IF FND_API.to_boolean(p_init_msg_list) THEN
72: FND_MSG_PUB.initialize;
73: END IF;
74: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
75: l_api_name, g_pkg_name)

Line 74: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,

70: -- Start standard API initialization
71: IF FND_API.to_boolean(p_init_msg_list) THEN
72: FND_MSG_PUB.initialize;
73: END IF;
74: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
75: l_api_name, g_pkg_name)
76: THEN
77: RAISE FND_API.g_exc_unexpected_error;
78: END IF;

Line 77: RAISE FND_API.g_exc_unexpected_error;

73: END IF;
74: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
75: l_api_name, g_pkg_name)
76: THEN
77: RAISE FND_API.g_exc_unexpected_error;
78: END IF;
79: x_return_status := FND_API.g_ret_sts_success;
80: -- End standard API initialization
81:

Line 79: x_return_status := FND_API.g_ret_sts_success;

75: l_api_name, g_pkg_name)
76: THEN
77: RAISE FND_API.g_exc_unexpected_error;
78: END IF;
79: x_return_status := FND_API.g_ret_sts_success;
80: -- End standard API initialization
81:
82: IF (g_fnd_debug = 'Y') THEN
83: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN

Line 175: RAISE FND_API.g_exc_error;

171: END IF;
172: END IF; --
173:
174: FND_MSG_PUB.add;
175: RAISE FND_API.g_exc_error;
176:
177: END IF; --
178:
179: -- Check for expected errors

Line 192: p_init_msg_list => FND_API.G_FALSE,

188:
189: IF l_online_report_id IS NOT NULL THEN
190: PO_Document_Control_PVT.add_online_report_msgs
191: (p_api_version => 1.0,
192: p_init_msg_list => FND_API.G_FALSE,
193: x_return_status => x_return_status,
194: p_online_report_id => l_online_report_id);
195: IF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN
196: RAISE FND_API.g_exc_unexpected_error;

Line 195: IF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN

191: (p_api_version => 1.0,
192: p_init_msg_list => FND_API.G_FALSE,
193: x_return_status => x_return_status,
194: p_online_report_id => l_online_report_id);
195: IF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN
196: RAISE FND_API.g_exc_unexpected_error;
197: END IF;
198: ELSE
199: FND_MESSAGE.set_name('PO','PO_CONTROL_USER_EXIT_FAILED');

Line 196: RAISE FND_API.g_exc_unexpected_error;

192: p_init_msg_list => FND_API.G_FALSE,
193: x_return_status => x_return_status,
194: p_online_report_id => l_online_report_id);
195: IF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN
196: RAISE FND_API.g_exc_unexpected_error;
197: END IF;
198: ELSE
199: FND_MESSAGE.set_name('PO','PO_CONTROL_USER_EXIT_FAILED');
200: FND_MESSAGE.set_token('USER_EXIT','CANCEL');

Line 211: RAISE FND_API.g_exc_error;

207: END IF;
208: FND_MSG_PUB.add;
209: END IF; -- if l_online_report_id IS ...
210:
211: RAISE FND_API.g_exc_error;
212:
213: ELSIF (l_return_code = 'STATE_FAILED') THEN
214:
215: IF (g_fnd_debug = 'Y') THEN

Line 231: RAISE FND_API.g_exc_error;

227: l_api_name || '.state_failed', FALSE);
228: END IF;
229: END IF;
230: FND_MSG_PUB.add;
231: RAISE FND_API.g_exc_error;
232:
233: ELSIF (l_return_code = 'UPDATE_CBC_FAILED') THEN
234:
235: IF (g_fnd_debug = 'Y') THEN

Line 252: RAISE FND_API.g_exc_error;

248: l_api_name || '.igc_failed', FALSE);
249: END IF;
250: END IF;
251: FND_MSG_PUB.add;
252: RAISE FND_API.g_exc_error;
253:
254: END IF; --
255:
256:

Line 262: p_init_msg_list => FND_API.G_FALSE,

258: IF (p_doc_line_loc_id IS NULL) THEN
259:
260: PO_Document_Control_PVT.update_note_to_vendor
261: ( p_api_version => 1.0,
262: p_init_msg_list => FND_API.G_FALSE,
263: p_commit => FND_API.G_FALSE,
264: x_return_status => x_return_status,
265: p_doc_type => p_doc_type,
266: p_doc_id => p_doc_id,

Line 263: p_commit => FND_API.G_FALSE,

259:
260: PO_Document_Control_PVT.update_note_to_vendor
261: ( p_api_version => 1.0,
262: p_init_msg_list => FND_API.G_FALSE,
263: p_commit => FND_API.G_FALSE,
264: x_return_status => x_return_status,
265: p_doc_type => p_doc_type,
266: p_doc_id => p_doc_id,
267: p_doc_line_id => p_doc_line_id,

Line 269: IF (x_return_status = FND_API.g_ret_sts_error) THEN

265: p_doc_type => p_doc_type,
266: p_doc_id => p_doc_id,
267: p_doc_line_id => p_doc_line_id,
268: p_note_to_vendor => p_note_to_vendor );
269: IF (x_return_status = FND_API.g_ret_sts_error) THEN
270: RAISE FND_API.g_exc_error;
271: ELSIF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN
272: RAISE FND_API.g_exc_unexpected_error;
273: END IF;

Line 270: RAISE FND_API.g_exc_error;

266: p_doc_id => p_doc_id,
267: p_doc_line_id => p_doc_line_id,
268: p_note_to_vendor => p_note_to_vendor );
269: IF (x_return_status = FND_API.g_ret_sts_error) THEN
270: RAISE FND_API.g_exc_error;
271: ELSIF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN
272: RAISE FND_API.g_exc_unexpected_error;
273: END IF;
274:

Line 271: ELSIF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN

267: p_doc_line_id => p_doc_line_id,
268: p_note_to_vendor => p_note_to_vendor );
269: IF (x_return_status = FND_API.g_ret_sts_error) THEN
270: RAISE FND_API.g_exc_error;
271: ELSIF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN
272: RAISE FND_API.g_exc_unexpected_error;
273: END IF;
274:
275: END IF; --

Line 272: RAISE FND_API.g_exc_unexpected_error;

268: p_note_to_vendor => p_note_to_vendor );
269: IF (x_return_status = FND_API.g_ret_sts_error) THEN
270: RAISE FND_API.g_exc_error;
271: ELSIF (x_return_status = FND_API.g_ret_sts_unexp_error) THEN
272: RAISE FND_API.g_exc_unexpected_error;
273: END IF;
274:
275: END IF; --
276:

Line 282: WHEN FND_API.g_exc_error THEN

278: -- Must commit at the end of successful autonomous transaction
279: COMMIT;
280:
281: EXCEPTION
282: WHEN FND_API.g_exc_error THEN
283: ROLLBACK;
284: x_return_status := FND_API.g_ret_sts_error;
285: WHEN FND_API.g_exc_unexpected_error THEN
286: ROLLBACK;

Line 284: x_return_status := FND_API.g_ret_sts_error;

280:
281: EXCEPTION
282: WHEN FND_API.g_exc_error THEN
283: ROLLBACK;
284: x_return_status := FND_API.g_ret_sts_error;
285: WHEN FND_API.g_exc_unexpected_error THEN
286: ROLLBACK;
287: x_return_status := FND_API.g_ret_sts_unexp_error;
288: WHEN OTHERS THEN

Line 285: WHEN FND_API.g_exc_unexpected_error THEN

281: EXCEPTION
282: WHEN FND_API.g_exc_error THEN
283: ROLLBACK;
284: x_return_status := FND_API.g_ret_sts_error;
285: WHEN FND_API.g_exc_unexpected_error THEN
286: ROLLBACK;
287: x_return_status := FND_API.g_ret_sts_unexp_error;
288: WHEN OTHERS THEN
289: ROLLBACK;

Line 287: x_return_status := FND_API.g_ret_sts_unexp_error;

283: ROLLBACK;
284: x_return_status := FND_API.g_ret_sts_error;
285: WHEN FND_API.g_exc_unexpected_error THEN
286: ROLLBACK;
287: x_return_status := FND_API.g_ret_sts_unexp_error;
288: WHEN OTHERS THEN
289: ROLLBACK;
290: x_return_status := FND_API.g_ret_sts_unexp_error;
291: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 290: x_return_status := FND_API.g_ret_sts_unexp_error;

286: ROLLBACK;
287: x_return_status := FND_API.g_ret_sts_unexp_error;
288: WHEN OTHERS THEN
289: ROLLBACK;
290: x_return_status := FND_API.g_ret_sts_unexp_error;
291: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
292: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
293: IF (g_fnd_debug = 'Y') THEN
294: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 353: * x_return_status - FND_API.G_RET_STS_SUCCESS if validation succeeds

349: * Effects: Ensures that the document has shipments that are not cancelled or
350: * finally closed, and that they are all fully encumbered. Appends to API
351: * message list on error.
352: * Returns:
353: * x_return_status - FND_API.G_RET_STS_SUCCESS if validation succeeds
354: * FND_API.G_RET_STS_ERROR if validation fails
355: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
356: */
357: PROCEDURE val_cancel_backing_reqs

Line 354: * FND_API.G_RET_STS_ERROR if validation fails

350: * finally closed, and that they are all fully encumbered. Appends to API
351: * message list on error.
352: * Returns:
353: * x_return_status - FND_API.G_RET_STS_SUCCESS if validation succeeds
354: * FND_API.G_RET_STS_ERROR if validation fails
355: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
356: */
357: PROCEDURE val_cancel_backing_reqs
358: (p_api_version IN NUMBER,

Line 355: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs

351: * message list on error.
352: * Returns:
353: * x_return_status - FND_API.G_RET_STS_SUCCESS if validation succeeds
354: * FND_API.G_RET_STS_ERROR if validation fails
355: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
356: */
357: PROCEDURE val_cancel_backing_reqs
358: (p_api_version IN NUMBER,
359: p_init_msg_list IN VARCHAR2,

Line 375: IF FND_API.to_boolean(p_init_msg_list) THEN

371: (p_doc_type => p_doc_type,
372: p_doc_id => p_doc_id)
373: THEN
374: -- Start standard API initialization
375: IF FND_API.to_boolean(p_init_msg_list) THEN
376: FND_MSG_PUB.initialize;
377: END IF;
378: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
379: l_api_name, g_pkg_name)

Line 378: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,

374: -- Start standard API initialization
375: IF FND_API.to_boolean(p_init_msg_list) THEN
376: FND_MSG_PUB.initialize;
377: END IF;
378: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
379: l_api_name, g_pkg_name)
380: THEN
381: RAISE FND_API.g_exc_unexpected_error;
382: END IF;

Line 381: RAISE FND_API.g_exc_unexpected_error;

377: END IF;
378: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
379: l_api_name, g_pkg_name)
380: THEN
381: RAISE FND_API.g_exc_unexpected_error;
382: END IF;
383: x_return_status := FND_API.g_ret_sts_success;
384: -- End standard API initialization
385:

Line 383: x_return_status := FND_API.g_ret_sts_success;

379: l_api_name, g_pkg_name)
380: THEN
381: RAISE FND_API.g_exc_unexpected_error;
382: END IF;
383: x_return_status := FND_API.g_ret_sts_success;
384: -- End standard API initialization
385:
386: IF (g_fnd_debug = 'Y') THEN
387: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN

Line 396: p_init_msg_list => FND_API.G_FALSE,

392: END IF;
393:
394: IF NOT PO_Document_Control_PVT.has_shipments
395: (p_api_version => 1.0,
396: p_init_msg_list => FND_API.G_FALSE,
397: x_return_status => x_return_status,
398: p_doc_type => p_doc_type,
399: p_doc_id => p_doc_id)
400: THEN

Line 401: IF (x_return_status <> FND_API.g_ret_sts_success) THEN

397: x_return_status => x_return_status,
398: p_doc_type => p_doc_type,
399: p_doc_id => p_doc_id)
400: THEN
401: IF (x_return_status <> FND_API.g_ret_sts_success) THEN
402: RAISE FND_API.g_exc_unexpected_error;
403: END IF;
404:
405: -- Document does not have any valid shipments.

Line 402: RAISE FND_API.g_exc_unexpected_error;

398: p_doc_type => p_doc_type,
399: p_doc_id => p_doc_id)
400: THEN
401: IF (x_return_status <> FND_API.g_ret_sts_success) THEN
402: RAISE FND_API.g_exc_unexpected_error;
403: END IF;
404:
405: -- Document does not have any valid shipments.
406: RAISE FND_API.g_exc_error;

Line 406: RAISE FND_API.g_exc_error;

402: RAISE FND_API.g_exc_unexpected_error;
403: END IF;
404:
405: -- Document does not have any valid shipments.
406: RAISE FND_API.g_exc_error;
407: END IF; --
408:
409:
410: IF PO_Document_Control_PVT.has_unencumbered_shipments

Line 412: p_init_msg_list => FND_API.G_FALSE,

408:
409:
410: IF PO_Document_Control_PVT.has_unencumbered_shipments
411: (p_api_version => 1.0,
412: p_init_msg_list => FND_API.G_FALSE,
413: x_return_status => x_return_status,
414: p_doc_type => p_doc_type,
415: p_doc_id => p_doc_id)
416: THEN

Line 419: RAISE FND_API.g_exc_error;

415: p_doc_id => p_doc_id)
416: THEN
417: -- Document has valid, unencumbered shipments. Cannot cancel reqs
418: -- because encumbrance is assumed to be on.
419: RAISE FND_API.g_exc_error;
420: END IF; --
421:
422: -- Check that an error did not occur in previous procedure call
423: IF (x_return_status <> FND_API.g_ret_sts_success) THEN

Line 423: IF (x_return_status <> FND_API.g_ret_sts_success) THEN

419: RAISE FND_API.g_exc_error;
420: END IF; --
421:
422: -- Check that an error did not occur in previous procedure call
423: IF (x_return_status <> FND_API.g_ret_sts_success) THEN
424: RAISE FND_API.g_exc_unexpected_error;
425: END IF;
426:
427: END IF;

Line 424: RAISE FND_API.g_exc_unexpected_error;

420: END IF; --
421:
422: -- Check that an error did not occur in previous procedure call
423: IF (x_return_status <> FND_API.g_ret_sts_success) THEN
424: RAISE FND_API.g_exc_unexpected_error;
425: END IF;
426:
427: END IF;
428:

Line 430: WHEN FND_API.g_exc_error THEN

426:
427: END IF;
428:
429: EXCEPTION
430: WHEN FND_API.g_exc_error THEN
431: x_return_status := FND_API.g_ret_sts_error;
432: FND_MESSAGE.set_name('PO','PO_CANCEL_REQ_DISALLOWED');
433: IF (g_fnd_debug = 'Y') THEN
434: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR) THEN

Line 431: x_return_status := FND_API.g_ret_sts_error;

427: END IF;
428:
429: EXCEPTION
430: WHEN FND_API.g_exc_error THEN
431: x_return_status := FND_API.g_ret_sts_error;
432: FND_MESSAGE.set_name('PO','PO_CANCEL_REQ_DISALLOWED');
433: IF (g_fnd_debug = 'Y') THEN
434: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR) THEN
435: FND_LOG.message(FND_LOG.level_error, g_module_prefix || l_api_name

Line 440: WHEN FND_API.g_exc_unexpected_error THEN

436: || '.cancel_req_disallowed', FALSE);
437: END IF;
438: END IF;
439: FND_MSG_PUB.add;
440: WHEN FND_API.g_exc_unexpected_error THEN
441: x_return_status := FND_API.g_ret_sts_unexp_error;
442: WHEN OTHERS THEN
443: x_return_status := FND_API.g_ret_sts_unexp_error;
444: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 441: x_return_status := FND_API.g_ret_sts_unexp_error;

437: END IF;
438: END IF;
439: FND_MSG_PUB.add;
440: WHEN FND_API.g_exc_unexpected_error THEN
441: x_return_status := FND_API.g_ret_sts_unexp_error;
442: WHEN OTHERS THEN
443: x_return_status := FND_API.g_ret_sts_unexp_error;
444: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
445: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 443: x_return_status := FND_API.g_ret_sts_unexp_error;

439: FND_MSG_PUB.add;
440: WHEN FND_API.g_exc_unexpected_error THEN
441: x_return_status := FND_API.g_ret_sts_unexp_error;
442: WHEN OTHERS THEN
443: x_return_status := FND_API.g_ret_sts_unexp_error;
444: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
445: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
446: IF (g_fnd_debug = 'Y') THEN
447: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 464: * x_return_status - FND_API.G_RET_STS_SUCCESS if found requisition line IDs

460: * Effects: Fetches all requisition line IDs linked to the document at
461: * p_control_level, specified by p_control_level_id. Appends to the API
462: * message list upon unexpected errors only.
463: * Returns:
464: * x_return_status - FND_API.G_RET_STS_SUCCESS if found requisition line IDs
465: * FND_API.G_RET_STS_ERROR if found no requisition line IDs
466: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
467: * x_req_line_id_tbl - A PL/SQL table of requisition line IDs
468: */

Line 465: * FND_API.G_RET_STS_ERROR if found no requisition line IDs

461: * p_control_level, specified by p_control_level_id. Appends to the API
462: * message list upon unexpected errors only.
463: * Returns:
464: * x_return_status - FND_API.G_RET_STS_SUCCESS if found requisition line IDs
465: * FND_API.G_RET_STS_ERROR if found no requisition line IDs
466: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
467: * x_req_line_id_tbl - A PL/SQL table of requisition line IDs
468: */
469: PROCEDURE fetch_req_lines

Line 466: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs

462: * message list upon unexpected errors only.
463: * Returns:
464: * x_return_status - FND_API.G_RET_STS_SUCCESS if found requisition line IDs
465: * FND_API.G_RET_STS_ERROR if found no requisition line IDs
466: * FND_API.G_RET_STS_UNEXP_ERROR if unexpected error occurs
467: * x_req_line_id_tbl - A PL/SQL table of requisition line IDs
468: */
469: PROCEDURE fetch_req_lines
470: (p_api_version IN NUMBER,

Line 550: IF FND_API.to_boolean(p_init_msg_list) THEN

546: poll.shipment_type IN ('STANDARD', 'PLANNED', 'BLANKET');
547:
548: BEGIN
549: -- Start standard API initialization
550: IF FND_API.to_boolean(p_init_msg_list) THEN
551: FND_MSG_PUB.initialize;
552: END IF;
553: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
554: l_api_name, g_pkg_name)

Line 553: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,

549: -- Start standard API initialization
550: IF FND_API.to_boolean(p_init_msg_list) THEN
551: FND_MSG_PUB.initialize;
552: END IF;
553: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
554: l_api_name, g_pkg_name)
555: THEN
556: RAISE FND_API.g_exc_unexpected_error;
557: END IF;

Line 556: RAISE FND_API.g_exc_unexpected_error;

552: END IF;
553: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
554: l_api_name, g_pkg_name)
555: THEN
556: RAISE FND_API.g_exc_unexpected_error;
557: END IF;
558: x_return_status := FND_API.g_ret_sts_success;
559: -- End standard API initialization
560:

Line 558: x_return_status := FND_API.g_ret_sts_success;

554: l_api_name, g_pkg_name)
555: THEN
556: RAISE FND_API.g_exc_unexpected_error;
557: END IF;
558: x_return_status := FND_API.g_ret_sts_success;
559: -- End standard API initialization
560:
561: IF (g_fnd_debug = 'Y') THEN
562: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN

Line 573: RAISE FND_API.g_exc_error;

569: IF (p_control_level = PO_Document_Control_PVT.g_header_level) THEN
570: OPEN l_header_csr;
571: FETCH l_header_csr BULK COLLECT INTO x_req_line_id_tbl;
572: IF (l_header_csr%ROWCOUNT = 0) THEN
573: RAISE FND_API.g_exc_error;
574: END IF;
575: CLOSE l_header_csr;
576: ELSIF (p_control_level = PO_Document_Control_PVT.g_line_level) THEN
577: OPEN l_line_csr;

Line 580: RAISE FND_API.g_exc_error;

576: ELSIF (p_control_level = PO_Document_Control_PVT.g_line_level) THEN
577: OPEN l_line_csr;
578: FETCH l_line_csr BULK COLLECT INTO x_req_line_id_tbl;
579: IF (l_line_csr%ROWCOUNT = 0) THEN
580: RAISE FND_API.g_exc_error;
581: END IF;
582: CLOSE l_line_csr;
583: ELSIF (p_control_level IN (PO_Document_Control_PVT.g_shipment_level,
584: PO_Document_Control_PVT.g_rel_shipment_level))

Line 589: RAISE FND_API.g_exc_error;

585: THEN
586: OPEN l_shipment_csr;
587: FETCH l_shipment_csr BULK COLLECT INTO x_req_line_id_tbl;
588: IF (l_shipment_csr%ROWCOUNT = 0) THEN
589: RAISE FND_API.g_exc_error;
590: END IF;
591: CLOSE l_shipment_csr;
592: ELSIF (p_control_level = PO_Document_Control_PVT.g_rel_header_level) THEN
593: OPEN l_rel_header_csr;

Line 596: RAISE FND_API.g_exc_error;

592: ELSIF (p_control_level = PO_Document_Control_PVT.g_rel_header_level) THEN
593: OPEN l_rel_header_csr;
594: FETCH l_rel_header_csr BULK COLLECT INTO x_req_line_id_tbl;
595: IF (l_rel_header_csr%ROWCOUNT = 0) THEN
596: RAISE FND_API.g_exc_error;
597: END IF;
598: CLOSE l_rel_header_csr;
599: ELSE
600: RAISE FND_API.g_exc_error;

Line 600: RAISE FND_API.g_exc_error;

596: RAISE FND_API.g_exc_error;
597: END IF;
598: CLOSE l_rel_header_csr;
599: ELSE
600: RAISE FND_API.g_exc_error;
601: END IF;
602:
603: EXCEPTION
604: WHEN FND_API.g_exc_error THEN

Line 604: WHEN FND_API.g_exc_error THEN

600: RAISE FND_API.g_exc_error;
601: END IF;
602:
603: EXCEPTION
604: WHEN FND_API.g_exc_error THEN
605: x_return_status := FND_API.g_ret_sts_error;
606: IF (l_header_csr%ISOPEN) THEN
607: CLOSE l_header_csr;
608: ELSIF (l_line_csr%ISOPEN) THEN

Line 605: x_return_status := FND_API.g_ret_sts_error;

601: END IF;
602:
603: EXCEPTION
604: WHEN FND_API.g_exc_error THEN
605: x_return_status := FND_API.g_ret_sts_error;
606: IF (l_header_csr%ISOPEN) THEN
607: CLOSE l_header_csr;
608: ELSIF (l_line_csr%ISOPEN) THEN
609: CLOSE l_line_csr;

Line 615: WHEN FND_API.g_exc_unexpected_error THEN

611: CLOSE l_shipment_csr;
612: ELSIF (l_rel_header_csr%ISOPEN) THEN
613: CLOSE l_rel_header_csr;
614: END IF; --
615: WHEN FND_API.g_exc_unexpected_error THEN
616: x_return_status := FND_API.g_ret_sts_unexp_error;
617: IF (l_header_csr%ISOPEN) THEN
618: CLOSE l_header_csr;
619: ELSIF (l_line_csr%ISOPEN) THEN

Line 616: x_return_status := FND_API.g_ret_sts_unexp_error;

612: ELSIF (l_rel_header_csr%ISOPEN) THEN
613: CLOSE l_rel_header_csr;
614: END IF; --
615: WHEN FND_API.g_exc_unexpected_error THEN
616: x_return_status := FND_API.g_ret_sts_unexp_error;
617: IF (l_header_csr%ISOPEN) THEN
618: CLOSE l_header_csr;
619: ELSIF (l_line_csr%ISOPEN) THEN
620: CLOSE l_line_csr;

Line 627: x_return_status := FND_API.g_ret_sts_unexp_error;

623: ELSIF (l_rel_header_csr%ISOPEN) THEN
624: CLOSE l_rel_header_csr;
625: END IF; --
626: WHEN OTHERS THEN
627: x_return_status := FND_API.g_ret_sts_unexp_error;
628: IF (l_header_csr%ISOPEN) THEN
629: CLOSE l_header_csr;
630: ELSIF (l_line_csr%ISOPEN) THEN
631: CLOSE l_line_csr;

Line 677: -- FND_API.G_RET_STS_SUCCESS if no error has occurred, otherwise an error

673: -- A 'Y' or 'N' indicating that cancelling backing reqs when PO's are
674: -- cancelled is desired.
675: --OUT:
676: --x_return_status
677: -- FND_API.G_RET_STS_SUCCESS if no error has occurred, otherwise an error
678: -- has occurred within the procedure
679: --Testing:
680: --End of Comments
681: ---------------------------------------------------------------------------

Line 696: x_return_status := FND_API.G_RET_STS_SUCCESS;

692: PO_SYSTEM_PARAMETERS_ALL.cancel_reqs_on_po_cancel_flag%TYPE;
693:
694: BEGIN
695: l_progress := '000';
696: x_return_status := FND_API.G_RET_STS_SUCCESS;
697:
698: l_progress := '010';
699:
700: SELECT cancel_reqs_on_po_cancel_flag

Line 747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

743: WHEN NO_DATA_FOUND THEN
744: NULL;
745:
746: WHEN OTHERS THEN
747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
748:
749: FND_MSG_PUB.add_exc_msg
750: ( p_pkg_name => g_pkg_name,
751: p_procedure_name => l_api_name);