DBA Data[Home] [Help]

APPS.AHL_OSP_PO_REQ_PVT dependencies on FND_API

Line 177: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

173: -- Parameters :
174: --
175: -- Standard IN Parameters :
176: -- p_api_version IN NUMBER Required
177: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
178: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
179: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
180: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
181: -- p_module_type IN VARCHAR2 Default NULL.

Line 178: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

174: --
175: -- Standard IN Parameters :
176: -- p_api_version IN NUMBER Required
177: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
178: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
179: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
180: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
181: -- p_module_type IN VARCHAR2 Default NULL.
182: --

Line 179: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

175: -- Standard IN Parameters :
176: -- p_api_version IN NUMBER Required
177: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
178: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
179: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
180: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
181: -- p_module_type IN VARCHAR2 Default NULL.
182: --
183: -- Standard OUT Parameters :

Line 180: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

176: -- p_api_version IN NUMBER Required
177: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
178: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
179: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
180: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
181: -- p_module_type IN VARCHAR2 Default NULL.
182: --
183: -- Standard OUT Parameters :
184: -- x_return_status OUT VARCHAR2 Required

Line 207: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

203:
204: PROCEDURE Create_PO_Requisition
205: (
206: p_api_version IN NUMBER,
207: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
208: p_commit IN VARCHAR2 := FND_API.G_FALSE,
209: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
210: p_module_type IN VARCHAR2 := NULL,
211: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given

Line 208: p_commit IN VARCHAR2 := FND_API.G_FALSE,

204: PROCEDURE Create_PO_Requisition
205: (
206: p_api_version IN NUMBER,
207: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
208: p_commit IN VARCHAR2 := FND_API.G_FALSE,
209: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
210: p_module_type IN VARCHAR2 := NULL,
211: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given
212: p_osp_order_number IN NUMBER := NULL, -- Required if Id is not given

Line 209: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

205: (
206: p_api_version IN NUMBER,
207: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
208: p_commit IN VARCHAR2 := FND_API.G_FALSE,
209: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
210: p_module_type IN VARCHAR2 := NULL,
211: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given
212: p_osp_order_number IN NUMBER := NULL, -- Required if Id is not given
213: x_batch_id OUT NOCOPY NUMBER,

Line 295: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

291: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
292: END IF;
293:
294: -- Standard call to check for call compatibility
295: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
296: G_PKG_NAME) THEN
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298: END IF;
299:

Line 297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

293:
294: -- Standard call to check for call compatibility
295: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
296: G_PKG_NAME) THEN
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298: END IF;
299:
300: -- Initialize message list if p_init_msg_list is set to TRUE
301: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 301: IF FND_API.To_Boolean(p_init_msg_list) THEN

297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298: END IF;
299:
300: -- Initialize message list if p_init_msg_list is set to TRUE
301: IF FND_API.To_Boolean(p_init_msg_list) THEN
302: FND_MSG_PUB.Initialize;
303: END IF;
304:
305: -- Initialize API return status to success

Line 306: x_return_status := FND_API.G_RET_STS_SUCCESS;

302: FND_MSG_PUB.Initialize;
303: END IF;
304:
305: -- Initialize API return status to success
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
307:
308: -- Start processing
309:
310: -- Create the Header Rec

Line 375: RAISE FND_API.G_EXC_ERROR;

371: Validate_PO_Req_Lines(l_po_req_line_tbl, l_po_req_header.OSP_ORDER_ID);
372: -- Check Error Message stack.
373: x_msg_count := FND_MSG_PUB.count_msg;
374: IF x_msg_count > 0 THEN
375: RAISE FND_API.G_EXC_ERROR;
376: END IF;
377:
378: -- Insert Rows into PO_REQUISITIONS_INTERFACE_ALL
379:

Line 420: RAISE FND_API.G_EXC_ERROR;

416: FND_MSG_PUB.ADD;
417: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
418: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, FALSE);
419: END IF;
420: RAISE FND_API.G_EXC_ERROR;
421: END IF;
422:
423: -- Update OSP Table with batch id, request id
424: Update_OSP_Order(p_osp_order_id => p_osp_order_id,

Line 438: RAISE FND_API.G_EXC_ERROR;

434: END IF;
435: -- Check Error Message stack.
436: x_msg_count := FND_MSG_PUB.count_msg;
437: IF x_msg_count > 0 THEN
438: RAISE FND_API.G_EXC_ERROR;
439: END IF;
440:
441: -- Log this transaction in the Log Table
442: AHL_OSP_UTIL_PKG.Log_Transaction(p_trans_type_code => G_TXN_TYPE_PO_REQ_CREATION,

Line 449: IF FND_API.TO_BOOLEAN(p_commit) THEN

445: p_dest_doc_id => l_batch_id,
446: p_dest_doc_type_code => G_DOC_TYPE_PO_REQ);
447:
448: -- Standard check of p_commit
449: IF FND_API.TO_BOOLEAN(p_commit) THEN
450: COMMIT WORK;
451: END IF;
452:
453: -- Standard call to get message count and if count is 1, get message info

Line 457: p_encoded => fnd_api.g_false

453: -- Standard call to get message count and if count is 1, get message info
454: FND_MSG_PUB.Count_And_Get
455: ( p_count => x_msg_count,
456: p_data => x_msg_data,
457: p_encoded => fnd_api.g_false
458: );
459:
460: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
461: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 465: WHEN FND_API.G_EXC_ERROR THEN

461: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
462: END IF;
463:
464: EXCEPTION
465: WHEN FND_API.G_EXC_ERROR THEN
466: ROLLBACK TO Create_PO_Requisition_pvt;
467: x_return_status := FND_API.G_RET_STS_ERROR;
468: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
469: p_data => x_msg_data,

Line 467: x_return_status := FND_API.G_RET_STS_ERROR;

463:
464: EXCEPTION
465: WHEN FND_API.G_EXC_ERROR THEN
466: ROLLBACK TO Create_PO_Requisition_pvt;
467: x_return_status := FND_API.G_RET_STS_ERROR;
468: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
469: p_data => x_msg_data,
470: p_encoded => fnd_api.g_false);
471:

Line 470: p_encoded => fnd_api.g_false);

466: ROLLBACK TO Create_PO_Requisition_pvt;
467: x_return_status := FND_API.G_RET_STS_ERROR;
468: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
469: p_data => x_msg_data,
470: p_encoded => fnd_api.g_false);
471:
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: ROLLBACK TO Create_PO_Requisition_pvt;
474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

468: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
469: p_data => x_msg_data,
470: p_encoded => fnd_api.g_false);
471:
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: ROLLBACK TO Create_PO_Requisition_pvt;
474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
475: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
476: p_data => x_msg_data,

Line 474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

470: p_encoded => fnd_api.g_false);
471:
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: ROLLBACK TO Create_PO_Requisition_pvt;
474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
475: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
476: p_data => x_msg_data,
477: p_encoded => fnd_api.g_false);
478:

Line 477: p_encoded => fnd_api.g_false);

473: ROLLBACK TO Create_PO_Requisition_pvt;
474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
475: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
476: p_data => x_msg_data,
477: p_encoded => fnd_api.g_false);
478:
479: WHEN OTHERS THEN
480: ROLLBACK TO Create_PO_Requisition_pvt;
481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

477: p_encoded => fnd_api.g_false);
478:
479: WHEN OTHERS THEN
480: ROLLBACK TO Create_PO_Requisition_pvt;
481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
482: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
483: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
484: p_procedure_name => 'Create_PO_Requisition',
485: p_error_text => SUBSTR(SQLERRM,1,240));

Line 489: p_encoded => fnd_api.g_false);

485: p_error_text => SUBSTR(SQLERRM,1,240));
486: END IF;
487: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
488: p_data => x_msg_data,
489: p_encoded => fnd_api.g_false);
490:
491:
492: END Create_PO_Requisition;
493:

Line 507: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

503: -- Parameters :
504: --
505: -- Standard IN Parameters :
506: -- p_api_version IN NUMBER Required
507: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
508: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
509: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
510: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
511: -- p_module_type IN VARCHAR2 Default NULL.

Line 508: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

504: --
505: -- Standard IN Parameters :
506: -- p_api_version IN NUMBER Required
507: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
508: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
509: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
510: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
511: -- p_module_type IN VARCHAR2 Default NULL.
512: --

Line 509: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

505: -- Standard IN Parameters :
506: -- p_api_version IN NUMBER Required
507: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
508: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
509: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
510: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
511: -- p_module_type IN VARCHAR2 Default NULL.
512: --
513: -- Standard OUT Parameters :

Line 510: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

506: -- p_api_version IN NUMBER Required
507: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
508: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
509: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
510: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
511: -- p_module_type IN VARCHAR2 Default NULL.
512: --
513: -- Standard OUT Parameters :
514: -- x_return_status OUT VARCHAR2 Required

Line 530: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

526:
527: PROCEDURE PO_Synch_All_Requisitions
528: (
529: p_api_version IN NUMBER,
530: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
531: p_commit IN VARCHAR2 := FND_API.G_FALSE,
532: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
533: p_default IN VARCHAR2 := FND_API.G_TRUE,
534: p_module_type IN VARCHAR2 := NULL,

Line 531: p_commit IN VARCHAR2 := FND_API.G_FALSE,

527: PROCEDURE PO_Synch_All_Requisitions
528: (
529: p_api_version IN NUMBER,
530: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
531: p_commit IN VARCHAR2 := FND_API.G_FALSE,
532: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
533: p_default IN VARCHAR2 := FND_API.G_TRUE,
534: p_module_type IN VARCHAR2 := NULL,
535: p_concurrent_flag IN VARCHAR2 := 'N',

Line 532: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

528: (
529: p_api_version IN NUMBER,
530: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
531: p_commit IN VARCHAR2 := FND_API.G_FALSE,
532: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
533: p_default IN VARCHAR2 := FND_API.G_TRUE,
534: p_module_type IN VARCHAR2 := NULL,
535: p_concurrent_flag IN VARCHAR2 := 'N',
536: x_return_status OUT NOCOPY VARCHAR2,

Line 533: p_default IN VARCHAR2 := FND_API.G_TRUE,

529: p_api_version IN NUMBER,
530: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
531: p_commit IN VARCHAR2 := FND_API.G_FALSE,
532: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
533: p_default IN VARCHAR2 := FND_API.G_TRUE,
534: p_module_type IN VARCHAR2 := NULL,
535: p_concurrent_flag IN VARCHAR2 := 'N',
536: x_return_status OUT NOCOPY VARCHAR2,
537: x_msg_count OUT NOCOPY NUMBER,

Line 553: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

549: -- No need of a Savepoint: Individual procedures commit or rollback
550: -- within themselves.
551:
552: -- Standard call to check for call compatibility
553: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
554: G_PKG_NAME) THEN
555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
556: END IF;
557:

Line 555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

551:
552: -- Standard call to check for call compatibility
553: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
554: G_PKG_NAME) THEN
555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
556: END IF;
557:
558: -- Initialize message list if p_init_msg_list is set to TRUE
559: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 559: IF FND_API.To_Boolean(p_init_msg_list) THEN

555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
556: END IF;
557:
558: -- Initialize message list if p_init_msg_list is set to TRUE
559: IF FND_API.To_Boolean(p_init_msg_list) THEN
560: FND_MSG_PUB.Initialize;
561: END IF;
562:
563: -- Initialize API return status to success

Line 564: x_return_status := FND_API.G_RET_STS_SUCCESS;

560: FND_MSG_PUB.Initialize;
561: END IF;
562:
563: -- Initialize API return status to success
564: x_return_status := FND_API.G_RET_STS_SUCCESS;
565:
566: IF FND_API.to_boolean( p_default ) THEN
567: -- No special default settings required in this API
568: NULL;

Line 566: IF FND_API.to_boolean( p_default ) THEN

562:
563: -- Initialize API return status to success
564: x_return_status := FND_API.G_RET_STS_SUCCESS;
565:
566: IF FND_API.to_boolean( p_default ) THEN
567: -- No special default settings required in this API
568: NULL;
569: END IF;
570:

Line 633: RAISE FND_API.G_EXC_ERROR; --Note that commit might already have taken place

629: END IF;
630: -- Check Error Message stack.
631: x_msg_count := FND_MSG_PUB.count_msg;
632: IF x_msg_count > 0 THEN
633: RAISE FND_API.G_EXC_ERROR; --Note that commit might already have taken place
634: END IF;
635:
636: -- Standard check of p_commit
637: -- No need to commit: Individual procedures commit or rollback

Line 639: -- IF FND_API.TO_BOOLEAN(p_commit) THEN

635:
636: -- Standard check of p_commit
637: -- No need to commit: Individual procedures commit or rollback
638: -- within themselves.
639: -- IF FND_API.TO_BOOLEAN(p_commit) THEN
640: -- COMMIT WORK; --Note that commit might already have taken place
641: -- END IF;
642:
643: -- Standard call to get message count and if count is 1, get message info

Line 647: p_encoded => fnd_api.g_false

643: -- Standard call to get message count and if count is 1, get message info
644: FND_MSG_PUB.Count_And_Get
645: ( p_count => x_msg_count,
646: p_data => x_msg_data,
647: p_encoded => fnd_api.g_false
648: );
649:
650: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
651: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 655: WHEN FND_API.G_EXC_ERROR THEN

651: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
652: END IF;
653:
654: EXCEPTION
655: WHEN FND_API.G_EXC_ERROR THEN
656: -- No need to rollback: Individual procedures commit or rollback
657: -- within themselves.
658: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
659: x_return_status := FND_API.G_RET_STS_ERROR;

Line 659: x_return_status := FND_API.G_RET_STS_ERROR;

655: WHEN FND_API.G_EXC_ERROR THEN
656: -- No need to rollback: Individual procedures commit or rollback
657: -- within themselves.
658: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
659: x_return_status := FND_API.G_RET_STS_ERROR;
660: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
661: p_data => x_msg_data,
662: p_encoded => fnd_api.g_false);
663: IF (p_concurrent_flag = 'Y') THEN

Line 662: p_encoded => fnd_api.g_false);

658: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
659: x_return_status := FND_API.G_RET_STS_ERROR;
660: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
661: p_data => x_msg_data,
662: p_encoded => fnd_api.g_false);
663: IF (p_concurrent_flag = 'Y') THEN
664: fnd_file.put_line(fnd_file.log, 'Caught Execution Exception: ' || x_msg_data);
665: END IF;
666: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

666: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
667: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Caught Execution Exception: ' || x_msg_data);
668: END IF;
669:
670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: -- No need to rollback: Individual procedures commit or rollback
672: -- within themselves.
673:
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: -- No need to rollback: Individual procedures commit or rollback
672: -- within themselves.
673:
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
675: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
676: p_data => x_msg_data,
677: p_encoded => fnd_api.g_false);
678: IF (p_concurrent_flag = 'Y') THEN

Line 677: p_encoded => fnd_api.g_false);

673:
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
675: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
676: p_data => x_msg_data,
677: p_encoded => fnd_api.g_false);
678: IF (p_concurrent_flag = 'Y') THEN
679: fnd_file.put_line(fnd_file.log, 'Caught Unexpected Exception: ' || x_msg_data);
680: END IF;
681: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

684:
685: WHEN OTHERS THEN
686: -- No need to rollback: Individual procedures commit or rollback
687: -- within themselves.
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
689: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
690: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
691: p_procedure_name => 'PO_Synch_All_Requisitions',
692: p_error_text => SUBSTR(SQLERRM,1,240));

Line 696: p_encoded => fnd_api.g_false);

692: p_error_text => SUBSTR(SQLERRM,1,240));
693: END IF;
694: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
695: p_data => x_msg_data,
696: p_encoded => fnd_api.g_false);
697: IF (p_concurrent_flag = 'Y') THEN
698: fnd_file.put_line(fnd_file.log, 'Caught Unknown Exception: ' || x_msg_data);
699: END IF;
700: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 719: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

715: -- Parameters :
716: --
717: -- Standard IN Parameters :
718: -- p_api_version IN NUMBER Required
719: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
720: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
721: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
722: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
723: -- p_module_type IN VARCHAR2 Default NULL.

Line 720: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

716: --
717: -- Standard IN Parameters :
718: -- p_api_version IN NUMBER Required
719: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
720: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
721: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
722: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
723: -- p_module_type IN VARCHAR2 Default NULL.
724: --

Line 721: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

717: -- Standard IN Parameters :
718: -- p_api_version IN NUMBER Required
719: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
720: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
721: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
722: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
723: -- p_module_type IN VARCHAR2 Default NULL.
724: --
725: -- Standard OUT Parameters :

Line 722: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

718: -- p_api_version IN NUMBER Required
719: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
720: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
721: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
722: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
723: -- p_module_type IN VARCHAR2 Default NULL.
724: --
725: -- Standard OUT Parameters :
726: -- x_return_status OUT VARCHAR2 Required

Line 738: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

734:
735: PROCEDURE Associate_All_New_Reqs
736: (
737: p_api_version IN NUMBER,
738: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
739: p_commit IN VARCHAR2 := FND_API.G_FALSE,
740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
741: p_default IN VARCHAR2 := FND_API.G_TRUE,
742: p_module_type IN VARCHAR2 := NULL,

Line 739: p_commit IN VARCHAR2 := FND_API.G_FALSE,

735: PROCEDURE Associate_All_New_Reqs
736: (
737: p_api_version IN NUMBER,
738: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
739: p_commit IN VARCHAR2 := FND_API.G_FALSE,
740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
741: p_default IN VARCHAR2 := FND_API.G_TRUE,
742: p_module_type IN VARCHAR2 := NULL,
743: x_return_status OUT NOCOPY VARCHAR2,

Line 740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

736: (
737: p_api_version IN NUMBER,
738: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
739: p_commit IN VARCHAR2 := FND_API.G_FALSE,
740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
741: p_default IN VARCHAR2 := FND_API.G_TRUE,
742: p_module_type IN VARCHAR2 := NULL,
743: x_return_status OUT NOCOPY VARCHAR2,
744: x_msg_count OUT NOCOPY NUMBER,

Line 741: p_default IN VARCHAR2 := FND_API.G_TRUE,

737: p_api_version IN NUMBER,
738: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
739: p_commit IN VARCHAR2 := FND_API.G_FALSE,
740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
741: p_default IN VARCHAR2 := FND_API.G_TRUE,
742: p_module_type IN VARCHAR2 := NULL,
743: x_return_status OUT NOCOPY VARCHAR2,
744: x_msg_count OUT NOCOPY NUMBER,
745: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 772: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

768: -- Standard start of API savepoint
769: SAVEPOINT Associate_All_New_Reqs_pvt;
770:
771: -- Standard call to check for call compatibility
772: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
773: G_PKG_NAME) THEN
774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
775: END IF;
776:

Line 774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

770:
771: -- Standard call to check for call compatibility
772: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
773: G_PKG_NAME) THEN
774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
775: END IF;
776:
777: -- Initialize message list if p_init_msg_list is set to TRUE
778: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 778: IF FND_API.To_Boolean(p_init_msg_list) THEN

774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
775: END IF;
776:
777: -- Initialize message list if p_init_msg_list is set to TRUE
778: IF FND_API.To_Boolean(p_init_msg_list) THEN
779: FND_MSG_PUB.Initialize;
780: END IF;
781:
782: -- Initialize API return status to success

Line 783: x_return_status := FND_API.G_RET_STS_SUCCESS;

779: FND_MSG_PUB.Initialize;
780: END IF;
781:
782: -- Initialize API return status to success
783: x_return_status := FND_API.G_RET_STS_SUCCESS;
784:
785: IF FND_API.to_boolean( p_default ) THEN
786: -- No special default settings required in this API
787: NULL;

Line 785: IF FND_API.to_boolean( p_default ) THEN

781:
782: -- Initialize API return status to success
783: x_return_status := FND_API.G_RET_STS_SUCCESS;
784:
785: IF FND_API.to_boolean( p_default ) THEN
786: -- No special default settings required in this API
787: NULL;
788: END IF;
789:

Line 811: RAISE FND_API.G_EXC_ERROR;

807: END IF;
808: -- Check Error Message stack.
809: x_msg_count := FND_MSG_PUB.count_msg;
810: IF x_msg_count > 0 THEN
811: RAISE FND_API.G_EXC_ERROR;
812: END IF;
813:
814: -- Standard check of p_commit
815: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 815: IF FND_API.TO_BOOLEAN(p_commit) THEN

811: RAISE FND_API.G_EXC_ERROR;
812: END IF;
813:
814: -- Standard check of p_commit
815: IF FND_API.TO_BOOLEAN(p_commit) THEN
816: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
817: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
818: END IF;
819: COMMIT WORK;

Line 826: p_encoded => fnd_api.g_false

822: -- Standard call to get message count and if count is 1, get message info
823: FND_MSG_PUB.Count_And_Get
824: ( p_count => x_msg_count,
825: p_data => x_msg_data,
826: p_encoded => fnd_api.g_false
827: );
828:
829: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
830: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 834: WHEN FND_API.G_EXC_ERROR THEN

830: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
831: END IF;
832:
833: EXCEPTION
834: WHEN FND_API.G_EXC_ERROR THEN
835: ROLLBACK TO Associate_All_New_Reqs_pvt;
836: x_return_status := FND_API.G_RET_STS_ERROR;
837: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
838: p_data => x_msg_data,

Line 836: x_return_status := FND_API.G_RET_STS_ERROR;

832:
833: EXCEPTION
834: WHEN FND_API.G_EXC_ERROR THEN
835: ROLLBACK TO Associate_All_New_Reqs_pvt;
836: x_return_status := FND_API.G_RET_STS_ERROR;
837: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
838: p_data => x_msg_data,
839: p_encoded => fnd_api.g_false);
840:

Line 839: p_encoded => fnd_api.g_false);

835: ROLLBACK TO Associate_All_New_Reqs_pvt;
836: x_return_status := FND_API.G_RET_STS_ERROR;
837: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
838: p_data => x_msg_data,
839: p_encoded => fnd_api.g_false);
840:
841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
842: ROLLBACK TO Associate_All_New_Reqs_pvt;
843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

837: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
838: p_data => x_msg_data,
839: p_encoded => fnd_api.g_false);
840:
841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
842: ROLLBACK TO Associate_All_New_Reqs_pvt;
843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
844: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
845: p_data => x_msg_data,

Line 843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

839: p_encoded => fnd_api.g_false);
840:
841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
842: ROLLBACK TO Associate_All_New_Reqs_pvt;
843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
844: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
845: p_data => x_msg_data,
846: p_encoded => fnd_api.g_false);
847:

Line 846: p_encoded => fnd_api.g_false);

842: ROLLBACK TO Associate_All_New_Reqs_pvt;
843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
844: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
845: p_data => x_msg_data,
846: p_encoded => fnd_api.g_false);
847:
848: WHEN OTHERS THEN
849: ROLLBACK TO Associate_All_New_Reqs_pvt;
850: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 850: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

846: p_encoded => fnd_api.g_false);
847:
848: WHEN OTHERS THEN
849: ROLLBACK TO Associate_All_New_Reqs_pvt;
850: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
851: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
852: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
853: p_procedure_name => 'Associate_All_New_Reqs',
854: p_error_text => SUBSTR(SQLERRM,1,240));

Line 858: p_encoded => fnd_api.g_false);

854: p_error_text => SUBSTR(SQLERRM,1,240));
855: END IF;
856: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
857: p_data => x_msg_data,
858: p_encoded => fnd_api.g_false);
859:
860: END Associate_All_New_Reqs;
861:
862: -------------------------------------------------------------------------

Line 1142: IF (p_po_req_header_rec.OSP_ORDER_ID IS NULL OR p_po_req_header_rec.OSP_ORDER_ID = FND_API.G_MISS_NUM) THEN

1138: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1139: END IF;
1140:
1141: -- OSP Order Id
1142: IF (p_po_req_header_rec.OSP_ORDER_ID IS NULL OR p_po_req_header_rec.OSP_ORDER_ID = FND_API.G_MISS_NUM) THEN
1143: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_OSP_ID_NULL');
1144: FND_MSG_PUB.ADD;
1145: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1146: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1163: IF (p_po_req_header_rec.VENDOR_ID IS NULL OR p_po_req_header_rec.VENDOR_ID = FND_API.G_MISS_NUM) THEN

1159: CLOSE l_validate_osp_csr;
1160: END IF;
1161:
1162: -- Supplier
1163: IF (p_po_req_header_rec.VENDOR_ID IS NULL OR p_po_req_header_rec.VENDOR_ID = FND_API.G_MISS_NUM) THEN
1164: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SUPPLIER_ID_NULL');
1165: FND_MSG_PUB.ADD;
1166: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1167: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1184: IF (p_po_req_header_rec.VENDOR_SITE_ID IS NULL OR p_po_req_header_rec.VENDOR_SITE_ID = FND_API.G_MISS_NUM) THEN

1180: CLOSE l_validate_supplier_csr;
1181: END IF;
1182:
1183: -- Supplier Site
1184: IF (p_po_req_header_rec.VENDOR_SITE_ID IS NULL OR p_po_req_header_rec.VENDOR_SITE_ID = FND_API.G_MISS_NUM) THEN
1185: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SSITE_ID_NULL');
1186: FND_MSG_PUB.ADD;
1187: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1188: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1205: IF (p_po_req_header_rec.VENDOR_CONTACT_ID IS NOT NULL AND p_po_req_header_rec.VENDOR_CONTACT_ID <> FND_API.G_MISS_NUM) THEN

1201: CLOSE l_validate_supp_site_csr;
1202: END IF;
1203:
1204: -- Vendor Contact (Optional)
1205: IF (p_po_req_header_rec.VENDOR_CONTACT_ID IS NOT NULL AND p_po_req_header_rec.VENDOR_CONTACT_ID <> FND_API.G_MISS_NUM) THEN
1206: OPEN l_validate_vendor_contact_csr(p_po_req_header_rec.VENDOR_CONTACT_ID, p_po_req_header_rec.VENDOR_SITE_ID);
1207: FETCH l_validate_vendor_contact_csr INTO l_dummy;
1208: IF (l_validate_vendor_contact_csr%NOTFOUND) THEN
1209: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_VCONTACT_INVALID');

Line 1220: IF (p_po_req_header_rec.BUYER_ID IS NULL OR p_po_req_header_rec.BUYER_ID = FND_API.G_MISS_NUM) THEN

1216: CLOSE l_validate_vendor_contact_csr;
1217: END IF;
1218:
1219: -- Buyer
1220: IF (p_po_req_header_rec.BUYER_ID IS NULL OR p_po_req_header_rec.BUYER_ID = FND_API.G_MISS_NUM) THEN
1221: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_BUYER_ID_NULL');
1222: FND_MSG_PUB.ADD;
1223: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1224: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1288: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1284: FND_MSG_PUB.ADD;
1285: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1286: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, FALSE);
1287: END IF;
1288: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1289: END IF;
1290:
1291: -- Non zero count
1292: IF (p_po_req_line_tbl.COUNT = 0) THEN

Line 1303: IF (p_po_req_line_tbl(i).ITEM_ID IS NOT NULL AND p_po_req_line_tbl(i).ITEM_ID <> FND_API.G_MISS_NUM) THEN

1299: END IF;
1300:
1301: FOR i IN p_po_req_line_tbl.FIRST..p_po_req_line_tbl.LAST LOOP
1302: -- Item
1303: IF (p_po_req_line_tbl(i).ITEM_ID IS NOT NULL AND p_po_req_line_tbl(i).ITEM_ID <> FND_API.G_MISS_NUM) THEN
1304: -- Non One-time Item
1305: OPEN l_validate_item_csr(p_po_req_line_tbl(i).ITEM_ID, p_po_req_line_tbl(i).SHIP_TO_ORG_ID);
1306: FETCH l_validate_item_csr INTO l_dummy;
1307: IF (l_validate_item_csr%NOTFOUND) THEN

Line 1318: IF (TRIM(p_po_req_line_tbl(i).ITEM_DESCRIPTION) IS NULL OR p_po_req_line_tbl(i).ITEM_DESCRIPTION = FND_API.G_MISS_CHAR) THEN

1314: END IF;
1315: CLOSE l_validate_item_csr;
1316: ELSE
1317: -- One-time Item: Description is mandatory
1318: IF (TRIM(p_po_req_line_tbl(i).ITEM_DESCRIPTION) IS NULL OR p_po_req_line_tbl(i).ITEM_DESCRIPTION = FND_API.G_MISS_CHAR) THEN
1319: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_IDESC_NULL');
1320: FND_MSG_PUB.ADD;
1321: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1322: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1326: IF (TRIM(p_po_req_line_tbl(i).UOM_CODE) IS NULL OR p_po_req_line_tbl(i).UOM_CODE = FND_API.G_MISS_CHAR) THEN

1322: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1323: END IF;
1324: END IF;
1325: -- One-time Item: UOM is mandatory
1326: IF (TRIM(p_po_req_line_tbl(i).UOM_CODE) IS NULL OR p_po_req_line_tbl(i).UOM_CODE = FND_API.G_MISS_CHAR) THEN
1327: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_UOM_CODE_NULL');
1328: FND_MSG_PUB.ADD;
1329: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1330: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1336: IF (p_po_req_line_tbl(i).QUANTITY IS NULL OR p_po_req_line_tbl(i).QUANTITY = FND_API.G_MISS_NUM) THEN

1332: END IF;
1333: END IF;
1334:
1335: -- Quantity
1336: IF (p_po_req_line_tbl(i).QUANTITY IS NULL OR p_po_req_line_tbl(i).QUANTITY = FND_API.G_MISS_NUM) THEN
1337: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_QUANTITY_NULL');
1338: FND_MSG_PUB.ADD;
1339: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1340: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1354: IF (p_po_req_line_tbl(i).NEED_BY_DATE IS NULL OR p_po_req_line_tbl(i).NEED_BY_DATE = FND_API.G_MISS_DATE) THEN

1350: END IF;
1351: END IF;
1352:
1353: -- Need By Date
1354: IF (p_po_req_line_tbl(i).NEED_BY_DATE IS NULL OR p_po_req_line_tbl(i).NEED_BY_DATE = FND_API.G_MISS_DATE) THEN
1355: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_NEED_BY_DATE_NULL');
1356: FND_MSG_PUB.ADD;
1357: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1358: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1372: IF (p_po_req_line_tbl(i).SHIP_TO_ORG_ID IS NULL OR p_po_req_line_tbl(i).SHIP_TO_ORG_ID = FND_API.G_MISS_NUM) THEN

1368: END IF;
1369: END IF;
1370:
1371: -- Ship To Organization
1372: IF (p_po_req_line_tbl(i).SHIP_TO_ORG_ID IS NULL OR p_po_req_line_tbl(i).SHIP_TO_ORG_ID = FND_API.G_MISS_NUM) THEN
1373: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SHIP_TO_ORG_NULL');
1374: FND_MSG_PUB.ADD;
1375: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1376: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1381: IF (p_po_req_line_tbl(i).PO_LINE_TYPE_ID IS NULL OR p_po_req_line_tbl(i).PO_LINE_TYPE_ID = FND_API.G_MISS_NUM) THEN

1377: END IF;
1378: END IF;
1379:
1380: -- Line Type
1381: IF (p_po_req_line_tbl(i).PO_LINE_TYPE_ID IS NULL OR p_po_req_line_tbl(i).PO_LINE_TYPE_ID = FND_API.G_MISS_NUM) THEN
1382: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_LN_TYPE_ID_NULL');
1383: FND_MSG_PUB.ADD;
1384: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1385: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1480: RAISE FND_API.G_EXC_ERROR;

1476: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1477: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1478: END IF;
1479: CLOSE l_osp_dtls_csr;
1480: RAISE FND_API.G_EXC_ERROR;
1481: END IF;
1482: CLOSE l_osp_dtls_csr;
1483:
1484: -- Update non-null local variables into cursor variable

Line 1770: RAISE FND_API.G_EXC_ERROR;

1766: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1767: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1768: END IF;
1769: CLOSE l_osp_line_dtls_csr;
1770: RAISE FND_API.G_EXC_ERROR;
1771: END IF;
1772: CLOSE l_osp_line_dtls_csr;
1773:
1774: -- Update cursor variable's PO Req Line ID and PO intf transaction id

Line 1897: x_return_status := FND_API.G_RET_STS_SUCCESS;

1893: -- Standard start of API savepoint
1894: SAVEPOINT Handle_Deleted_Req_Headers_pvt;
1895:
1896: -- Initialize API return status to success
1897: x_return_status := FND_API.G_RET_STS_SUCCESS;
1898: -- Get all OSP Orders for which the PO Header has been deleted
1899: OPEN get_req_deleted_osps_csr;
1900: LOOP
1901: FETCH get_req_deleted_osps_csr into l_osp_details_rec;

Line 1955: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

1951: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1952: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Processed PO Req Deletion for ' || l_temp_num || ' OSP Orders');
1953: END IF;
1954:
1955: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
1956: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1957: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
1958: END IF;
1959: COMMIT WORK;

Line 1966: WHEN FND_API.G_EXC_ERROR THEN

1962: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
1963: END IF;
1964:
1965: EXCEPTION
1966: WHEN FND_API.G_EXC_ERROR THEN
1967: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1968: x_return_status := FND_API.G_RET_STS_ERROR;
1969:
1970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1968: x_return_status := FND_API.G_RET_STS_ERROR;

1964:
1965: EXCEPTION
1966: WHEN FND_API.G_EXC_ERROR THEN
1967: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1968: x_return_status := FND_API.G_RET_STS_ERROR;
1969:
1970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1971: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1966: WHEN FND_API.G_EXC_ERROR THEN
1967: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1968: x_return_status := FND_API.G_RET_STS_ERROR;
1969:
1970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1971: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1973:
1974: WHEN OTHERS THEN

Line 1972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1968: x_return_status := FND_API.G_RET_STS_ERROR;
1969:
1970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1971: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1973:
1974: WHEN OTHERS THEN
1975: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1976: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1976: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1973:
1974: WHEN OTHERS THEN
1975: ROLLBACK TO Handle_Deleted_Req_Headers_pvt;
1976: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1977: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1978: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1979: p_procedure_name => 'Handle_Deleted_Req_Headers',
1980: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2038: x_return_status := FND_API.G_RET_STS_SUCCESS;

2034: -- Standard start of API savepoint
2035: SAVEPOINT Handle_Cancelled_Req_Lines_pvt;
2036:
2037: -- Initialize API return status to success
2038: x_return_status := FND_API.G_RET_STS_SUCCESS;
2039:
2040: OPEN l_get_cancelled_req_lines_csr;
2041: LOOP
2042: FETCH l_get_cancelled_req_lines_csr INTO l_po_req_line_id,

Line 2055: p_init_msg_list => FND_API.G_FALSE,

2051: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2052: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2053: END IF;
2054: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2055: p_init_msg_list => FND_API.G_FALSE,
2056: p_commit => FND_API.G_FALSE,
2057: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2058: p_x_osp_order_rec => l_osp_order_rec,
2059: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2056: p_commit => FND_API.G_FALSE,

2052: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2053: END IF;
2054: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2055: p_init_msg_list => FND_API.G_FALSE,
2056: p_commit => FND_API.G_FALSE,
2057: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2058: p_x_osp_order_rec => l_osp_order_rec,
2059: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2060: x_return_status => l_return_status,

Line 2057: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2053: END IF;
2054: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2055: p_init_msg_list => FND_API.G_FALSE,
2056: p_commit => FND_API.G_FALSE,
2057: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2058: p_x_osp_order_rec => l_osp_order_rec,
2059: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2060: x_return_status => l_return_status,
2061: x_msg_count => l_msg_count,

Line 2063: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2059: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2060: x_return_status => l_return_status,
2061: x_msg_count => l_msg_count,
2062: x_msg_data => l_msg_data);
2063: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2064: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2065: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Cancelling OSP Line for OSP Order ' || l_prev_osp_order_id);
2066: END IF;
2067: l_commit_flag := false;

Line 2096: p_init_msg_list => FND_API.G_FALSE,

2092: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2093: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2094: END IF;
2095: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2096: p_init_msg_list => FND_API.G_FALSE,
2097: p_commit => FND_API.G_FALSE,
2098: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2099: p_x_osp_order_rec => l_osp_order_rec,
2100: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2097: p_commit => FND_API.G_FALSE,

2093: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2094: END IF;
2095: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2096: p_init_msg_list => FND_API.G_FALSE,
2097: p_commit => FND_API.G_FALSE,
2098: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2099: p_x_osp_order_rec => l_osp_order_rec,
2100: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2101: x_return_status => l_return_status,

Line 2098: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2094: END IF;
2095: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2096: p_init_msg_list => FND_API.G_FALSE,
2097: p_commit => FND_API.G_FALSE,
2098: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2099: p_x_osp_order_rec => l_osp_order_rec,
2100: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2101: x_return_status => l_return_status,
2102: x_msg_count => l_msg_count,

Line 2104: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2100: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2101: x_return_status => l_return_status,
2102: x_msg_count => l_msg_count,
2103: x_msg_data => l_msg_data);
2104: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2105: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2106: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Cancelling OSP Line for OSP Order ' || l_prev_osp_order_id);
2107: END IF;
2108: l_commit_flag := false;

Line 2112: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

2108: l_commit_flag := false;
2109: END IF;
2110: END IF;
2111: IF (l_commit_flag = false) THEN
2112: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2113: END IF;
2114: -- No errors in current procedure: Check only passed in flag
2115: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2116: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2115: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

2111: IF (l_commit_flag = false) THEN
2112: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2113: END IF;
2114: -- No errors in current procedure: Check only passed in flag
2115: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2116: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2117: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2118: END IF;
2119: COMMIT WORK;

Line 2125: WHEN FND_API.G_EXC_ERROR THEN

2121: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2122: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2123: END IF;
2124: EXCEPTION
2125: WHEN FND_API.G_EXC_ERROR THEN
2126: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2127: x_return_status := FND_API.G_RET_STS_ERROR;
2128:
2129: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2127: x_return_status := FND_API.G_RET_STS_ERROR;

2123: END IF;
2124: EXCEPTION
2125: WHEN FND_API.G_EXC_ERROR THEN
2126: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2127: x_return_status := FND_API.G_RET_STS_ERROR;
2128:
2129: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2130: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2129: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2125: WHEN FND_API.G_EXC_ERROR THEN
2126: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2127: x_return_status := FND_API.G_RET_STS_ERROR;
2128:
2129: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2130: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2132:
2133: WHEN OTHERS THEN

Line 2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2127: x_return_status := FND_API.G_RET_STS_ERROR;
2128:
2129: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2130: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2132:
2133: WHEN OTHERS THEN
2134: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2132:
2133: WHEN OTHERS THEN
2134: ROLLBACK TO Handle_Cancelled_Req_Lines_pvt;
2135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2136: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2137: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2138: p_procedure_name => 'Handle_Cancelled_Req_Lines',
2139: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2188: x_return_status := FND_API.G_RET_STS_SUCCESS;

2184: -- Standard start of API savepoint
2185: SAVEPOINT Handle_Deleted_Req_Lines_pvt;
2186:
2187: -- Initialize API return status to success
2188: x_return_status := FND_API.G_RET_STS_SUCCESS;
2189:
2190: OPEN l_get_deleted_req_lines_csr;
2191: LOOP
2192: FETCH l_get_deleted_req_lines_csr INTO l_osp_order_id,

Line 2204: p_init_msg_list => FND_API.G_FALSE,

2200: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2201: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2202: END IF;
2203: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2204: p_init_msg_list => FND_API.G_FALSE,
2205: p_commit => FND_API.G_FALSE,
2206: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2207: p_x_osp_order_rec => l_osp_order_rec,
2208: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2205: p_commit => FND_API.G_FALSE,

2201: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2202: END IF;
2203: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2204: p_init_msg_list => FND_API.G_FALSE,
2205: p_commit => FND_API.G_FALSE,
2206: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2207: p_x_osp_order_rec => l_osp_order_rec,
2208: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2209: x_return_status => l_return_status,

Line 2206: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2202: END IF;
2203: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2204: p_init_msg_list => FND_API.G_FALSE,
2205: p_commit => FND_API.G_FALSE,
2206: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2207: p_x_osp_order_rec => l_osp_order_rec,
2208: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2209: x_return_status => l_return_status,
2210: x_msg_count => l_msg_count,

Line 2212: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2208: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2209: x_return_status => l_return_status,
2210: x_msg_count => l_msg_count,
2211: x_msg_data => l_msg_data);
2212: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2213: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2214: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Deleting OSP Line for OSP Order ' || l_prev_osp_order_id);
2215: END IF;
2216: l_commit_flag := false;

Line 2244: p_init_msg_list => FND_API.G_FALSE,

2240: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2241: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2242: END IF;
2243: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2244: p_init_msg_list => FND_API.G_FALSE,
2245: p_commit => FND_API.G_FALSE,
2246: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2247: p_x_osp_order_rec => l_osp_order_rec,
2248: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2245: p_commit => FND_API.G_FALSE,

2241: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2242: END IF;
2243: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2244: p_init_msg_list => FND_API.G_FALSE,
2245: p_commit => FND_API.G_FALSE,
2246: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2247: p_x_osp_order_rec => l_osp_order_rec,
2248: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2249: x_return_status => l_return_status,

Line 2246: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2242: END IF;
2243: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2244: p_init_msg_list => FND_API.G_FALSE,
2245: p_commit => FND_API.G_FALSE,
2246: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2247: p_x_osp_order_rec => l_osp_order_rec,
2248: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2249: x_return_status => l_return_status,
2250: x_msg_count => l_msg_count,

Line 2252: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2248: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2249: x_return_status => l_return_status,
2250: x_msg_count => l_msg_count,
2251: x_msg_data => l_msg_data);
2252: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2253: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2254: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Deleting OSP Line for OSP Order ' || l_prev_osp_order_id);
2255: END IF;
2256: l_commit_flag := false;

Line 2261: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

2257: END IF;
2258: END IF;
2259:
2260: IF (l_commit_flag = false) THEN
2261: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2262: END IF;
2263: -- No errors in current procedure: Check only passed in flag
2264: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2265: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2264: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

2260: IF (l_commit_flag = false) THEN
2261: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2262: END IF;
2263: -- No errors in current procedure: Check only passed in flag
2264: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2265: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2267: END IF;
2268: COMMIT WORK;

Line 2274: WHEN FND_API.G_EXC_ERROR THEN

2270: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2271: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2272: END IF;
2273: EXCEPTION
2274: WHEN FND_API.G_EXC_ERROR THEN
2275: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2276: x_return_status := FND_API.G_RET_STS_ERROR;
2277:
2278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2276: x_return_status := FND_API.G_RET_STS_ERROR;

2272: END IF;
2273: EXCEPTION
2274: WHEN FND_API.G_EXC_ERROR THEN
2275: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2276: x_return_status := FND_API.G_RET_STS_ERROR;
2277:
2278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2279: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2280: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2274: WHEN FND_API.G_EXC_ERROR THEN
2275: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2276: x_return_status := FND_API.G_RET_STS_ERROR;
2277:
2278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2279: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2280: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2281:
2282: WHEN OTHERS THEN

Line 2280: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2276: x_return_status := FND_API.G_RET_STS_ERROR;
2277:
2278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2279: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2280: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2281:
2282: WHEN OTHERS THEN
2283: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2280: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2281:
2282: WHEN OTHERS THEN
2283: ROLLBACK TO Handle_Deleted_Req_Lines_pvt;
2284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2285: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2286: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2287: p_procedure_name => 'Handle_Deleted_Req_Lines',
2288: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2325: IF (p_po_req_header_id IS NULL OR p_po_req_header_id = FND_API.G_MISS_NUM) THEN

2321: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2322: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'PO_REQ_HEADER_ID: '|| p_po_req_header_id);
2323: END IF;
2324:
2325: IF (p_po_req_header_id IS NULL OR p_po_req_header_id = FND_API.G_MISS_NUM) THEN
2326: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_REQ_ID_NULL');
2327: FND_MSG_PUB.ADD;
2328: RETURN 'N';
2329: ELSE