eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PON_EMD_AR_INTEGRATION_GRP dependencies on FND_API

Line 237: x_return_status := FND_API.G_RET_STS_SUCCESS;

233: and enabled_flag = 'Y';
234:
235: print_log('l_description: '||l_description);
236:
237: x_return_status := FND_API.G_RET_STS_SUCCESS;
238: -- Standard call to check for callcompatibility.
239: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
240: l_api_name, l_api_name) THEN
241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 239: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

235: print_log('l_description: '||l_description);
236:
237: x_return_status := FND_API.G_RET_STS_SUCCESS;
238: -- Standard call to check for callcompatibility.
239: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
240: l_api_name, l_api_name) THEN
241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
242: END IF;
243:

Line 241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

237: x_return_status := FND_API.G_RET_STS_SUCCESS;
238: -- Standard call to check for callcompatibility.
239: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
240: l_api_name, l_api_name) THEN
241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
242: END IF;
243:
244: -- Initialize message list if p_init_msg_list is set to TRUE.
245: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 245: IF FND_API.to_Boolean(p_init_msg_list) THEN

241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
242: END IF;
243:
244: -- Initialize message list if p_init_msg_list is set to TRUE.
245: IF FND_API.to_Boolean(p_init_msg_list) THEN
246: FND_MSG_PUB.initialize();
247: END IF;
248:
249: --Call to AR API

Line 256: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level

252: -- Standard API parameters.
253: 1, -- p_api_version
254: p_init_msg_list, -- p_init_msg_list
255: p_commit, -- p_commit
256: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level
257: x_return_status, -- return status(out)
258: x_msg_count, -- message count(out)
259: x_msg_data, -- message data(out)
260: l_deposit_number, -- deposit number

Line 391: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

387: print_log('x_new_customer_trx_id: '||x_new_customer_trx_id);
388: print_log('x_new_customer_trx_line_id: '||x_new_customer_trx_line_id);
389: print_log('x_return_status: '||x_return_status);
390:
391: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
392: FND_MESSAGE.SET_NAME('PON','EMD_DEPOSIT_CREATION_FAILED');
393: FND_MSG_PUB.ADD;
394: RETURN;
395: END IF;

Line 398: x_return_status := FND_API.G_RET_STS_ERROR;

394: RETURN;
395: END IF;
396:
397: IF (x_new_trx_number IS null) THEN
398: x_return_status := FND_API.G_RET_STS_ERROR;
399: FND_MESSAGE.SET_NAME('PON','EMD_DEPOSIT_CREATION_FAILED');
400: FND_MSG_PUB.ADD;
401: RETURN;
402: END IF;

Line 405: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

401: RETURN;
402: END IF;
403:
404: --Setting out parameters
405: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
406: x_out_rec.deposit_trx_number := x_new_trx_number;
407: x_out_rec.deposit_trx_id := x_new_customer_trx_id;
408: x_out_rec.deposit_trx_line_id :=x_new_customer_trx_line_id;
409: END IF;

Line 411: IF FND_API.To_Boolean( p_commit ) THEN

407: x_out_rec.deposit_trx_id := x_new_customer_trx_id;
408: x_out_rec.deposit_trx_line_id :=x_new_customer_trx_line_id;
409: END IF;
410:
411: IF FND_API.To_Boolean( p_commit ) THEN
412: Commit;
413: END IF;
414:
415:

Line 417: WHEN FND_API.G_EXC_ERROR THEN

413: END IF;
414:
415:
416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: x_return_status := fnd_api.g_ret_sts_error;
419: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
420: x_return_status := fnd_api.g_ret_sts_error;
421: END create_emd_deposit;

Line 418: x_return_status := fnd_api.g_ret_sts_error;

414:
415:
416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: x_return_status := fnd_api.g_ret_sts_error;
419: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
420: x_return_status := fnd_api.g_ret_sts_error;
421: END create_emd_deposit;
422:

Line 419: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

415:
416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: x_return_status := fnd_api.g_ret_sts_error;
419: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
420: x_return_status := fnd_api.g_ret_sts_error;
421: END create_emd_deposit;
422:
423: -----------------------------------------------------------------------

Line 420: x_return_status := fnd_api.g_ret_sts_error;

416: EXCEPTION
417: WHEN FND_API.G_EXC_ERROR THEN
418: x_return_status := fnd_api.g_ret_sts_error;
419: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
420: x_return_status := fnd_api.g_ret_sts_error;
421: END create_emd_deposit;
422:
423: -----------------------------------------------------------------------
424: --Start of Comments

Line 514: l_call_payment_processor VARCHAR2(1) DEFAULT FND_API.G_FALSE;

510: l_link_to_trx_hist_id ar_receivable_applications.link_to_trx_hist_id%TYPE DEFAULT NULL;
511: app_attribute_rec AR_RECEIPT_API_PUB.attribute_rec_type DEFAULT AR_RECEIPT_API_PUB.attribute_rec_const;
512: app_global_attribute_rec AR_RECEIPT_API_PUB.global_attribute_rec_type DEFAULT AR_RECEIPT_API_PUB.global_attribute_rec_const;
513: app_comments ar_receivable_applications.comments%TYPE DEFAULT NULL;
514: l_call_payment_processor VARCHAR2(1) DEFAULT FND_API.G_FALSE;
515: l_org_id NUMBER DEFAULT NULL;
516:
517: x_msg_data VARCHAR2(1000);
518: x_msg_count NUMBER;

Line 524: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

520: BEGIN
521:
522: l_progress := 100;
523: -- Standard call to check for call compatibility.
524: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
525: l_api_name, l_api_name) THEN
526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: END IF;
528: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

522: l_progress := 100;
523: -- Standard call to check for call compatibility.
524: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
525: l_api_name, l_api_name) THEN
526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: END IF;
528: -- Initialize message list if p_init_msg_list is set to TRUE.
529: IF FND_API.to_Boolean(p_init_msg_list) THEN
530: FND_MSG_PUB.initialize();

Line 529: IF FND_API.to_Boolean(p_init_msg_list) THEN

525: l_api_name, l_api_name) THEN
526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: END IF;
528: -- Initialize message list if p_init_msg_list is set to TRUE.
529: IF FND_API.to_Boolean(p_init_msg_list) THEN
530: FND_MSG_PUB.initialize();
531: END IF;
532: x_return_status := FND_API.G_RET_STS_SUCCESS;
533: --Call to AR create_cash API

Line 532: x_return_status := FND_API.G_RET_STS_SUCCESS;

528: -- Initialize message list if p_init_msg_list is set to TRUE.
529: IF FND_API.to_Boolean(p_init_msg_list) THEN
530: FND_MSG_PUB.initialize();
531: END IF;
532: x_return_status := FND_API.G_RET_STS_SUCCESS;
533: --Call to AR create_cash API
534: l_progress := 100;
535: AR_RECEIPT_API_PUB.Create_and_apply(
536: 1, -- p_api_version

Line 537: FND_API.G_FALSE, -- p_init_msg_list

533: --Call to AR create_cash API
534: l_progress := 100;
535: AR_RECEIPT_API_PUB.Create_and_apply(
536: 1, -- p_api_version
537: FND_API.G_FALSE, -- p_init_msg_list
538: FND_API.G_FALSE, -- p_commit
539: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level
540: x_return_status, -- return status(out)
541: x_msg_count, -- message count(out)

Line 538: FND_API.G_FALSE, -- p_commit

534: l_progress := 100;
535: AR_RECEIPT_API_PUB.Create_and_apply(
536: 1, -- p_api_version
537: FND_API.G_FALSE, -- p_init_msg_list
538: FND_API.G_FALSE, -- p_commit
539: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level
540: x_return_status, -- return status(out)
541: x_msg_count, -- message count(out)
542: x_msg_data, -- message data(out)

Line 539: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level

535: AR_RECEIPT_API_PUB.Create_and_apply(
536: 1, -- p_api_version
537: FND_API.G_FALSE, -- p_init_msg_list
538: FND_API.G_FALSE, -- p_commit
539: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level
540: x_return_status, -- return status(out)
541: x_msg_count, -- message count(out)
542: x_msg_data, -- message data(out)
543: l_usr_currency_code ,

Line 608: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

604: l_call_payment_processor,
605: l_org_id);
606:
607: --Setting out parameters
608: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
609: FND_MESSAGE.SET_NAME('PON','RECEIPT_CRE_AND_APPLY_FAILED');
610: FND_MSG_PUB.ADD;
611: RETURN;
612: END IF;

Line 614: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

610: FND_MSG_PUB.ADD;
611: RETURN;
612: END IF;
613:
614: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
615: x_out_rec.receipt_id := l_cr_id;
616: END IF;
617:
618: IF FND_API.To_Boolean( p_commit ) THEN

Line 618: IF FND_API.To_Boolean( p_commit ) THEN

614: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
615: x_out_rec.receipt_id := l_cr_id;
616: END IF;
617:
618: IF FND_API.To_Boolean( p_commit ) THEN
619: Commit;
620: END IF;
621:
622:

Line 624: WHEN FND_API.G_EXC_ERROR THEN

620: END IF;
621:
622:
623: EXCEPTION
624: WHEN FND_API.G_EXC_ERROR THEN
625: x_return_status := fnd_api.g_ret_sts_error;
626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
627: x_return_status := fnd_api.g_ret_sts_error;
628: END create_emd_receipt_and_apply;

Line 625: x_return_status := fnd_api.g_ret_sts_error;

621:
622:
623: EXCEPTION
624: WHEN FND_API.G_EXC_ERROR THEN
625: x_return_status := fnd_api.g_ret_sts_error;
626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
627: x_return_status := fnd_api.g_ret_sts_error;
628: END create_emd_receipt_and_apply;
629:

Line 626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

622:
623: EXCEPTION
624: WHEN FND_API.G_EXC_ERROR THEN
625: x_return_status := fnd_api.g_ret_sts_error;
626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
627: x_return_status := fnd_api.g_ret_sts_error;
628: END create_emd_receipt_and_apply;
629:
630: -----------------------------------------------------------------------

Line 627: x_return_status := fnd_api.g_ret_sts_error;

623: EXCEPTION
624: WHEN FND_API.G_EXC_ERROR THEN
625: x_return_status := fnd_api.g_ret_sts_error;
626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
627: x_return_status := fnd_api.g_ret_sts_error;
628: END create_emd_receipt_and_apply;
629:
630: -----------------------------------------------------------------------
631: --Start of Comments

Line 682: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

678: print_log('Inside unapply_emd_receipt procedure');
679:
680: l_progress := 100;
681: -- Standard call to check for call compatibility.
682: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
683: l_api_name, l_api_name) THEN
684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
685: END IF;
686:

Line 684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

680: l_progress := 100;
681: -- Standard call to check for call compatibility.
682: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
683: l_api_name, l_api_name) THEN
684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
685: END IF;
686:
687: IF FND_API.to_Boolean(p_init_msg_list) THEN
688: FND_MSG_PUB.initialize();

Line 687: IF FND_API.to_Boolean(p_init_msg_list) THEN

683: l_api_name, l_api_name) THEN
684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
685: END IF;
686:
687: IF FND_API.to_Boolean(p_init_msg_list) THEN
688: FND_MSG_PUB.initialize();
689: END IF;
690:
691:

Line 706: x_return_status := fnd_api.g_ret_sts_success;

702: print_log('l_receivable_application_id: '||l_receivable_application_id);
703: print_log('l_org_id: '||l_org_id);
704: print_log('l_installment: '||l_installment);
705:
706: x_return_status := fnd_api.g_ret_sts_success;
707:
708: --Call to AR Unapply API
709: AR_RECEIPT_API_PUB.Unapply(
710: 1, -- p_api_version

Line 713: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level

709: AR_RECEIPT_API_PUB.Unapply(
710: 1, -- p_api_version
711: p_init_msg_list, -- p_init_msg_list
712: p_commit, -- p_commit
713: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level
714: x_return_status, -- return status(out)
715: x_msg_count, -- message count(out)
716: x_msg_data, -- message data(out)
717: l_receipt_number,

Line 732: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

728:
729: print_log('After executing AR procedure AR_RECEIPT_API_PUB.Unapply');
730: print_log('x_return_status: '||x_return_status);
731:
732: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
733: FND_MESSAGE.SET_NAME('PON','UNAPPLY_EMD_RECEIPT_FAILED');
734: FND_MSG_PUB.ADD;
735: RETURN;
736: END IF;

Line 737: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

733: FND_MESSAGE.SET_NAME('PON','UNAPPLY_EMD_RECEIPT_FAILED');
734: FND_MSG_PUB.ADD;
735: RETURN;
736: END IF;
737: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
738: x_out_rec.receipt_id := l_cash_receipt_id;
739: END IF;
740:
741: IF FND_API.To_Boolean( p_commit ) THEN

Line 741: IF FND_API.To_Boolean( p_commit ) THEN

737: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
738: x_out_rec.receipt_id := l_cash_receipt_id;
739: END IF;
740:
741: IF FND_API.To_Boolean( p_commit ) THEN
742: Commit;
743: END IF;
744:
745:

Line 747: WHEN FND_API.G_EXC_ERROR THEN

743: END IF;
744:
745:
746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := fnd_api.g_ret_sts_error;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := fnd_api.g_ret_sts_error;
751: END unapply_emd_receipt;

Line 748: x_return_status := fnd_api.g_ret_sts_error;

744:
745:
746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := fnd_api.g_ret_sts_error;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := fnd_api.g_ret_sts_error;
751: END unapply_emd_receipt;
752:

Line 749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

745:
746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := fnd_api.g_ret_sts_error;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := fnd_api.g_ret_sts_error;
751: END unapply_emd_receipt;
752:
753:

Line 750: x_return_status := fnd_api.g_ret_sts_error;

746: EXCEPTION
747: WHEN FND_API.G_EXC_ERROR THEN
748: x_return_status := fnd_api.g_ret_sts_error;
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: x_return_status := fnd_api.g_ret_sts_error;
751: END unapply_emd_receipt;
752:
753:
754: -----------------------------------------------------------------------

Line 835: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

831:
832: print_log('Inside procedure refund_activity_on_emd_receipt');
833:
834: -- Standard call to check for call compatibility.
835: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
836: l_api_name, l_api_name) THEN
837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
838: END IF;
839:

Line 837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

833:
834: -- Standard call to check for call compatibility.
835: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
836: l_api_name, l_api_name) THEN
837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
838: END IF;
839:
840: IF FND_API.to_Boolean(p_init_msg_list) THEN
841: FND_MSG_PUB.initialize();

Line 840: IF FND_API.to_Boolean(p_init_msg_list) THEN

836: l_api_name, l_api_name) THEN
837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
838: END IF;
839:
840: IF FND_API.to_Boolean(p_init_msg_list) THEN
841: FND_MSG_PUB.initialize();
842: END IF;
843:
844: x_return_status := fnd_api.g_ret_sts_success;

Line 844: x_return_status := fnd_api.g_ret_sts_success;

840: IF FND_API.to_Boolean(p_init_msg_list) THEN
841: FND_MSG_PUB.initialize();
842: END IF;
843:
844: x_return_status := fnd_api.g_ret_sts_success;
845:
846: l_receipt_number := p_in_rec.receipt_num;
847: l_cash_receipt_id := p_in_rec.cash_receipt_id;
848: l_amount_applied := p_in_rec.amount_applied;

Line 861: x_return_status := fnd_api.g_ret_sts_error;

857: FROM hr_operating_units
858: WHERE organization_id = l_org_id;
859: EXCEPTION
860: WHEN OTHERS THEN
861: x_return_status := fnd_api.g_ret_sts_error;
862: FND_MESSAGE.SET_NAME('PON','ORG_NOT_FOUND_IN_HR');
863: FND_MESSAGE.SET_TOKEN('ORG_ID',To_Char(l_org_id));
864: RETURN;
865: END;

Line 876: x_return_status := fnd_api.g_ret_sts_error;

872: WHERE status = 'A' AND
873: TYPE ='CM_REFUND'AND ORG_ID = l_org_id;
874: EXCEPTION
875: WHEN No_Data_Found THEN
876: x_return_status := fnd_api.g_ret_sts_error;
877: fnd_message.set_name('PON','REC_ACT_OF_REFUND_TYPE_NOT_DEF');
878: fnd_message.set_token('ORG',l_organization_name);
879: FND_MSG_PUB.ADD;
880: RETURN;

Line 891: x_return_status := fnd_api.g_ret_sts_error;

887: WHERE status = 'A' AND
888: TYPE ='CCREFUND'AND ORG_ID = l_org_id;
889: EXCEPTION
890: WHEN No_Data_Found THEN
891: x_return_status := fnd_api.g_ret_sts_error;
892: fnd_message.set_name('PON','REC_ACT_FOR_CCREFUND_NOT_DEF');
893: fnd_message.set_token('ORG',l_organization_name);
894: FND_MSG_PUB.ADD;
895: RETURN;

Line 914: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level

910: AR_RECEIPT_API_PUB.Activity_application(
911: 1, -- p_api_version
912: p_init_msg_list, -- p_init_msg_list
913: p_commit, -- p_commit
914: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level
915: x_return_status, -- return status(out)
916: x_msg_count, -- message count(out)
917: x_msg_data, -- message data(out)
918: l_cash_receipt_id,

Line 963: x_return_status := fnd_api.g_ret_sts_error;

959: print_log('l_application_ref_id: '||l_application_ref_id);
960: print_log('x_return_status: '||x_return_status);
961:
962: IF(l_application_ref_id IS null) THEN
963: x_return_status := fnd_api.g_ret_sts_error;
964: FND_MESSAGE.SET_NAME('PON','EMD_REFUND_TRX_FAILED');
965: FND_MSG_PUB.ADD;
966: RETURN;
967: END IF;

Line 968: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

964: FND_MESSAGE.SET_NAME('PON','EMD_REFUND_TRX_FAILED');
965: FND_MSG_PUB.ADD;
966: RETURN;
967: END IF;
968: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
969: x_out_rec.application_ref_id := l_application_ref_id;
970: x_out_rec.application_ref_type := l_application_ref_type;
971: x_out_rec.application_ref_num := l_application_ref_num;
972: END IF;

Line 977: IF FND_API.To_Boolean( p_commit ) THEN

973:
974: print_log('l_application_ref_type: '||l_application_ref_type);
975: print_log('l_application_ref_num: '||l_application_ref_num);
976:
977: IF FND_API.To_Boolean( p_commit ) THEN
978: Commit;
979: END IF;
980:
981: EXCEPTION

Line 982: WHEN FND_API.G_EXC_ERROR THEN

978: Commit;
979: END IF;
980:
981: EXCEPTION
982: WHEN FND_API.G_EXC_ERROR THEN
983: x_return_status := fnd_api.g_ret_sts_error;
984: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
985: x_return_status := fnd_api.g_ret_sts_error;
986: END refund_activity_on_emd_receipt;

Line 983: x_return_status := fnd_api.g_ret_sts_error;

979: END IF;
980:
981: EXCEPTION
982: WHEN FND_API.G_EXC_ERROR THEN
983: x_return_status := fnd_api.g_ret_sts_error;
984: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
985: x_return_status := fnd_api.g_ret_sts_error;
986: END refund_activity_on_emd_receipt;
987:

Line 984: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

980:
981: EXCEPTION
982: WHEN FND_API.G_EXC_ERROR THEN
983: x_return_status := fnd_api.g_ret_sts_error;
984: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
985: x_return_status := fnd_api.g_ret_sts_error;
986: END refund_activity_on_emd_receipt;
987:
988: -----------------------------------------------------------------------

Line 985: x_return_status := fnd_api.g_ret_sts_error;

981: EXCEPTION
982: WHEN FND_API.G_EXC_ERROR THEN
983: x_return_status := fnd_api.g_ret_sts_error;
984: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
985: x_return_status := fnd_api.g_ret_sts_error;
986: END refund_activity_on_emd_receipt;
987:
988: -----------------------------------------------------------------------
989: --Start of Comments

Line 1067: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1063:
1064: BEGIN
1065: print_log('Inside create_cm_on_emd_deposit procedure');
1066: -- Standard call to check for call compatibility.
1067: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1068: l_api_name, l_api_name) THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: END IF;
1071:

Line 1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1065: print_log('Inside create_cm_on_emd_deposit procedure');
1066: -- Standard call to check for call compatibility.
1067: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1068: l_api_name, l_api_name) THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: END IF;
1071:
1072: IF FND_API.to_Boolean(p_init_msg_list) THEN
1073: FND_MSG_PUB.initialize();

Line 1072: IF FND_API.to_Boolean(p_init_msg_list) THEN

1068: l_api_name, l_api_name) THEN
1069: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1070: END IF;
1071:
1072: IF FND_API.to_Boolean(p_init_msg_list) THEN
1073: FND_MSG_PUB.initialize();
1074: END IF;
1075: x_return_status := fnd_api.g_ret_sts_success;
1076:

Line 1075: x_return_status := fnd_api.g_ret_sts_success;

1071:
1072: IF FND_API.to_Boolean(p_init_msg_list) THEN
1073: FND_MSG_PUB.initialize();
1074: END IF;
1075: x_return_status := fnd_api.g_ret_sts_success;
1076:
1077: l_customer_trx_id := p_in_rec.customer_trx_id;
1078: l_line_amount := (-1) * p_in_rec.line_amount;
1079: l_line_credit_flag := 'Y';

Line 1115: x_return_status := fnd_api.g_ret_sts_success;

1111: AND org_id = l_org_id
1112: AND Trunc(SYSDATE) BETWEEN start_date AND Nvl(end_date,Trunc(SYSDATE+1));
1113: EXCEPTION
1114: WHEN No_Data_Found THEN
1115: x_return_status := fnd_api.g_ret_sts_success;
1116: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_SOURCE_NOT_DEF');
1117: FND_MESSAGE.SET_TOKEN('BATCH_SOURCE_ID',To_Char(p_in_rec.batch_source_id));
1118: FND_MSG_PUB.ADD;
1119: RETURN;

Line 1130: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level

1126: AR_CREDIT_MEMO_API_PUB.create_request (
1127: 1, -- p_api_version
1128: p_init_msg_list, -- p_init_msg_list
1129: p_commit, -- p_commit
1130: FND_API.G_VALID_LEVEL_FULL, -- p_validation_level
1131: x_return_status, -- return status(out)
1132: x_msg_count, -- message count(out)
1133: x_msg_data, -- message data(out)
1134: l_customer_trx_id,

Line 1159: IF (x_return_status = fnd_api.g_ret_sts_success)

1155: l_global_attribute_rec,
1156: l_dispute_date);
1157:
1158:
1159: IF (x_return_status = fnd_api.g_ret_sts_success)
1160: AND (x_request_id <> -1) THEN
1161: l_request_id := x_request_id;
1162: AR_CREDIT_MEMO_API_PUB.get_request_status( 1.0,
1163: p_init_msg_list,

Line 1188: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

1184: print_log('After executing AR API AR_CREDIT_MEMO_API_PUB.create_request to create credit memo');
1185: print_log('x_cm_customer_trx_id: '||x_cm_customer_trx_id);
1186: print_log('x_return_status: '||x_return_status);
1187:
1188: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
1189:
1190: IF (x_cm_customer_trx_id IS NOT NULL) THEN
1191: SELECT rx.TRX_NUMBER,
1192: rl.customer_trx_line_id

Line 1202: x_return_status := fnd_api.g_ret_sts_error;

1198: AND rl.customer_trx_id = rx.customer_trx_id;
1199: END IF;
1200: x_out_rec.cm_customer_trx_id := x_cm_customer_trx_id;
1201: ELSE
1202: x_return_status := fnd_api.g_ret_sts_error;
1203: FND_MESSAGE.SET_NAME('PON','CM_CREATION_FAILED');
1204: FND_MSG_PUB.ADD;
1205: RETURN;
1206: END IF;

Line 1213: IF FND_API.To_Boolean( p_commit ) THEN

1209: FND_MSG_PUB.ADD;
1210: RETURN;
1211: END IF;
1212:
1213: IF FND_API.To_Boolean( p_commit ) THEN
1214: Commit;
1215: END IF;
1216:
1217: EXCEPTION

Line 1218: WHEN FND_API.G_EXC_ERROR THEN

1214: Commit;
1215: END IF;
1216:
1217: EXCEPTION
1218: WHEN FND_API.G_EXC_ERROR THEN
1219: x_return_status := fnd_api.g_ret_sts_error;
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221: x_return_status := fnd_api.g_ret_sts_error;
1222: END create_cm_on_emd_deposit;

Line 1219: x_return_status := fnd_api.g_ret_sts_error;

1215: END IF;
1216:
1217: EXCEPTION
1218: WHEN FND_API.G_EXC_ERROR THEN
1219: x_return_status := fnd_api.g_ret_sts_error;
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221: x_return_status := fnd_api.g_ret_sts_error;
1222: END create_cm_on_emd_deposit;
1223:

Line 1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1216:
1217: EXCEPTION
1218: WHEN FND_API.G_EXC_ERROR THEN
1219: x_return_status := fnd_api.g_ret_sts_error;
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221: x_return_status := fnd_api.g_ret_sts_error;
1222: END create_cm_on_emd_deposit;
1223:
1224: -----------------------------------------------------------------------

Line 1221: x_return_status := fnd_api.g_ret_sts_error;

1217: EXCEPTION
1218: WHEN FND_API.G_EXC_ERROR THEN
1219: x_return_status := fnd_api.g_ret_sts_error;
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221: x_return_status := fnd_api.g_ret_sts_error;
1222: END create_cm_on_emd_deposit;
1223:
1224: -----------------------------------------------------------------------
1225: --Start of Comments

Line 1257: l_create_profile_amt VARCHAR2(1) := FND_API.G_TRUE;

1253: l_progress NUMBER;
1254: l_cust_account_rec hz_cust_account_v2pub.CUST_ACCOUNT_REC_TYPE;
1255: l_organization_rec HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE := HZ_PARTY_V2PUB.G_MISS_ORGANIZATION_REC;
1256: l_customer_profile_rec HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE;
1257: l_create_profile_amt VARCHAR2(1) := FND_API.G_TRUE;
1258: x_cust_account_id hz_cust_accounts.cust_account_id%TYPE;
1259: x_account_number hz_cust_accounts.account_number%TYPE;
1260: x_party_id hz_cust_accounts.party_id%TYPE;
1261: x_party_number hz_parties.party_number%TYPE;

Line 1271: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1267: BEGIN
1268:
1269: l_progress := 100;
1270: -- Standard call to check for call compatibility.
1271: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1272: l_api_name, l_api_name) THEN
1273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1274: END IF;
1275:

Line 1273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1269: l_progress := 100;
1270: -- Standard call to check for call compatibility.
1271: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1272: l_api_name, l_api_name) THEN
1273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1274: END IF;
1275:
1276: IF FND_API.to_Boolean(p_init_msg_list) THEN
1277: FND_MSG_PUB.initialize();

Line 1276: IF FND_API.to_Boolean(p_init_msg_list) THEN

1272: l_api_name, l_api_name) THEN
1273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1274: END IF;
1275:
1276: IF FND_API.to_Boolean(p_init_msg_list) THEN
1277: FND_MSG_PUB.initialize();
1278: END IF;
1279:
1280: x_return_status := fnd_api.g_ret_sts_success;

Line 1280: x_return_status := fnd_api.g_ret_sts_success;

1276: IF FND_API.to_Boolean(p_init_msg_list) THEN
1277: FND_MSG_PUB.initialize();
1278: END IF;
1279:
1280: x_return_status := fnd_api.g_ret_sts_success;
1281:
1282: -- Initializating the record types to pass to the API
1283:
1284: /* Initializing l_organization_rec.Since we are creating supplier organization as customer we are passing it's party_id

Line 1309: FND_API.G_FALSE,

1305: l_customer_profile_rec.standard_terms := p_in_rec.terms_id;
1306:
1307: --Call to HZ customer account creation API
1308: HZ_CUST_ACCOUNT_V2PUB.create_cust_account(
1309: FND_API.G_FALSE,
1310: l_cust_account_rec,
1311: l_organization_rec,
1312: l_customer_profile_rec,
1313: l_create_profile_amt,

Line 1324: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

1320: x_msg_count,
1321: x_msg_data);
1322:
1323:
1324: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
1325: FND_MESSAGE.SET_NAME('PON','CUST_ACC_CRE_FAILED');
1326: FND_MESSAGE.SET_TOKEN('SUPPLIER',p_in_rec.party_name);
1327: FND_MSG_PUB.ADD;
1328: RETURN;

Line 1331: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

1327: FND_MSG_PUB.ADD;
1328: RETURN;
1329: END IF;
1330:
1331: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
1332: x_out_rec.party_id := x_party_id;
1333: x_out_rec.party_number := x_party_number;
1334: x_out_rec.cust_account_id := x_cust_account_id;
1335: x_out_rec.account_number := x_account_number;

Line 1338: IF FND_API.To_Boolean( p_commit ) THEN

1334: x_out_rec.cust_account_id := x_cust_account_id;
1335: x_out_rec.account_number := x_account_number;
1336: END IF;
1337:
1338: IF FND_API.To_Boolean( p_commit ) THEN
1339: Commit;
1340: END IF;
1341:
1342: EXCEPTION

Line 1343: WHEN FND_API.G_EXC_ERROR THEN

1339: Commit;
1340: END IF;
1341:
1342: EXCEPTION
1343: WHEN FND_API.G_EXC_ERROR THEN
1344: x_return_status := fnd_api.g_ret_sts_error;
1345:
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := fnd_api.g_ret_sts_error;

Line 1344: x_return_status := fnd_api.g_ret_sts_error;

1340: END IF;
1341:
1342: EXCEPTION
1343: WHEN FND_API.G_EXC_ERROR THEN
1344: x_return_status := fnd_api.g_ret_sts_error;
1345:
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := fnd_api.g_ret_sts_error;
1348: END create_cust_account;

Line 1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1342: EXCEPTION
1343: WHEN FND_API.G_EXC_ERROR THEN
1344: x_return_status := fnd_api.g_ret_sts_error;
1345:
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := fnd_api.g_ret_sts_error;
1348: END create_cust_account;
1349:
1350:

Line 1347: x_return_status := fnd_api.g_ret_sts_error;

1343: WHEN FND_API.G_EXC_ERROR THEN
1344: x_return_status := fnd_api.g_ret_sts_error;
1345:
1346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1347: x_return_status := fnd_api.g_ret_sts_error;
1348: END create_cust_account;
1349:
1350:
1351: -----------------------------------------------------------------------

Line 1386: l_create_profile VARCHAR2(1) := FND_API.G_TRUE;

1382: l_cust_acct_site_rec hz_cust_account_site_v2pub.CUST_ACCT_SITE_REC_TYPE;
1383: x_cust_acct_site_id HZ_CUST_ACCT_SITES.cust_acct_site_id%TYPE;
1384: l_cust_site_use_rec hz_cust_account_site_v2pub.CUST_SITE_USE_REC_TYPE;
1385: l_customer_profile_rec HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE;
1386: l_create_profile VARCHAR2(1) := FND_API.G_TRUE;
1387: l_create_profile_amt VARCHAR2(1) := FND_API.G_TRUE;
1388: x_site_use_id HZ_CUST_SITE_USES.site_use_id%TYPE;
1389: x_site_return_status VARCHAR2(1);
1390: x_msg_data VARCHAR2(1000);

Line 1387: l_create_profile_amt VARCHAR2(1) := FND_API.G_TRUE;

1383: x_cust_acct_site_id HZ_CUST_ACCT_SITES.cust_acct_site_id%TYPE;
1384: l_cust_site_use_rec hz_cust_account_site_v2pub.CUST_SITE_USE_REC_TYPE;
1385: l_customer_profile_rec HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE;
1386: l_create_profile VARCHAR2(1) := FND_API.G_TRUE;
1387: l_create_profile_amt VARCHAR2(1) := FND_API.G_TRUE;
1388: x_site_use_id HZ_CUST_SITE_USES.site_use_id%TYPE;
1389: x_site_return_status VARCHAR2(1);
1390: x_msg_data VARCHAR2(1000);
1391: x_msg_count NUMBER;

Line 1396: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1392: BEGIN
1393:
1394: l_progress := 100;
1395: -- Standard call to check for call compatibility.
1396: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1397: l_api_name, l_api_name) THEN
1398: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1399: END IF;
1400:

Line 1398: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1394: l_progress := 100;
1395: -- Standard call to check for call compatibility.
1396: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1397: l_api_name, l_api_name) THEN
1398: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1399: END IF;
1400:
1401: IF FND_API.to_Boolean(p_init_msg_list) THEN
1402: FND_MSG_PUB.initialize();

Line 1401: IF FND_API.to_Boolean(p_init_msg_list) THEN

1397: l_api_name, l_api_name) THEN
1398: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1399: END IF;
1400:
1401: IF FND_API.to_Boolean(p_init_msg_list) THEN
1402: FND_MSG_PUB.initialize();
1403: END IF;
1404:
1405: /* Initializing l_cust_account_site_rec */

Line 1415: FND_API.G_FALSE,

1411: l_cust_acct_site_rec.application_id := 222;
1412:
1413: --Call to HZ customer account site creation API
1414: hz_cust_account_site_v2pub.create_cust_acct_site (
1415: FND_API.G_FALSE,
1416: l_cust_acct_site_rec,
1417: x_cust_acct_site_id,
1418: x_site_return_status,
1419: x_msg_count,

Line 1422: IF (x_site_return_status = fnd_api.g_ret_sts_error) THEN

1418: x_site_return_status,
1419: x_msg_count,
1420: x_msg_data);
1421:
1422: IF (x_site_return_status = fnd_api.g_ret_sts_error) THEN
1423: x_return_status := fnd_api.g_ret_sts_error;
1424: FND_MESSAGE.SET_NAME('PON','CUST_ACC_SITE_CRE_FAILED');
1425: FND_MESSAGE.SET_TOKEN('SUPPLIER',p_in_rec.party_name);
1426: FND_MSG_PUB.ADD;

Line 1423: x_return_status := fnd_api.g_ret_sts_error;

1419: x_msg_count,
1420: x_msg_data);
1421:
1422: IF (x_site_return_status = fnd_api.g_ret_sts_error) THEN
1423: x_return_status := fnd_api.g_ret_sts_error;
1424: FND_MESSAGE.SET_NAME('PON','CUST_ACC_SITE_CRE_FAILED');
1425: FND_MESSAGE.SET_TOKEN('SUPPLIER',p_in_rec.party_name);
1426: FND_MSG_PUB.ADD;
1427: RETURN;

Line 1431: IF (x_site_return_status = fnd_api.g_ret_sts_success) THEN

1427: RETURN;
1428: END IF;
1429:
1430:
1431: IF (x_site_return_status = fnd_api.g_ret_sts_success) THEN
1432: x_msg_count := 0;
1433: x_msg_data := NULL;
1434: /* Initializing l_cust_account_site_rec,l_customer_profile_rec */
1435: l_cust_site_use_rec.cust_acct_site_id := x_cust_acct_site_id;

Line 1448: FND_API.G_FALSE,

1444: l_customer_profile_rec.standard_terms := p_in_rec.terms_id;
1445:
1446: --Call to HZ customer account site use creation API
1447: hz_cust_account_site_v2pub.create_cust_site_use (
1448: FND_API.G_FALSE,
1449: l_cust_site_use_rec,
1450: l_customer_profile_rec,
1451: l_create_profile,
1452: l_create_profile_amt,

Line 1458: IF (x_site_return_status = fnd_api.g_ret_sts_error) THEN

1454: x_return_status,
1455: x_msg_count,
1456: x_msg_data);
1457:
1458: IF (x_site_return_status = fnd_api.g_ret_sts_error) THEN
1459: x_return_status := fnd_api.g_ret_sts_error;
1460: FND_MESSAGE.SET_NAME('PON','CUST_ACC_SITE_USG_CRE_FAILED');
1461: FND_MESSAGE.SET_TOKEN('SUPPLIER',p_in_rec.party_name);
1462: FND_MSG_PUB.ADD;

Line 1459: x_return_status := fnd_api.g_ret_sts_error;

1455: x_msg_count,
1456: x_msg_data);
1457:
1458: IF (x_site_return_status = fnd_api.g_ret_sts_error) THEN
1459: x_return_status := fnd_api.g_ret_sts_error;
1460: FND_MESSAGE.SET_NAME('PON','CUST_ACC_SITE_USG_CRE_FAILED');
1461: FND_MESSAGE.SET_TOKEN('SUPPLIER',p_in_rec.party_name);
1462: FND_MSG_PUB.ADD;
1463: RETURN;

Line 1466: IF (x_return_status = fnd_api.g_ret_sts_success) THEN

1462: FND_MSG_PUB.ADD;
1463: RETURN;
1464: END IF;
1465:
1466: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
1467: x_out_rec.cust_acct_site_id :=x_cust_acct_site_id;
1468: x_out_rec.site_use_id := x_site_use_id;
1469: END IF;
1470: END IF;

Line 1472: IF FND_API.To_Boolean( p_commit ) THEN

1468: x_out_rec.site_use_id := x_site_use_id;
1469: END IF;
1470: END IF;
1471:
1472: IF FND_API.To_Boolean( p_commit ) THEN
1473: Commit;
1474: END IF;
1475:
1476: EXCEPTION

Line 1477: WHEN FND_API.G_EXC_ERROR THEN

1473: Commit;
1474: END IF;
1475:
1476: EXCEPTION
1477: WHEN FND_API.G_EXC_ERROR THEN
1478: x_return_status := fnd_api.g_ret_sts_error;
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: x_return_status := fnd_api.g_ret_sts_error;
1481: END create_cust_acc_site_and_usage;

Line 1478: x_return_status := fnd_api.g_ret_sts_error;

1474: END IF;
1475:
1476: EXCEPTION
1477: WHEN FND_API.G_EXC_ERROR THEN
1478: x_return_status := fnd_api.g_ret_sts_error;
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: x_return_status := fnd_api.g_ret_sts_error;
1481: END create_cust_acc_site_and_usage;
1482:

Line 1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1475:
1476: EXCEPTION
1477: WHEN FND_API.G_EXC_ERROR THEN
1478: x_return_status := fnd_api.g_ret_sts_error;
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: x_return_status := fnd_api.g_ret_sts_error;
1481: END create_cust_acc_site_and_usage;
1482:
1483:

Line 1480: x_return_status := fnd_api.g_ret_sts_error;

1476: EXCEPTION
1477: WHEN FND_API.G_EXC_ERROR THEN
1478: x_return_status := fnd_api.g_ret_sts_error;
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: x_return_status := fnd_api.g_ret_sts_error;
1481: END create_cust_acc_site_and_usage;
1482:
1483:
1484: -----------------------------------------------------------------------

Line 1561: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1557: print_log('Before checking API compatibility');
1558:
1559: x_process_complete := 'FALSE';
1560:
1561: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1562: l_api_name, g_pkg_name) THEN
1563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1564: END IF;
1565:

Line 1563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1559: x_process_complete := 'FALSE';
1560:
1561: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1562: l_api_name, g_pkg_name) THEN
1563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1564: END IF;
1565:
1566: print_log('After checking API compatibility');
1567: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1567: x_return_status := FND_API.G_RET_STS_SUCCESS;

1563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1564: END IF;
1565:
1566: print_log('After checking API compatibility');
1567: x_return_status := FND_API.G_RET_STS_SUCCESS;
1568:
1569: print_log('before executing mo_global');
1570: MO_GLOBAL.init('AR');
1571: print_log('after executing mo_global');

Line 1600: x_return_status := FND_API.G_RET_STS_SUCCESS;

1596:
1597: FND_MSG_PUB.initialize();
1598:
1599: SAVEPOINT pon_emd_deposit_transaction;
1600: x_return_status := FND_API.G_RET_STS_SUCCESS;
1601: print_log('Started emd deposit transaction Processing of emd transaction id:
1602: '||l_emd_transactions_info.emd_transaction_id);
1603:
1604: l_progress := 100;

Line 1614: x_return_status := FND_API.G_RET_STS_ERROR;

1610: ar_mo_cache_utils.set_org_context_in_api(p_org_id =>l_org_id,
1611: p_return_status =>l_org_return_status);
1612: EXCEPTION
1613: WHEN OTHERS THEN
1614: x_return_status := FND_API.G_RET_STS_ERROR;
1615: FND_MESSAGE.SET_NAME('PON','ORG_CONTEXT_CANNOT_SET');
1616: FND_MESSAGE.SET_TOKEN('ORG_ID',To_Char(l_org_id));
1617: FND_MSG_PUB.ADD;
1618: RAISE SETUP_EXCEPTION;

Line 1626: x_return_status := FND_API.G_RET_STS_ERROR;

1622: BEGIN
1623: verify_finance_installation(x_return_status);
1624: EXCEPTION
1625: WHEN OTHERS THEN
1626: x_return_status := FND_API.G_RET_STS_ERROR;
1627: END;
1628: print_log('After procedure verify_finance_installation');
1629: print_log('x_return_status: '||x_return_status);
1630:

Line 1631: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1627: END;
1628: print_log('After procedure verify_finance_installation');
1629: print_log('x_return_status: '||x_return_status);
1630:
1631: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1632: RAISE SETUP_EXCEPTION;
1633: END IF;
1634:
1635: l_progress := 120;

Line 1641: x_return_status := FND_API.G_RET_STS_ERROR;

1637: FETCH pon_emd_fin_parameters INTO l_pon_emd_fin_parameters;
1638: l_found := pon_emd_fin_parameters%FOUND;
1639: IF NOT l_found THEN
1640: CLOSE pon_emd_fin_parameters;
1641: x_return_status := FND_API.G_RET_STS_ERROR;
1642: FND_MESSAGE.SET_NAME('PON','PON_EMD_FIN_PARAMS_NOT_SETUP');
1643: FND_MSG_PUB.ADD;
1644: RAISE SETUP_EXCEPTION;
1645: ELSE

Line 1666: x_return_status := FND_API.G_RET_STS_ERROR;

1662: x_return_status);
1663: EXCEPTION
1664: WHEN OTHERS THEN
1665: print_log('Other Exception in validate_pon_emd_fin');
1666: x_return_status := FND_API.G_RET_STS_ERROR;
1667: END;
1668: print_log('After executing procedure validate_pon_emd_fin');
1669: print_log('x_return_status: '||x_return_status);
1670:

Line 1671: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1667: END;
1668: print_log('After executing procedure validate_pon_emd_fin');
1669: print_log('x_return_status: '||x_return_status);
1670:
1671: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1672: RAISE SETUP_EXCEPTION;
1673: END IF;
1674:
1675: l_progress := 140;

Line 1684: x_return_status := FND_API.G_RET_STS_ERROR;

1680: IF l_found THEN
1681: CLOSE payment_type_info;
1682: ELSE
1683: CLOSE payment_type_info;
1684: x_return_status := FND_API.G_RET_STS_ERROR;
1685: FND_MESSAGE.SET_NAME('PON','EMD_PAYMENT_TYPE_NOT_SETUP');
1686: FND_MESSAGE.SET_TOKEN('PTYPE_CODE',l_emd_transactions_info.payment_type_code);
1687: FND_MSG_PUB.ADD;
1688: RAISE SETUP_EXCEPTION;

Line 1703: x_return_status := FND_API.G_RET_STS_ERROR;

1699: l_emd_transactions_info.org_id,
1700: x_return_status);
1701: EXCEPTION
1702: WHEN No_Data_Found THEN
1703: x_return_status := FND_API.G_RET_STS_ERROR;
1704: WHEN OTHERS THEN
1705: x_return_status := FND_API.G_RET_STS_ERROR;
1706: END;
1707: print_log('After executing procedure validate_trx_payment_type_info');

Line 1705: x_return_status := FND_API.G_RET_STS_ERROR;

1701: EXCEPTION
1702: WHEN No_Data_Found THEN
1703: x_return_status := FND_API.G_RET_STS_ERROR;
1704: WHEN OTHERS THEN
1705: x_return_status := FND_API.G_RET_STS_ERROR;
1706: END;
1707: print_log('After executing procedure validate_trx_payment_type_info');
1708: print_log('x_return_status: '||x_return_status);
1709:

Line 1710: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1706: END;
1707: print_log('After executing procedure validate_trx_payment_type_info');
1708: print_log('x_return_status: '||x_return_status);
1709:
1710: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1711: RAISE SETUP_EXCEPTION;
1712: END IF;
1713:
1714: l_progress := 160;

Line 1721: x_return_status := FND_API.G_RET_STS_ERROR;

1717: G_EMD_DEPOSIT,
1718: x_return_status);
1719: EXCEPTION
1720: WHEN No_Data_Found THEN
1721: x_return_status := FND_API.G_RET_STS_ERROR;
1722: WHEN OTHERS THEN
1723: x_return_status := FND_API.G_RET_STS_ERROR;
1724: END;
1725:

Line 1723: x_return_status := FND_API.G_RET_STS_ERROR;

1719: EXCEPTION
1720: WHEN No_Data_Found THEN
1721: x_return_status := FND_API.G_RET_STS_ERROR;
1722: WHEN OTHERS THEN
1723: x_return_status := FND_API.G_RET_STS_ERROR;
1724: END;
1725:
1726: print_log('After executing procedure validate_trx_info');
1727: print_log('x_return_status: '||x_return_status);

Line 1729: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1725:
1726: print_log('After executing procedure validate_trx_info');
1727: print_log('x_return_status: '||x_return_status);
1728:
1729: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1730: RAISE TRANSACTION_EXCEPTION;
1731: END IF;
1732:
1733: l_progress := 170;

Line 1766: x_return_status := FND_API.G_RET_STS_ERROR;

1762: END IF;
1763:
1764: EXCEPTION
1765: WHEN No_Data_Found THEN
1766: x_return_status := FND_API.G_RET_STS_ERROR;
1767: WHEN OTHERS THEN
1768: x_return_status := FND_API.G_RET_STS_ERROR;
1769: END;
1770: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 1768: x_return_status := FND_API.G_RET_STS_ERROR;

1764: EXCEPTION
1765: WHEN No_Data_Found THEN
1766: x_return_status := FND_API.G_RET_STS_ERROR;
1767: WHEN OTHERS THEN
1768: x_return_status := FND_API.G_RET_STS_ERROR;
1769: END;
1770: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1771: RAISE TRANSACTION_EXCEPTION;
1772: END IF;

Line 1770: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1766: x_return_status := FND_API.G_RET_STS_ERROR;
1767: WHEN OTHERS THEN
1768: x_return_status := FND_API.G_RET_STS_ERROR;
1769: END;
1770: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1771: RAISE TRANSACTION_EXCEPTION;
1772: END IF;
1773:
1774: /*

Line 1806: x_return_status := FND_API.G_RET_STS_ERROR;

1802: RAISE TRANSACTION_EXCEPTION;
1803: END IF;
1804: EXCEPTION
1805: WHEN No_Data_Found THEN
1806: x_return_status := FND_API.G_RET_STS_ERROR;
1807: WHEN OTHERS THEN
1808: x_return_status := FND_API.G_RET_STS_ERROR;
1809: END;
1810: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 1808: x_return_status := FND_API.G_RET_STS_ERROR;

1804: EXCEPTION
1805: WHEN No_Data_Found THEN
1806: x_return_status := FND_API.G_RET_STS_ERROR;
1807: WHEN OTHERS THEN
1808: x_return_status := FND_API.G_RET_STS_ERROR;
1809: END;
1810: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1811: RAISE TRANSACTION_EXCEPTION;
1812: END IF;

Line 1810: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1806: x_return_status := FND_API.G_RET_STS_ERROR;
1807: WHEN OTHERS THEN
1808: x_return_status := FND_API.G_RET_STS_ERROR;
1809: END;
1810: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1811: RAISE TRANSACTION_EXCEPTION;
1812: END IF;
1813:
1814: ELSIF (l_emd_transactions_info.PAYMENT_TYPE_CODE = G_CREDIT_CARD) THEN

Line 1842: x_return_status := FND_API.G_RET_STS_ERROR;

1838: RAISE TRANSACTION_EXCEPTION;
1839: END IF;
1840: EXCEPTION
1841: WHEN No_Data_Found THEN
1842: x_return_status := FND_API.G_RET_STS_ERROR;
1843: WHEN OTHERS THEN
1844: x_return_status := FND_API.G_RET_STS_ERROR;
1845: END;
1846: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 1844: x_return_status := FND_API.G_RET_STS_ERROR;

1840: EXCEPTION
1841: WHEN No_Data_Found THEN
1842: x_return_status := FND_API.G_RET_STS_ERROR;
1843: WHEN OTHERS THEN
1844: x_return_status := FND_API.G_RET_STS_ERROR;
1845: END;
1846: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1847: RAISE TRANSACTION_EXCEPTION;
1848: END IF;

Line 1846: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1842: x_return_status := FND_API.G_RET_STS_ERROR;
1843: WHEN OTHERS THEN
1844: x_return_status := FND_API.G_RET_STS_ERROR;
1845: END;
1846: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1847: RAISE TRANSACTION_EXCEPTION;
1848: END IF;
1849: END IF;
1850: */

Line 1932: FND_API.G_FALSE,

1928: l_trxn_attribs_rec.Trxn_Ref_Number1 := l_emd_transactions_info.vendor_site_id;
1929:
1930: BEGIN
1931: IBY_FNDCPT_TRXN_PUB.CREATE_TRANSACTION_EXTENSION(1.0,
1932: FND_API.G_FALSE,
1933: FND_API.G_FALSE,
1934: x_return_status,
1935: x_msg_count,
1936: x_msg_data,

Line 1933: FND_API.G_FALSE,

1929:
1930: BEGIN
1931: IBY_FNDCPT_TRXN_PUB.CREATE_TRANSACTION_EXTENSION(1.0,
1932: FND_API.G_FALSE,
1933: FND_API.G_FALSE,
1934: x_return_status,
1935: x_msg_count,
1936: x_msg_data,
1937: l_payer_rec,

Line 1955: x_return_status := FND_API.G_RET_STS_ERROR;

1951: END IF;
1952:
1953: EXCEPTION
1954: WHEN No_Data_Found THEN
1955: x_return_status := FND_API.G_RET_STS_ERROR;
1956: WHEN OTHERS THEN
1957: x_return_status := FND_API.G_RET_STS_ERROR;
1958: END;
1959: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 1957: x_return_status := FND_API.G_RET_STS_ERROR;

1953: EXCEPTION
1954: WHEN No_Data_Found THEN
1955: x_return_status := FND_API.G_RET_STS_ERROR;
1956: WHEN OTHERS THEN
1957: x_return_status := FND_API.G_RET_STS_ERROR;
1958: END;
1959: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1960: RAISE TRANSACTION_EXCEPTION;
1961: END IF;

Line 1959: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1955: x_return_status := FND_API.G_RET_STS_ERROR;
1956: WHEN OTHERS THEN
1957: x_return_status := FND_API.G_RET_STS_ERROR;
1958: END;
1959: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1960: RAISE TRANSACTION_EXCEPTION;
1961: END IF;
1962:
1963: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

Line 1963: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

1959: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1960: RAISE TRANSACTION_EXCEPTION;
1961: END IF;
1962:
1963: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND
1964: (x_response.result_code = IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS)) THEN
1965: l_deposit_in_record.payment_trxn_extension_id := x_payment_trxn_extension_id;
1966: END IF;
1967:

Line 1974: FND_API.G_FALSE,

1970:
1971: l_progress := 210;
1972: BEGIN
1973: create_emd_deposit(1.0,
1974: FND_API.G_FALSE,
1975: FND_API.G_FALSE,
1976: x_return_status,
1977: l_deposit_in_record,
1978: l_deposit_out_record);

Line 1975: FND_API.G_FALSE,

1971: l_progress := 210;
1972: BEGIN
1973: create_emd_deposit(1.0,
1974: FND_API.G_FALSE,
1975: FND_API.G_FALSE,
1976: x_return_status,
1977: l_deposit_in_record,
1978: l_deposit_out_record);
1979:

Line 1985: x_return_status := FND_API.G_RET_STS_ERROR;

1981: RAISE TRANSACTION_EXCEPTION;
1982: END IF;
1983: EXCEPTION
1984: WHEN No_Data_Found THEN
1985: x_return_status := FND_API.G_RET_STS_ERROR;
1986: WHEN OTHERS THEN
1987: x_return_status := FND_API.G_RET_STS_ERROR;
1988: END;
1989: print_log('After Executing create_emd_deposit procedure');

Line 1987: x_return_status := FND_API.G_RET_STS_ERROR;

1983: EXCEPTION
1984: WHEN No_Data_Found THEN
1985: x_return_status := FND_API.G_RET_STS_ERROR;
1986: WHEN OTHERS THEN
1987: x_return_status := FND_API.G_RET_STS_ERROR;
1988: END;
1989: print_log('After Executing create_emd_deposit procedure');
1990: print_log('x_return_status: '||x_return_status);
1991:

Line 1992: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1988: END;
1989: print_log('After Executing create_emd_deposit procedure');
1990: print_log('x_return_status: '||x_return_status);
1991:
1992: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1993: RAISE TRANSACTION_EXCEPTION;
1994: END IF;
1995:
1996: l_progress := 220;

Line 1997: IF (x_return_status =FND_API.G_RET_STS_SUCCESS AND

1993: RAISE TRANSACTION_EXCEPTION;
1994: END IF;
1995:
1996: l_progress := 220;
1997: IF (x_return_status =FND_API.G_RET_STS_SUCCESS AND
1998: l_deposit_out_record.deposit_trx_number IS NOT NULL AND
1999: l_deposit_out_record.deposit_trx_id IS NOT NULL) THEN
2000:
2001: -- updating results in pon_emd_transactions

Line 2015: x_return_status := FND_API.G_RET_STS_ERROR;

2011: END IF;
2012: EXCEPTION
2013: WHEN No_Data_Found THEN
2014: print_log('inside no data found exception');
2015: x_return_status := FND_API.G_RET_STS_ERROR;
2016: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2017: p_count => x_msg_count,
2018: p_data => x_msg_data);
2019: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2016: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2012: EXCEPTION
2013: WHEN No_Data_Found THEN
2014: print_log('inside no data found exception');
2015: x_return_status := FND_API.G_RET_STS_ERROR;
2016: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2017: p_count => x_msg_count,
2018: p_data => x_msg_data);
2019: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2020: l_searched := fnd_msg_pub.delete_msg;

Line 2027: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2023: l_count := x_msg_count;
2024: x_msg_data := NULL;
2025: LOOP
2026: IF nvl(l_count, 0) > 0 THEN
2027: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2028: x_msg_data := x_msg_data ||' '|| l_msg_data;
2029: l_count := nvl(l_count, 0) - 1;
2030: ELSE
2031: EXIT;

Line 2041: x_return_status := FND_API.G_RET_STS_ERROR;

2037: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
2038: x_msg_data);
2039: WHEN TRANSACTION_EXCEPTION THEN
2040: print_log('inside trx exception');
2041: x_return_status := FND_API.G_RET_STS_ERROR;
2042: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2043: p_count => x_msg_count,
2044: p_data => x_msg_data);
2045: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2042: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2038: x_msg_data);
2039: WHEN TRANSACTION_EXCEPTION THEN
2040: print_log('inside trx exception');
2041: x_return_status := FND_API.G_RET_STS_ERROR;
2042: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2043: p_count => x_msg_count,
2044: p_data => x_msg_data);
2045: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2046: l_searched := fnd_msg_pub.delete_msg;

Line 2053: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2049: l_count := x_msg_count;
2050: x_msg_data := NULL;
2051: LOOP
2052: IF nvl(l_count, 0) > 0 THEN
2053: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2054: x_msg_data := x_msg_data ||' '|| l_msg_data;
2055: l_count := nvl(l_count, 0) - 1;
2056: ELSE
2057: EXIT;

Line 2069: x_return_status := FND_API.G_RET_STS_ERROR;

2065: x_msg_data);
2066:
2067: WHEN SETUP_EXCEPTION THEN
2068: print_log('inside setup exception');
2069: x_return_status := FND_API.G_RET_STS_ERROR;
2070: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2071: p_count => x_msg_count,
2072: p_data => x_msg_data);
2073: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2070: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2066:
2067: WHEN SETUP_EXCEPTION THEN
2068: print_log('inside setup exception');
2069: x_return_status := FND_API.G_RET_STS_ERROR;
2070: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2071: p_count => x_msg_count,
2072: p_data => x_msg_data);
2073: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2074: l_searched := fnd_msg_pub.delete_msg;

Line 2081: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2077: l_count := x_msg_count;
2078: x_msg_data := NULL;
2079: LOOP
2080: IF nvl(l_count, 0) > 0 THEN
2081: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2082: x_msg_data := x_msg_data ||' '|| l_msg_data;
2083: l_count := nvl(l_count, 0) - 1;
2084: ELSE
2085: EXIT;

Line 2095: x_return_status := FND_API.G_RET_STS_ERROR;

2091: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
2092: x_msg_data);
2093: WHEN OTHERS THEN
2094: print_log('inside others exception');
2095: x_return_status := FND_API.G_RET_STS_ERROR;
2096: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2097: p_count => x_msg_count,
2098: p_data => x_msg_data);
2099: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2096: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2092: x_msg_data);
2093: WHEN OTHERS THEN
2094: print_log('inside others exception');
2095: x_return_status := FND_API.G_RET_STS_ERROR;
2096: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2097: p_count => x_msg_count,
2098: p_data => x_msg_data);
2099: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2100: l_searched := fnd_msg_pub.delete_msg;

Line 2107: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2103: l_count := x_msg_count;
2104: x_msg_data := NULL;
2105: LOOP
2106: IF nvl(l_count, 0) > 0 THEN
2107: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2108: x_msg_data := x_msg_data ||' '|| l_msg_data;
2109: l_count := nvl(l_count, 0) - 1;
2110: ELSE
2111: EXIT;

Line 2210: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

2206: BEGIN
2207:
2208: print_log('Before checking API compatibility');
2209:
2210: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
2211: l_api_name, g_pkg_name) THEN
2212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2213: END IF;
2214:

Line 2212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2208: print_log('Before checking API compatibility');
2209:
2210: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
2211: l_api_name, g_pkg_name) THEN
2212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2213: END IF;
2214:
2215: print_log('After checking API compatibility');
2216:

Line 2217: x_return_status := FND_API.G_RET_STS_SUCCESS;

2213: END IF;
2214:
2215: print_log('After checking API compatibility');
2216:
2217: x_return_status := FND_API.G_RET_STS_SUCCESS;
2218:
2219: print_log('before executing mo_global');
2220: MO_GLOBAL.init('AR');
2221: print_log('after executing mo_global');

Line 2252: x_return_status := FND_API.G_RET_STS_SUCCESS;

2248: FND_MSG_PUB.initialize();
2249:
2250: SAVEPOINT pon_emd_refund_transaction;
2251:
2252: x_return_status := FND_API.G_RET_STS_SUCCESS;
2253: print_log('Started emd refund transaction Processing of emd transaction id:
2254: '||l_emd_transactions_info.emd_transaction_id);
2255:
2256: l_progress := 100;

Line 2265: x_return_status := FND_API.G_RET_STS_ERROR;

2261: ar_mo_cache_utils.set_org_context_in_api(p_org_id =>l_org_id,
2262: p_return_status =>l_org_return_status);
2263: EXCEPTION
2264: WHEN OTHERS THEN
2265: x_return_status := FND_API.G_RET_STS_ERROR;
2266: FND_MESSAGE.SET_NAME('PON','ORG_CONTEXT_CANNOT_SET');
2267: FND_MESSAGE.SET_TOKEN('ORG_ID',To_Char(l_org_id));
2268: FND_MSG_PUB.ADD;
2269: RAISE SETUP_EXCEPTION;

Line 2277: x_return_status := FND_API.G_RET_STS_ERROR;

2273: BEGIN
2274: verify_finance_installation(x_return_status);
2275: EXCEPTION
2276: WHEN OTHERS THEN
2277: x_return_status := FND_API.G_RET_STS_ERROR;
2278: END;
2279: print_log('After procedure verify_finance_installation');
2280: print_log('x_return_status: '||x_return_status);
2281:

Line 2282: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2278: END;
2279: print_log('After procedure verify_finance_installation');
2280: print_log('x_return_status: '||x_return_status);
2281:
2282: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2283: RAISE SETUP_EXCEPTION;
2284: END IF;
2285:
2286: l_progress := 120;

Line 2292: x_return_status := FND_API.G_RET_STS_ERROR;

2288: FETCH pon_emd_fin_parameters INTO l_pon_emd_fin_parameters;
2289: l_found := pon_emd_fin_parameters%FOUND;
2290: IF NOT l_found THEN
2291: CLOSE pon_emd_fin_parameters;
2292: x_return_status := FND_API.G_RET_STS_ERROR;
2293: FND_MESSAGE.SET_NAME('PON','PON_EMD_FIN_PARAMS_NOT_SETUP');
2294: FND_MSG_PUB.ADD;
2295: RAISE SETUP_EXCEPTION;
2296: ELSE

Line 2319: x_return_status := FND_API.G_RET_STS_ERROR;

2315: print_log('validate_pon_emd_fin x_return_status: '||x_return_status);
2316: EXCEPTION
2317: WHEN OTHERS THEN
2318: print_log('validate_pon_emd_fin Exception');
2319: x_return_status := FND_API.G_RET_STS_ERROR;
2320: END;
2321: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2322: RAISE SETUP_EXCEPTION;
2323: END IF;

Line 2321: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2317: WHEN OTHERS THEN
2318: print_log('validate_pon_emd_fin Exception');
2319: x_return_status := FND_API.G_RET_STS_ERROR;
2320: END;
2321: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2322: RAISE SETUP_EXCEPTION;
2323: END IF;
2324:
2325: l_progress := 140;

Line 2355: x_return_status := fnd_api.g_ret_sts_error;

2351: print_log('l_deposit_payment_type_code: '||l_deposit_payment_type_code);
2352: print_log('l_org_id: '||l_org_id);
2353:
2354: IF (l_parent_trx_id IS NULL) THEN
2355: x_return_status := fnd_api.g_ret_sts_error;
2356: RAISE TRANSACTION_EXCEPTION;
2357: END IF;
2358: EXCEPTION
2359: WHEN No_Data_Found THEN

Line 2360: x_return_status := FND_API.G_RET_STS_ERROR;

2356: RAISE TRANSACTION_EXCEPTION;
2357: END IF;
2358: EXCEPTION
2359: WHEN No_Data_Found THEN
2360: x_return_status := FND_API.G_RET_STS_ERROR;
2361: WHEN OTHERS THEN
2362: x_return_status := FND_API.G_RET_STS_ERROR;
2363: END;
2364: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 2362: x_return_status := FND_API.G_RET_STS_ERROR;

2358: EXCEPTION
2359: WHEN No_Data_Found THEN
2360: x_return_status := FND_API.G_RET_STS_ERROR;
2361: WHEN OTHERS THEN
2362: x_return_status := FND_API.G_RET_STS_ERROR;
2363: END;
2364: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2365: RAISE TRANSACTION_EXCEPTION;
2366: END IF;

Line 2364: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2360: x_return_status := FND_API.G_RET_STS_ERROR;
2361: WHEN OTHERS THEN
2362: x_return_status := FND_API.G_RET_STS_ERROR;
2363: END;
2364: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2365: RAISE TRANSACTION_EXCEPTION;
2366: END IF;
2367: END IF;
2368:

Line 2378: x_return_status := FND_API.G_RET_STS_ERROR;

2374: IF l_found THEN
2375: CLOSE payment_type_info;
2376: ELSE
2377: CLOSE payment_type_info;
2378: x_return_status := FND_API.G_RET_STS_ERROR;
2379: FND_MESSAGE.SET_NAME('PON','EMD_PAYMENT_TYPE_NOT_SETUP');
2380: FND_MESSAGE.SET_TOKEN('PTYPE_CODE',l_deposit_payment_type_code);
2381: FND_MSG_PUB.ADD;
2382: RAISE SETUP_EXCEPTION;

Line 2397: x_return_status := FND_API.G_RET_STS_ERROR;

2393: l_emd_transactions_info.org_id,
2394: x_return_status);
2395: EXCEPTION
2396: WHEN No_Data_Found THEN
2397: x_return_status := FND_API.G_RET_STS_ERROR;
2398: WHEN OTHERS THEN
2399: x_return_status := FND_API.G_RET_STS_ERROR;
2400: END;
2401: print_log('After executing procedure validate_trx_payment_type_info');

Line 2399: x_return_status := FND_API.G_RET_STS_ERROR;

2395: EXCEPTION
2396: WHEN No_Data_Found THEN
2397: x_return_status := FND_API.G_RET_STS_ERROR;
2398: WHEN OTHERS THEN
2399: x_return_status := FND_API.G_RET_STS_ERROR;
2400: END;
2401: print_log('After executing procedure validate_trx_payment_type_info');
2402: print_log('x_return_status: '||x_return_status);
2403:

Line 2404: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2400: END;
2401: print_log('After executing procedure validate_trx_payment_type_info');
2402: print_log('x_return_status: '||x_return_status);
2403:
2404: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2405: RAISE SETUP_EXCEPTION;
2406: END IF;
2407:
2408: l_progress := 170;

Line 2415: x_return_status := FND_API.G_RET_STS_ERROR;

2411: G_EMD_REFUND,
2412: x_return_status);
2413: EXCEPTION
2414: WHEN No_Data_Found THEN
2415: x_return_status := FND_API.G_RET_STS_ERROR;
2416: WHEN OTHERS THEN
2417: x_return_status := FND_API.G_RET_STS_ERROR;
2418: END;
2419:

Line 2417: x_return_status := FND_API.G_RET_STS_ERROR;

2413: EXCEPTION
2414: WHEN No_Data_Found THEN
2415: x_return_status := FND_API.G_RET_STS_ERROR;
2416: WHEN OTHERS THEN
2417: x_return_status := FND_API.G_RET_STS_ERROR;
2418: END;
2419:
2420: print_log('After executing procedure validate_trx_info');
2421: print_log('x_return_status: '||x_return_status);

Line 2423: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2419:
2420: print_log('After executing procedure validate_trx_info');
2421: print_log('x_return_status: '||x_return_status);
2422:
2423: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2424: RAISE TRANSACTION_EXCEPTION;
2425: END IF;
2426:
2427: l_progress := 180;

Line 2459: x_return_status := FND_API.G_RET_STS_ERROR;

2455: RAISE TRANSACTION_EXCEPTION;
2456: END IF;
2457: EXCEPTION
2458: WHEN No_Data_Found THEN
2459: x_return_status := FND_API.G_RET_STS_ERROR;
2460: WHEN OTHERS THEN
2461: x_return_status := FND_API.G_RET_STS_ERROR;
2462: END;
2463: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 2461: x_return_status := FND_API.G_RET_STS_ERROR;

2457: EXCEPTION
2458: WHEN No_Data_Found THEN
2459: x_return_status := FND_API.G_RET_STS_ERROR;
2460: WHEN OTHERS THEN
2461: x_return_status := FND_API.G_RET_STS_ERROR;
2462: END;
2463: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2464: RAISE TRANSACTION_EXCEPTION;
2465: END IF;

Line 2463: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2459: x_return_status := FND_API.G_RET_STS_ERROR;
2460: WHEN OTHERS THEN
2461: x_return_status := FND_API.G_RET_STS_ERROR;
2462: END;
2463: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2464: RAISE TRANSACTION_EXCEPTION;
2465: END IF;
2466:
2467:

Line 2493: x_return_status := fnd_api.g_ret_sts_error;

2489: print_log('x_receipt_status: '||x_receipt_status);
2490: print_log('x_return_status: '||x_return_status);
2491:
2492: IF (x_receipt_num IS NULL) THEN
2493: x_return_status := fnd_api.g_ret_sts_error;
2494: RAISE TRANSACTION_EXCEPTION;
2495: END IF;
2496: EXCEPTION
2497: WHEN No_Data_Found THEN

Line 2498: x_return_status := FND_API.G_RET_STS_ERROR;

2494: RAISE TRANSACTION_EXCEPTION;
2495: END IF;
2496: EXCEPTION
2497: WHEN No_Data_Found THEN
2498: x_return_status := FND_API.G_RET_STS_ERROR;
2499: WHEN OTHERS THEN
2500: x_return_status := FND_API.G_RET_STS_ERROR;
2501: END;
2502: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 2500: x_return_status := FND_API.G_RET_STS_ERROR;

2496: EXCEPTION
2497: WHEN No_Data_Found THEN
2498: x_return_status := FND_API.G_RET_STS_ERROR;
2499: WHEN OTHERS THEN
2500: x_return_status := FND_API.G_RET_STS_ERROR;
2501: END;
2502: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2503: RAISE TRANSACTION_EXCEPTION;
2504: END IF;

Line 2502: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2498: x_return_status := FND_API.G_RET_STS_ERROR;
2499: WHEN OTHERS THEN
2500: x_return_status := FND_API.G_RET_STS_ERROR;
2501: END;
2502: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2503: RAISE TRANSACTION_EXCEPTION;
2504: END IF;
2505: END IF;
2506:

Line 2520: FND_API.G_FALSE,

2516: l_unapply_in_rec.org_id := x_org_id;
2517:
2518: BEGIN
2519: unapply_emd_receipt(1.0,
2520: FND_API.G_FALSE,
2521: FND_API.G_FALSE,
2522: x_return_status,
2523: l_unapply_in_rec,
2524: l_unapply_out_rec);

Line 2521: FND_API.G_FALSE,

2517:
2518: BEGIN
2519: unapply_emd_receipt(1.0,
2520: FND_API.G_FALSE,
2521: FND_API.G_FALSE,
2522: x_return_status,
2523: l_unapply_in_rec,
2524: l_unapply_out_rec);
2525:

Line 2531: x_return_status := FND_API.G_RET_STS_ERROR;

2527: print_log('x_return_status: '||x_return_status);
2528:
2529: EXCEPTION
2530: WHEN No_Data_Found THEN
2531: x_return_status := FND_API.G_RET_STS_ERROR;
2532: WHEN OTHERS THEN
2533: x_return_status := FND_API.G_RET_STS_ERROR;
2534: END;
2535: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 2533: x_return_status := FND_API.G_RET_STS_ERROR;

2529: EXCEPTION
2530: WHEN No_Data_Found THEN
2531: x_return_status := FND_API.G_RET_STS_ERROR;
2532: WHEN OTHERS THEN
2533: x_return_status := FND_API.G_RET_STS_ERROR;
2534: END;
2535: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2536: RAISE TRANSACTION_EXCEPTION;
2537: END IF;

Line 2535: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2531: x_return_status := FND_API.G_RET_STS_ERROR;
2532: WHEN OTHERS THEN
2533: x_return_status := FND_API.G_RET_STS_ERROR;
2534: END;
2535: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2536: RAISE TRANSACTION_EXCEPTION;
2537: END IF;
2538:
2539: l_progress := 210;

Line 2540: IF (x_return_status =FND_API.G_RET_STS_SUCCESS) THEN

2536: RAISE TRANSACTION_EXCEPTION;
2537: END IF;
2538:
2539: l_progress := 210;
2540: IF (x_return_status =FND_API.G_RET_STS_SUCCESS) THEN
2541: --Building record for creating Credit memo
2542: l_cm_in_record.document_number := l_emd_transactions_info.document_number;
2543: l_cm_in_record.customer_trx_id := x_parent_trx_id;
2544: l_cm_in_record.line_amount := l_emd_transactions_info.amount;

Line 2556: FND_API.G_FALSE,

2552: l_cm_in_record.emd_trx_group_id := l_emd_transactions_info.emd_trx_group_id;
2553:
2554: BEGIN
2555: create_cm_on_emd_deposit( 1.0,
2556: FND_API.G_FALSE,
2557: FND_API.G_FALSE,
2558: x_return_status,
2559: l_cm_in_record,
2560: l_cm_out_record);

Line 2557: FND_API.G_FALSE,

2553:
2554: BEGIN
2555: create_cm_on_emd_deposit( 1.0,
2556: FND_API.G_FALSE,
2557: FND_API.G_FALSE,
2558: x_return_status,
2559: l_cm_in_record,
2560: l_cm_out_record);
2561:

Line 2567: x_return_status := FND_API.G_RET_STS_ERROR;

2563: print_log('x_return_status: '||x_return_status);
2564:
2565: EXCEPTION
2566: WHEN No_Data_Found THEN
2567: x_return_status := FND_API.G_RET_STS_ERROR;
2568: WHEN OTHERS THEN
2569: x_return_status := FND_API.G_RET_STS_ERROR;
2570: END;
2571: END IF;

Line 2569: x_return_status := FND_API.G_RET_STS_ERROR;

2565: EXCEPTION
2566: WHEN No_Data_Found THEN
2567: x_return_status := FND_API.G_RET_STS_ERROR;
2568: WHEN OTHERS THEN
2569: x_return_status := FND_API.G_RET_STS_ERROR;
2570: END;
2571: END IF;
2572: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2573: RAISE TRANSACTION_EXCEPTION;

Line 2572: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2568: WHEN OTHERS THEN
2569: x_return_status := FND_API.G_RET_STS_ERROR;
2570: END;
2571: END IF;
2572: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2573: RAISE TRANSACTION_EXCEPTION;
2574: END IF;
2575:
2576: l_progress := 220;

Line 2577: IF (x_return_status =FND_API.G_RET_STS_SUCCESS) THEN

2573: RAISE TRANSACTION_EXCEPTION;
2574: END IF;
2575:
2576: l_progress := 220;
2577: IF (x_return_status =FND_API.G_RET_STS_SUCCESS) THEN
2578: --Building Record for applying refund activity on unapplied deposit receipt
2579: l_refund_activity_in_rec.receipt_num := x_receipt_num;
2580: l_refund_activity_in_rec.cash_receipt_id := x_cash_receipt_id;
2581: l_refund_activity_in_rec.apply_date := l_emd_transactions_info.transaction_date;

Line 2596: FND_API.G_FALSE,

2592: END IF;
2593: */
2594: BEGIN
2595: refund_activity_on_emd_receipt( 1.0,
2596: FND_API.G_FALSE,
2597: FND_API.G_FALSE,
2598: x_return_status,
2599: l_refund_activity_in_rec,
2600: l_refund_activity_out_rec);

Line 2597: FND_API.G_FALSE,

2593: */
2594: BEGIN
2595: refund_activity_on_emd_receipt( 1.0,
2596: FND_API.G_FALSE,
2597: FND_API.G_FALSE,
2598: x_return_status,
2599: l_refund_activity_in_rec,
2600: l_refund_activity_out_rec);
2601:

Line 2607: x_return_status := FND_API.G_RET_STS_ERROR;

2603: print_log('x_return_status: '||x_return_status);
2604:
2605: EXCEPTION
2606: WHEN No_Data_Found THEN
2607: x_return_status := FND_API.G_RET_STS_ERROR;
2608: WHEN OTHERS THEN
2609: x_return_status := FND_API.G_RET_STS_ERROR;
2610: END;
2611: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 2609: x_return_status := FND_API.G_RET_STS_ERROR;

2605: EXCEPTION
2606: WHEN No_Data_Found THEN
2607: x_return_status := FND_API.G_RET_STS_ERROR;
2608: WHEN OTHERS THEN
2609: x_return_status := FND_API.G_RET_STS_ERROR;
2610: END;
2611: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2612: RAISE TRANSACTION_EXCEPTION;
2613: END IF;

Line 2611: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2607: x_return_status := FND_API.G_RET_STS_ERROR;
2608: WHEN OTHERS THEN
2609: x_return_status := FND_API.G_RET_STS_ERROR;
2610: END;
2611: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2612: RAISE TRANSACTION_EXCEPTION;
2613: END IF;
2614: END IF;
2615:

Line 2617: IF (x_return_status =FND_API.G_RET_STS_SUCCESS) THEN

2613: END IF;
2614: END IF;
2615:
2616: l_progress := 230;
2617: IF (x_return_status =FND_API.G_RET_STS_SUCCESS) THEN
2618: -- Updating results in pon_emd_transactions
2619: UPDATE pon_emd_transactions
2620: SET CUST_TRX_NUMBER = l_cm_out_record.cm_trx_number,
2621: CUST_TRX_ID = l_cm_out_record.cm_customer_trx_id,

Line 2636: x_return_status := FND_API.G_RET_STS_ERROR;

2632: END IF;
2633: EXCEPTION
2634: WHEN No_Data_Found THEN
2635: print_log('inside no data found exception');
2636: x_return_status := FND_API.G_RET_STS_ERROR;
2637: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2638: p_count => x_msg_count,
2639: p_data => x_msg_data);
2640: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2637: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2633: EXCEPTION
2634: WHEN No_Data_Found THEN
2635: print_log('inside no data found exception');
2636: x_return_status := FND_API.G_RET_STS_ERROR;
2637: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2638: p_count => x_msg_count,
2639: p_data => x_msg_data);
2640: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2641: l_searched := fnd_msg_pub.delete_msg;

Line 2648: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2644: l_count := x_msg_count;
2645: x_msg_data := NULL;
2646: LOOP
2647: IF nvl(l_count, 0) > 0 THEN
2648: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2649: x_msg_data := x_msg_data ||' '|| l_msg_data;
2650: l_count := nvl(l_count, 0) - 1;
2651: ELSE
2652: EXIT;

Line 2662: x_return_status := FND_API.G_RET_STS_ERROR;

2658: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
2659: x_msg_data);
2660: WHEN TRANSACTION_EXCEPTION THEN
2661: print_log('inside trx exception');
2662: x_return_status := FND_API.G_RET_STS_ERROR;
2663: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2664: p_count => x_msg_count,
2665: p_data => x_msg_data);
2666: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2663: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2659: x_msg_data);
2660: WHEN TRANSACTION_EXCEPTION THEN
2661: print_log('inside trx exception');
2662: x_return_status := FND_API.G_RET_STS_ERROR;
2663: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2664: p_count => x_msg_count,
2665: p_data => x_msg_data);
2666: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2667: l_searched := fnd_msg_pub.delete_msg;

Line 2674: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2670: l_count := x_msg_count;
2671: x_msg_data := NULL;
2672: LOOP
2673: IF nvl(l_count, 0) > 0 THEN
2674: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2675: x_msg_data := x_msg_data ||' '|| l_msg_data;
2676: l_count := nvl(l_count, 0) - 1;
2677: ELSE
2678: EXIT;

Line 2688: x_return_status := FND_API.G_RET_STS_ERROR;

2684: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
2685: x_msg_data);
2686: WHEN SETUP_EXCEPTION THEN
2687: print_log('inside setup exception');
2688: x_return_status := FND_API.G_RET_STS_ERROR;
2689: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2690: p_count => x_msg_count,
2691: p_data => x_msg_data);
2692: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2689: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2685: x_msg_data);
2686: WHEN SETUP_EXCEPTION THEN
2687: print_log('inside setup exception');
2688: x_return_status := FND_API.G_RET_STS_ERROR;
2689: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2690: p_count => x_msg_count,
2691: p_data => x_msg_data);
2692: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2693: l_searched := fnd_msg_pub.delete_msg;

Line 2700: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2696: l_count := x_msg_count;
2697: x_msg_data := NULL;
2698: LOOP
2699: IF nvl(l_count, 0) > 0 THEN
2700: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2701: x_msg_data := x_msg_data ||' '|| l_msg_data;
2702: l_count := nvl(l_count, 0) - 1;
2703: ELSE
2704: EXIT;

Line 2714: x_return_status := FND_API.G_RET_STS_ERROR;

2710: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
2711: x_msg_data);
2712: WHEN OTHERS THEN
2713: print_log('inside others exception');
2714: x_return_status := FND_API.G_RET_STS_ERROR;
2715: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2716: p_count => x_msg_count,
2717: p_data => x_msg_data);
2718: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 2715: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

2711: x_msg_data);
2712: WHEN OTHERS THEN
2713: print_log('inside others exception');
2714: x_return_status := FND_API.G_RET_STS_ERROR;
2715: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2716: p_count => x_msg_count,
2717: p_data => x_msg_data);
2718: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
2719: l_searched := fnd_msg_pub.delete_msg;

Line 2726: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

2722: l_count := x_msg_count;
2723: x_msg_data := NULL;
2724: LOOP
2725: IF nvl(l_count, 0) > 0 THEN
2726: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
2727: x_msg_data := x_msg_data ||' '|| l_msg_data;
2728: l_count := nvl(l_count, 0) - 1;
2729: ELSE
2730: EXIT;

Line 2828: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

2824:
2825: print_log('Before checking API compatibility test');
2826:
2827:
2828: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
2829: l_api_name, g_pkg_name) THEN
2830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2831: END IF;
2832:

Line 2830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2826:
2827:
2828: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
2829: l_api_name, g_pkg_name) THEN
2830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2831: END IF;
2832:
2833: print_log('After checking API compatibility test');
2834:

Line 2835: x_return_status := FND_API.G_RET_STS_SUCCESS;

2831: END IF;
2832:
2833: print_log('After checking API compatibility test');
2834:
2835: x_return_status := FND_API.G_RET_STS_SUCCESS;
2836: print_log('before executing mo_global');
2837: MO_GLOBAL.init('AR');
2838: print_log('after executing mo_global');
2839:

Line 2872: x_return_status := FND_API.G_RET_STS_SUCCESS;

2868:
2869: FND_MSG_PUB.initialize();
2870:
2871: SAVEPOINT pon_emd_forfeit_transaction;
2872: x_return_status := FND_API.G_RET_STS_SUCCESS;
2873:
2874: print_log('Started emd forfeit transaction Processing of emd transaction id:
2875: '||l_emd_transactions_info.emd_transaction_id);
2876:

Line 2888: x_return_status := FND_API.G_RET_STS_ERROR;

2884: p_return_status =>l_org_return_status);
2885:
2886: EXCEPTION
2887: WHEN OTHERS THEN
2888: x_return_status := FND_API.G_RET_STS_ERROR;
2889: FND_MESSAGE.SET_NAME('PON','ORG_CONTEXT_CANNOT_SET');
2890: FND_MESSAGE.SET_TOKEN('ORG_ID',To_Char(l_org_id));
2891: FND_MSG_PUB.ADD;
2892: RAISE SETUP_EXCEPTION;

Line 2900: x_return_status := FND_API.G_RET_STS_ERROR;

2896: BEGIN
2897: verify_finance_installation(x_return_status);
2898: EXCEPTION
2899: WHEN OTHERS THEN
2900: x_return_status := FND_API.G_RET_STS_ERROR;
2901: END;
2902:
2903: print_log('After procedure verify_finance_installation');
2904: print_log('x_return_status: '||x_return_status);

Line 2906: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2902:
2903: print_log('After procedure verify_finance_installation');
2904: print_log('x_return_status: '||x_return_status);
2905:
2906: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2907: RAISE SETUP_EXCEPTION;
2908: END IF;
2909:
2910: l_progress := 120;

Line 2916: x_return_status := FND_API.G_RET_STS_ERROR;

2912: FETCH pon_emd_fin_parameters INTO l_pon_emd_fin_parameters;
2913: l_found := pon_emd_fin_parameters%FOUND;
2914: IF NOT l_found THEN
2915: CLOSE pon_emd_fin_parameters;
2916: x_return_status := FND_API.G_RET_STS_ERROR;
2917: FND_MESSAGE.SET_NAME('PON','PON_EMD_FIN_PARAMS_NOT_SETUP');
2918: FND_MSG_PUB.ADD;
2919: RAISE SETUP_EXCEPTION;
2920: ELSE

Line 2942: x_return_status := FND_API.G_RET_STS_ERROR;

2938: x_return_status);
2939:
2940: EXCEPTION
2941: WHEN OTHERS THEN
2942: x_return_status := FND_API.G_RET_STS_ERROR;
2943: END;
2944: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2945: RAISE SETUP_EXCEPTION;
2946: END IF;

Line 2944: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2940: EXCEPTION
2941: WHEN OTHERS THEN
2942: x_return_status := FND_API.G_RET_STS_ERROR;
2943: END;
2944: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2945: RAISE SETUP_EXCEPTION;
2946: END IF;
2947:
2948: l_progress := 140;

Line 2976: x_return_status := fnd_api.g_ret_sts_error;

2972: print_log('l_deposit_payment_type_code: '||l_deposit_payment_type_code);
2973: print_log('l_org_id: '||l_org_id);
2974:
2975: IF (l_parent_trx_id IS NULL) THEN
2976: x_return_status := fnd_api.g_ret_sts_error;
2977: RAISE TRANSACTION_EXCEPTION;
2978: END IF;
2979: EXCEPTION
2980: WHEN No_Data_Found THEN

Line 2981: x_return_status := FND_API.G_RET_STS_ERROR;

2977: RAISE TRANSACTION_EXCEPTION;
2978: END IF;
2979: EXCEPTION
2980: WHEN No_Data_Found THEN
2981: x_return_status := FND_API.G_RET_STS_ERROR;
2982: WHEN OTHERS THEN
2983: x_return_status := FND_API.G_RET_STS_ERROR;
2984: END;
2985: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 2983: x_return_status := FND_API.G_RET_STS_ERROR;

2979: EXCEPTION
2980: WHEN No_Data_Found THEN
2981: x_return_status := FND_API.G_RET_STS_ERROR;
2982: WHEN OTHERS THEN
2983: x_return_status := FND_API.G_RET_STS_ERROR;
2984: END;
2985: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2986: RAISE TRANSACTION_EXCEPTION;
2987: END IF;

Line 2985: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

2981: x_return_status := FND_API.G_RET_STS_ERROR;
2982: WHEN OTHERS THEN
2983: x_return_status := FND_API.G_RET_STS_ERROR;
2984: END;
2985: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2986: RAISE TRANSACTION_EXCEPTION;
2987: END IF;
2988: END IF;
2989:

Line 2999: x_return_status := FND_API.G_RET_STS_ERROR;

2995: IF l_found THEN
2996: CLOSE payment_type_info;
2997: ELSE
2998: CLOSE payment_type_info;
2999: x_return_status := FND_API.G_RET_STS_ERROR;
3000: FND_MESSAGE.SET_NAME('PON','EMD_PAYMENT_TYPE_NOT_SETUP');
3001: FND_MESSAGE.SET_TOKEN('PTYPE_CODE',l_deposit_payment_type_code);
3002: FND_MSG_PUB.ADD;
3003: RAISE SETUP_EXCEPTION;

Line 3019: x_return_status := FND_API.G_RET_STS_ERROR;

3015: l_emd_transactions_info.org_id,
3016: x_return_status);
3017: EXCEPTION
3018: WHEN No_Data_Found THEN
3019: x_return_status := FND_API.G_RET_STS_ERROR;
3020: WHEN OTHERS THEN
3021: x_return_status := FND_API.G_RET_STS_ERROR;
3022: END;
3023: print_log('After executing procedure validate_trx_payment_type_info');

Line 3021: x_return_status := FND_API.G_RET_STS_ERROR;

3017: EXCEPTION
3018: WHEN No_Data_Found THEN
3019: x_return_status := FND_API.G_RET_STS_ERROR;
3020: WHEN OTHERS THEN
3021: x_return_status := FND_API.G_RET_STS_ERROR;
3022: END;
3023: print_log('After executing procedure validate_trx_payment_type_info');
3024: print_log('x_return_status: '||x_return_status);
3025:

Line 3026: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

3022: END;
3023: print_log('After executing procedure validate_trx_payment_type_info');
3024: print_log('x_return_status: '||x_return_status);
3025:
3026: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3027: RAISE SETUP_EXCEPTION;
3028: END IF;
3029:
3030:

Line 3038: x_return_status := FND_API.G_RET_STS_ERROR;

3034: G_EMD_FORFEIT,
3035: x_return_status);
3036: EXCEPTION
3037: WHEN No_Data_Found THEN
3038: x_return_status := FND_API.G_RET_STS_ERROR;
3039: WHEN OTHERS THEN
3040: x_return_status := FND_API.G_RET_STS_ERROR;
3041: END;
3042:

Line 3040: x_return_status := FND_API.G_RET_STS_ERROR;

3036: EXCEPTION
3037: WHEN No_Data_Found THEN
3038: x_return_status := FND_API.G_RET_STS_ERROR;
3039: WHEN OTHERS THEN
3040: x_return_status := FND_API.G_RET_STS_ERROR;
3041: END;
3042:
3043: print_log('After executing procedure validate_trx_info');
3044: print_log('x_return_status: '||x_return_status);

Line 3046: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

3042:
3043: print_log('After executing procedure validate_trx_info');
3044: print_log('x_return_status: '||x_return_status);
3045:
3046: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3047: RAISE TRANSACTION_EXCEPTION;
3048: END IF;
3049:
3050:

Line 3083: x_return_status := FND_API.G_RET_STS_ERROR;

3079: RAISE TRANSACTION_EXCEPTION;
3080: END IF;
3081: EXCEPTION
3082: WHEN No_Data_Found THEN
3083: x_return_status := FND_API.G_RET_STS_ERROR;
3084: WHEN OTHERS THEN
3085: x_return_status := FND_API.G_RET_STS_ERROR;
3086: END;
3087: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 3085: x_return_status := FND_API.G_RET_STS_ERROR;

3081: EXCEPTION
3082: WHEN No_Data_Found THEN
3083: x_return_status := FND_API.G_RET_STS_ERROR;
3084: WHEN OTHERS THEN
3085: x_return_status := FND_API.G_RET_STS_ERROR;
3086: END;
3087: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3088: RAISE TRANSACTION_EXCEPTION;
3089: END IF;

Line 3087: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

3083: x_return_status := FND_API.G_RET_STS_ERROR;
3084: WHEN OTHERS THEN
3085: x_return_status := FND_API.G_RET_STS_ERROR;
3086: END;
3087: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3088: RAISE TRANSACTION_EXCEPTION;
3089: END IF;
3090:
3091:

Line 3116: x_return_status := fnd_api.g_ret_sts_error;

3112: print_log('x_receipt_status: '||x_receipt_status);
3113: print_log('x_return_status: '||x_return_status);
3114:
3115: IF (x_receipt_num IS NULL) THEN
3116: x_return_status := fnd_api.g_ret_sts_error;
3117: RAISE TRANSACTION_EXCEPTION;
3118: END IF;
3119: EXCEPTION
3120: WHEN No_Data_Found THEN

Line 3121: x_return_status := FND_API.G_RET_STS_ERROR;

3117: RAISE TRANSACTION_EXCEPTION;
3118: END IF;
3119: EXCEPTION
3120: WHEN No_Data_Found THEN
3121: x_return_status := FND_API.G_RET_STS_ERROR;
3122: WHEN OTHERS THEN
3123: x_return_status := FND_API.G_RET_STS_ERROR;
3124: END;
3125: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 3123: x_return_status := FND_API.G_RET_STS_ERROR;

3119: EXCEPTION
3120: WHEN No_Data_Found THEN
3121: x_return_status := FND_API.G_RET_STS_ERROR;
3122: WHEN OTHERS THEN
3123: x_return_status := FND_API.G_RET_STS_ERROR;
3124: END;
3125: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3126: RAISE TRANSACTION_EXCEPTION;
3127: END IF;

Line 3125: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

3121: x_return_status := FND_API.G_RET_STS_ERROR;
3122: WHEN OTHERS THEN
3123: x_return_status := FND_API.G_RET_STS_ERROR;
3124: END;
3125: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3126: RAISE TRANSACTION_EXCEPTION;
3127: END IF;
3128: END IF;
3129:

Line 3142: x_return_status := FND_API.G_RET_STS_ERROR;

3138: WHEN No_Data_Found THEN
3139: FND_MESSAGE.SET_NAME('PON','INV_TRX_TYPE_NOT_FOUND_IN_AR');
3140: FND_MESSAGE.SET_TOKEN('INV_TRX_TYPE_ID',To_Char(l_pon_emd_fin_parameters.RA_TRX_TYPE_ID));
3141: FND_MSG_PUB.ADD;
3142: x_return_status := FND_API.G_RET_STS_ERROR;
3143: WHEN OTHERS THEN
3144: FND_MESSAGE.SET_NAME('PON','INV_TRX_TYPE_NOT_FOUND_IN_AR');
3145: FND_MESSAGE.SET_TOKEN('INV_TRX_TYPE_ID',To_Char(l_pon_emd_fin_parameters.RA_TRX_TYPE_ID));
3146: FND_MSG_PUB.ADD;

Line 3147: x_return_status := FND_API.G_RET_STS_ERROR;

3143: WHEN OTHERS THEN
3144: FND_MESSAGE.SET_NAME('PON','INV_TRX_TYPE_NOT_FOUND_IN_AR');
3145: FND_MESSAGE.SET_TOKEN('INV_TRX_TYPE_ID',To_Char(l_pon_emd_fin_parameters.RA_TRX_TYPE_ID));
3146: FND_MSG_PUB.ADD;
3147: x_return_status := FND_API.G_RET_STS_ERROR;
3148: END;
3149: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3150: RAISE SETUP_EXCEPTION;
3151: END IF;

Line 3149: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

3145: FND_MESSAGE.SET_TOKEN('INV_TRX_TYPE_ID',To_Char(l_pon_emd_fin_parameters.RA_TRX_TYPE_ID));
3146: FND_MSG_PUB.ADD;
3147: x_return_status := FND_API.G_RET_STS_ERROR;
3148: END;
3149: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3150: RAISE SETUP_EXCEPTION;
3151: END IF;
3152:
3153: l_progress := 210;

Line 3206: x_return_status := FND_API.G_RET_STS_ERROR;

3202: print_log('x_return_status: '||x_return_status);
3203:
3204: EXCEPTION
3205: WHEN No_Data_Found THEN
3206: x_return_status := FND_API.G_RET_STS_ERROR;
3207:
3208: WHEN OTHERS THEN
3209: x_return_status := FND_API.G_RET_STS_ERROR;
3210: END;

Line 3209: x_return_status := FND_API.G_RET_STS_ERROR;

3205: WHEN No_Data_Found THEN
3206: x_return_status := FND_API.G_RET_STS_ERROR;
3207:
3208: WHEN OTHERS THEN
3209: x_return_status := FND_API.G_RET_STS_ERROR;
3210: END;
3211: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3212: RAISE TRANSACTION_EXCEPTION;
3213: END IF;

Line 3211: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

3207:
3208: WHEN OTHERS THEN
3209: x_return_status := FND_API.G_RET_STS_ERROR;
3210: END;
3211: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3212: RAISE TRANSACTION_EXCEPTION;
3213: END IF;
3214: END IF;
3215:

Line 3219: x_return_status := FND_API.G_RET_STS_ERROR;

3215:
3216: EXCEPTION
3217: WHEN No_Data_Found THEN
3218: print_log('inside no data found');
3219: x_return_status := FND_API.G_RET_STS_ERROR;
3220: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3221: p_count => x_msg_count,
3222: p_data => x_msg_data);
3223: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 3220: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

3216: EXCEPTION
3217: WHEN No_Data_Found THEN
3218: print_log('inside no data found');
3219: x_return_status := FND_API.G_RET_STS_ERROR;
3220: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3221: p_count => x_msg_count,
3222: p_data => x_msg_data);
3223: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
3224: l_searched := fnd_msg_pub.delete_msg;

Line 3231: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

3227: l_count := x_msg_count;
3228: x_msg_data := NULL;
3229: LOOP
3230: IF nvl(l_count, 0) > 0 THEN
3231: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
3232: x_msg_data := x_msg_data ||' '|| l_msg_data;
3233: l_count := nvl(l_count, 0) - 1;
3234: ELSE
3235: EXIT;

Line 3245: x_return_status := FND_API.G_RET_STS_ERROR;

3241: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
3242: x_msg_data);
3243: WHEN TRANSACTION_EXCEPTION THEN
3244: print_log('inside trx exception');
3245: x_return_status := FND_API.G_RET_STS_ERROR;
3246: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3247: p_count => x_msg_count,
3248: p_data => x_msg_data);
3249: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 3246: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

3242: x_msg_data);
3243: WHEN TRANSACTION_EXCEPTION THEN
3244: print_log('inside trx exception');
3245: x_return_status := FND_API.G_RET_STS_ERROR;
3246: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3247: p_count => x_msg_count,
3248: p_data => x_msg_data);
3249: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
3250: l_searched := fnd_msg_pub.delete_msg;

Line 3257: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

3253: l_count := x_msg_count;
3254: x_msg_data := NULL;
3255: LOOP
3256: IF nvl(l_count, 0) > 0 THEN
3257: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
3258: x_msg_data := x_msg_data ||' '|| l_msg_data;
3259: l_count := nvl(l_count, 0) - 1;
3260: ELSE
3261: EXIT;

Line 3271: x_return_status := FND_API.G_RET_STS_ERROR;

3267: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
3268: x_msg_data);
3269: WHEN SETUP_EXCEPTION THEN
3270: print_log('inside setup exception');
3271: x_return_status := FND_API.G_RET_STS_ERROR;
3272: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3273: p_count => x_msg_count,
3274: p_data => x_msg_data);
3275: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 3272: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

3268: x_msg_data);
3269: WHEN SETUP_EXCEPTION THEN
3270: print_log('inside setup exception');
3271: x_return_status := FND_API.G_RET_STS_ERROR;
3272: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3273: p_count => x_msg_count,
3274: p_data => x_msg_data);
3275: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
3276: l_searched := fnd_msg_pub.delete_msg;

Line 3283: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

3279: l_count := x_msg_count;
3280: x_msg_data := NULL;
3281: LOOP
3282: IF nvl(l_count, 0) > 0 THEN
3283: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
3284: x_msg_data := x_msg_data ||' '|| l_msg_data;
3285: l_count := nvl(l_count, 0) - 1;
3286: ELSE
3287: EXIT;

Line 3297: x_return_status := FND_API.G_RET_STS_ERROR;

3293: update_emd_trx_error_status(l_emd_transactions_info.emd_transaction_id,
3294: x_msg_data);
3295: WHEN OTHERS THEN
3296: print_log('inside others exception');
3297: x_return_status := FND_API.G_RET_STS_ERROR;
3298: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3299: p_count => x_msg_count,
3300: p_data => x_msg_data);
3301: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');

Line 3298: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

3294: x_msg_data);
3295: WHEN OTHERS THEN
3296: print_log('inside others exception');
3297: x_return_status := FND_API.G_RET_STS_ERROR;
3298: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3299: p_count => x_msg_count,
3300: p_data => x_msg_data);
3301: fnd_msg_pub.set_search_name('AR','AR_DAPI_SOLD_CUST_DFT');
3302: l_searched := fnd_msg_pub.delete_msg;

Line 3309: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

3305: l_count := x_msg_count;
3306: x_msg_data := NULL;
3307: LOOP
3308: IF nvl(l_count, 0) > 0 THEN
3309: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
3310: x_msg_data := x_msg_data ||' '|| l_msg_data;
3311: l_count := nvl(l_count, 0) - 1;
3312: ELSE
3313: EXIT;

Line 3374: x_return_status := FND_API.G_RET_STS_SUCCESS;

3370: cust_out_rec PARTY_INFO_OUT_RECTYPE;
3371: cust_site_in_rec PARTY_SITE_INFO_IN_RECTYPE;
3372: cust_site_out_rec PARTY_SITE_INFO_OUT_RECTYPE;
3373: BEGIN
3374: x_return_status := FND_API.G_RET_STS_SUCCESS;
3375: BEGIN
3376: SELECT hca.cust_account_id,
3377: hp.party_name
3378: INTO x_cust_account_id,

Line 3418: x_return_status := fnd_api.g_ret_sts_error;

3414: AND hps.party_id = p_party_id
3415: AND vs.org_id = p_org_id;
3416: EXCEPTION
3417: WHEN No_Data_Found THEN
3418: x_return_status := fnd_api.g_ret_sts_error;
3419: FND_MESSAGE.SET_NAME('PON','SUPPLIER_SITE_NOT_FOUND');
3420:
3421: FND_MSG_PUB.ADD;
3422: RETURN;

Line 3482: FND_API.G_FALSE,

3478: cust_in_rec.party_id := p_party_id;
3479: cust_in_rec.party_name := x_party_name;
3480: cust_in_rec.terms_id := p_payment_terms_id;
3481: create_cust_account( 1,
3482: FND_API.G_FALSE,
3483: FND_API.G_FALSE,
3484: x_return_status,
3485: cust_in_rec,
3486: cust_out_rec);

Line 3483: FND_API.G_FALSE,

3479: cust_in_rec.party_name := x_party_name;
3480: cust_in_rec.terms_id := p_payment_terms_id;
3481: create_cust_account( 1,
3482: FND_API.G_FALSE,
3483: FND_API.G_FALSE,
3484: x_return_status,
3485: cust_in_rec,
3486: cust_out_rec);
3487: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

Line 3487: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3483: FND_API.G_FALSE,
3484: x_return_status,
3485: cust_in_rec,
3486: cust_out_rec);
3487: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3488: RETURN;
3489: END IF;
3490: cust_site_in_rec.party_id := p_party_id;
3491: cust_site_in_rec.party_name := x_party_name;

Line 3502: FND_API.G_FALSE,

3498: print_log('After creating cust account id');
3499: print_log('cust_out_rec.cust_account_id'||cust_out_rec.cust_account_id);
3500:
3501: create_cust_acc_site_and_usage( 1,
3502: FND_API.G_FALSE,
3503: FND_API.G_FALSE,
3504: x_return_status,
3505: cust_site_in_rec,
3506: cust_site_out_rec);

Line 3503: FND_API.G_FALSE,

3499: print_log('cust_out_rec.cust_account_id'||cust_out_rec.cust_account_id);
3500:
3501: create_cust_acc_site_and_usage( 1,
3502: FND_API.G_FALSE,
3503: FND_API.G_FALSE,
3504: x_return_status,
3505: cust_site_in_rec,
3506: cust_site_out_rec);
3507: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

Line 3507: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3503: FND_API.G_FALSE,
3504: x_return_status,
3505: cust_site_in_rec,
3506: cust_site_out_rec);
3507: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3508: RETURN;
3509: END IF;
3510: x_cust_account_id := cust_out_rec.cust_account_id;
3511: x_cust_acct_site_id := cust_site_out_rec.cust_acct_site_id;

Line 3527: FND_API.G_FALSE,

3523: cust_site_in_rec.org_id := p_org_id;
3524: cust_site_in_rec.location := x_location;
3525: cust_site_in_rec.terms_id := p_payment_terms_id;
3526: create_cust_acc_site_and_usage( 1,
3527: FND_API.G_FALSE,
3528: FND_API.G_FALSE,
3529: x_return_status,
3530: cust_site_in_rec,
3531: cust_site_out_rec);

Line 3528: FND_API.G_FALSE,

3524: cust_site_in_rec.location := x_location;
3525: cust_site_in_rec.terms_id := p_payment_terms_id;
3526: create_cust_acc_site_and_usage( 1,
3527: FND_API.G_FALSE,
3528: FND_API.G_FALSE,
3529: x_return_status,
3530: cust_site_in_rec,
3531: cust_site_out_rec);
3532: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

Line 3532: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3528: FND_API.G_FALSE,
3529: x_return_status,
3530: cust_site_in_rec,
3531: cust_site_out_rec);
3532: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3533: RETURN;
3534: END IF;
3535:
3536:

Line 3550: x_return_status := FND_API.G_RET_STS_SUCCESS;

3546:
3547: IF ((x_cust_account_id IS NOT NULL) AND
3548: (x_cust_acct_site_id IS NOT NULL) AND
3549: (x_site_use_id IS NOT NULL)) THEN
3550: x_return_status := FND_API.G_RET_STS_SUCCESS;
3551: ELSE
3552: x_return_status := FND_API.G_RET_STS_ERROR;
3553: END IF;
3554:

Line 3552: x_return_status := FND_API.G_RET_STS_ERROR;

3548: (x_cust_acct_site_id IS NOT NULL) AND
3549: (x_site_use_id IS NOT NULL)) THEN
3550: x_return_status := FND_API.G_RET_STS_SUCCESS;
3551: ELSE
3552: x_return_status := FND_API.G_RET_STS_ERROR;
3553: END IF;
3554:
3555:
3556: EXCEPTION

Line 3557: WHEN FND_API.G_EXC_ERROR THEN

3553: END IF;
3554:
3555:
3556: EXCEPTION
3557: WHEN FND_API.G_EXC_ERROR THEN
3558: x_return_status := fnd_api.g_ret_sts_error;
3559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3560: x_return_status := fnd_api.g_ret_sts_error;
3561: END get_customer_info;

Line 3558: x_return_status := fnd_api.g_ret_sts_error;

3554:
3555:
3556: EXCEPTION
3557: WHEN FND_API.G_EXC_ERROR THEN
3558: x_return_status := fnd_api.g_ret_sts_error;
3559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3560: x_return_status := fnd_api.g_ret_sts_error;
3561: END get_customer_info;
3562:

Line 3559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3555:
3556: EXCEPTION
3557: WHEN FND_API.G_EXC_ERROR THEN
3558: x_return_status := fnd_api.g_ret_sts_error;
3559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3560: x_return_status := fnd_api.g_ret_sts_error;
3561: END get_customer_info;
3562:
3563: -----------------------------------------------------------------------

Line 3560: x_return_status := fnd_api.g_ret_sts_error;

3556: EXCEPTION
3557: WHEN FND_API.G_EXC_ERROR THEN
3558: x_return_status := fnd_api.g_ret_sts_error;
3559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3560: x_return_status := fnd_api.g_ret_sts_error;
3561: END get_customer_info;
3562:
3563: -----------------------------------------------------------------------
3564: --Start of Comments

Line 3635: x_return_status := FND_API.G_RET_STS_SUCCESS;

3631: x_msg_data VARCHAR2(1000);
3632: x_msg_count NUMBER;
3633: BEGIN
3634:
3635: x_return_status := FND_API.G_RET_STS_SUCCESS;
3636:
3637: IBY_EXT_BANKACCT_PUB.check_bank_exist(1,
3638: FND_API.G_FALSE,
3639: p_country_code,

Line 3638: FND_API.G_FALSE,

3634:
3635: x_return_status := FND_API.G_RET_STS_SUCCESS;
3636:
3637: IBY_EXT_BANKACCT_PUB.check_bank_exist(1,
3638: FND_API.G_FALSE,
3639: p_country_code,
3640: p_bank_name,
3641: NULL,
3642: x_return_status,

Line 3649: IF ((x_return_status =FND_API.G_RET_STS_SUCCESS) AND (x_bank_id IS NOT NULL))THEN

3645: x_bank_id,
3646: x_bank_end_date,
3647: x_response);
3648:
3649: IF ((x_return_status =FND_API.G_RET_STS_SUCCESS) AND (x_bank_id IS NOT NULL))THEN
3650: IBY_EXT_BANKACCT_PUB.check_ext_bank_branch_exist(1,
3651: FND_API.G_FALSE,
3652: x_bank_id,
3653: p_bank_branch_name,

Line 3651: FND_API.G_FALSE,

3647: x_response);
3648:
3649: IF ((x_return_status =FND_API.G_RET_STS_SUCCESS) AND (x_bank_id IS NOT NULL))THEN
3650: IBY_EXT_BANKACCT_PUB.check_ext_bank_branch_exist(1,
3651: FND_API.G_FALSE,
3652: x_bank_id,
3653: p_bank_branch_name,
3654: NULL,
3655: x_return_status,

Line 3662: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND (x_branch_id IS NOT NULL))THEN

3658: x_branch_id,
3659: x_branch_end_date,
3660: x_response);
3661:
3662: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND (x_branch_id IS NOT NULL))THEN
3663: IBY_EXT_BANKACCT_PUB.check_ext_acct_exist(1,
3664: FND_API.G_FALSE,
3665: x_bank_id,
3666: x_branch_id,

Line 3664: FND_API.G_FALSE,

3660: x_response);
3661:
3662: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND (x_branch_id IS NOT NULL))THEN
3663: IBY_EXT_BANKACCT_PUB.check_ext_acct_exist(1,
3664: FND_API.G_FALSE,
3665: x_bank_id,
3666: x_branch_id,
3667: p_bank_account_num,
3668: NULL,

Line 3691: FND_API.G_FALSE,

3687: l_ext_bank_rec.bank_name := p_bank_name;
3688: l_ext_bank_rec.country_code := p_country_code;
3689: l_ext_bank_rec.institution_type := 'BANK';
3690: IBY_EXT_BANKACCT_PUB.create_ext_bank(1,
3691: FND_API.G_FALSE,
3692: l_ext_bank_rec,
3693: x_bank_id,
3694: x_return_status,
3695: x_msg_count,

Line 3699: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3695: x_msg_count,
3696: x_msg_data,
3697: x_response);
3698: END IF;
3699: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3700: FND_MESSAGE.set_name( 'PON', 'BANK_CREATION_FAILED' );
3701: FND_MSG_PUB.ADD;
3702: RETURN;
3703: END IF;

Line 3705: IF ((x_return_status =FND_API.G_RET_STS_SUCCESS) AND (x_bank_id IS NOT NULL) AND (x_branch_id IS NULL)) THEN

3701: FND_MSG_PUB.ADD;
3702: RETURN;
3703: END IF;
3704:
3705: IF ((x_return_status =FND_API.G_RET_STS_SUCCESS) AND (x_bank_id IS NOT NULL) AND (x_branch_id IS NULL)) THEN
3706: l_ext_branch_rec.branch_party_id := NULL;
3707: l_ext_branch_rec.bank_party_id := x_bank_id;
3708: l_ext_branch_rec.branch_name := p_bank_branch_name;
3709: l_ext_branch_rec.branch_type := 'ABA';

Line 3712: FND_API.G_FALSE,

3708: l_ext_branch_rec.branch_name := p_bank_branch_name;
3709: l_ext_branch_rec.branch_type := 'ABA';
3710: iby_ext_bankacct_pub.create_ext_bank_branch(
3711: 1,
3712: FND_API.G_FALSE,
3713: l_ext_branch_rec,
3714: x_branch_id,
3715: x_return_status,
3716: x_msg_count,

Line 3720: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3716: x_msg_count,
3717: x_msg_data,
3718: x_response);
3719: END IF;
3720: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3721: FND_MESSAGE.set_name( 'PON', 'BANK_BRANCH_CREATION_FAILED' );
3722: FND_MESSAGE.SET_TOKEN('BANK',p_bank_name);
3723: FND_MSG_PUB.ADD;
3724: RETURN;

Line 3726: IF ((x_return_status =FND_API.G_RET_STS_SUCCESS)

3722: FND_MESSAGE.SET_TOKEN('BANK',p_bank_name);
3723: FND_MSG_PUB.ADD;
3724: RETURN;
3725: END IF;
3726: IF ((x_return_status =FND_API.G_RET_STS_SUCCESS)
3727: AND (x_bank_id IS NOT NULL)
3728: AND (x_branch_id IS NOT NULL)
3729: AND (x_acct_id IS NULL)) THEN
3730:

Line 3740: FND_API.G_FALSE,

3736: l_ext_bank_acct_rec.currency := p_accountcurrency;
3737:
3738: iby_ext_bankacct_pub.create_ext_bank_acct(
3739: 1,
3740: FND_API.G_FALSE,
3741: l_ext_bank_acct_rec,
3742: x_acct_id,
3743: x_return_status,
3744: x_msg_count,

Line 3755: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3751: name => 'HZ_GENERATE_PARTY_NUMBER',
3752: val => 'N');
3753: END IF;
3754:
3755: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3756: FND_MESSAGE.set_name( 'PON', 'BANK_ACCOUNT_CREATION_FAILED' );
3757: FND_MESSAGE.SET_TOKEN('BANK', p_bank_name);
3758: FND_MESSAGE.SET_TOKEN('BRANCH',p_bank_branch_name);
3759: FND_MSG_PUB.ADD;

Line 3771: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

3767: l_payer.Cust_Account_Id := p_cust_account_id;
3768: l_payer.Account_Site_Id := p_site_use_id;
3769:
3770:
3771: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3772:
3773: IBY_FNDCPT_SETUP_PUB.Set_Payer_Attributes(1.0,
3774: FND_API.G_FALSE,
3775: FND_API.G_FALSE,

Line 3774: FND_API.G_FALSE,

3770:
3771: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3772:
3773: IBY_FNDCPT_SETUP_PUB.Set_Payer_Attributes(1.0,
3774: FND_API.G_FALSE,
3775: FND_API.G_FALSE,
3776: x_return_status,
3777: x_msg_count,
3778: x_msg_data,

Line 3775: FND_API.G_FALSE,

3771: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3772:
3773: IBY_FNDCPT_SETUP_PUB.Set_Payer_Attributes(1.0,
3774: FND_API.G_FALSE,
3775: FND_API.G_FALSE,
3776: x_return_status,
3777: x_msg_count,
3778: x_msg_data,
3779: l_payer,

Line 3785: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3781: x_payer_attribs_id,
3782: x_set_payer_response);
3783: END IF;
3784:
3785: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3786: RETURN;
3787: END IF;
3788:
3789: IF (x_payer_attribs_id IS NULL) THEN

Line 3790: x_return_status := fnd_api.g_ret_sts_error;

3786: RETURN;
3787: END IF;
3788:
3789: IF (x_payer_attribs_id IS NULL) THEN
3790: x_return_status := fnd_api.g_ret_sts_error;
3791: RETURN;
3792: END IF;
3793:
3794:

Line 3795: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

3791: RETURN;
3792: END IF;
3793:
3794:
3795: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND
3796: (x_set_payer_response.result_code = IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS)) THEN
3797: l_channel_assignment.Pmt_Channel_Code := 'BANK_ACCT_XFER';
3798: IBY_FNDCPT_SETUP_PUB.Set_Payer_Default_Pmt_Channel
3799: ( 1.0,

Line 3800: FND_API.G_FALSE,

3796: (x_set_payer_response.result_code = IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS)) THEN
3797: l_channel_assignment.Pmt_Channel_Code := 'BANK_ACCT_XFER';
3798: IBY_FNDCPT_SETUP_PUB.Set_Payer_Default_Pmt_Channel
3799: ( 1.0,
3800: FND_API.G_FALSE,
3801: FND_API.G_FALSE,
3802: x_return_status,
3803: x_msg_count,
3804: x_msg_data,

Line 3801: FND_API.G_FALSE,

3797: l_channel_assignment.Pmt_Channel_Code := 'BANK_ACCT_XFER';
3798: IBY_FNDCPT_SETUP_PUB.Set_Payer_Default_Pmt_Channel
3799: ( 1.0,
3800: FND_API.G_FALSE,
3801: FND_API.G_FALSE,
3802: x_return_status,
3803: x_msg_count,
3804: x_msg_data,
3805: l_payer,

Line 3811: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3807: x_channel_assignment_id,
3808: x_pmt_channel_response);
3809: END IF;
3810:
3811: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3812: RETURN;
3813: END IF;
3814:
3815: IF (x_channel_assignment_id IS NULL) THEN

Line 3816: x_return_status := fnd_api.g_ret_sts_error;

3812: RETURN;
3813: END IF;
3814:
3815: IF (x_channel_assignment_id IS NULL) THEN
3816: x_return_status := fnd_api.g_ret_sts_error;
3817: RETURN;
3818: END IF;
3819:
3820:

Line 3821: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

3817: RETURN;
3818: END IF;
3819:
3820:
3821: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND
3822: (x_pmt_channel_response.result_code = IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS)) THEN
3823: BEGIN
3824: SELECT instrument_payment_use_id
3825: INTO x_account_assignment_id

Line 3837: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

3833: END;
3834: END IF;
3835:
3836:
3837: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND
3838: (NVL(l_instrument_exists,'N') = 'N')) THEN
3839: l_instrument.instrument_type := 'BANKACCOUNT';
3840: l_instrument.instrument_id := x_acct_id;
3841: l_assignment_attribs.instrument := l_instrument;

Line 3845: FND_API.G_FALSE,

3841: l_assignment_attribs.instrument := l_instrument;
3842: l_assignment_attribs.start_date := Trunc(SYSDATE);
3843:
3844: IBY_FNDCPT_SETUP_PUB.Set_Payer_Instr_Assignment(1.0,
3845: FND_API.G_FALSE,
3846: FND_API.G_FALSE,
3847: x_return_status,
3848: x_msg_count,
3849: x_msg_data,

Line 3846: FND_API.G_FALSE,

3842: l_assignment_attribs.start_date := Trunc(SYSDATE);
3843:
3844: IBY_FNDCPT_SETUP_PUB.Set_Payer_Instr_Assignment(1.0,
3845: FND_API.G_FALSE,
3846: FND_API.G_FALSE,
3847: x_return_status,
3848: x_msg_count,
3849: x_msg_data,
3850: l_payer,

Line 3856: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

3852: x_account_assignment_id,
3853: x_inst_response);
3854: END IF;
3855:
3856: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
3857: RETURN;
3858: END IF;
3859:
3860: IF (x_account_assignment_id IS NULL) THEN

Line 3861: x_return_status := fnd_api.g_ret_sts_error;

3857: RETURN;
3858: END IF;
3859:
3860: IF (x_account_assignment_id IS NULL) THEN
3861: x_return_status := fnd_api.g_ret_sts_error;
3862: RETURN;
3863: END IF;
3864:
3865: EXCEPTION

Line 3866: WHEN FND_API.G_EXC_ERROR THEN

3862: RETURN;
3863: END IF;
3864:
3865: EXCEPTION
3866: WHEN FND_API.G_EXC_ERROR THEN
3867: x_return_status := fnd_api.g_ret_sts_error;
3868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3869: x_return_status := fnd_api.g_ret_sts_error;
3870: END get_bank_info;

Line 3867: x_return_status := fnd_api.g_ret_sts_error;

3863: END IF;
3864:
3865: EXCEPTION
3866: WHEN FND_API.G_EXC_ERROR THEN
3867: x_return_status := fnd_api.g_ret_sts_error;
3868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3869: x_return_status := fnd_api.g_ret_sts_error;
3870: END get_bank_info;
3871: */

Line 3868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3864:
3865: EXCEPTION
3866: WHEN FND_API.G_EXC_ERROR THEN
3867: x_return_status := fnd_api.g_ret_sts_error;
3868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3869: x_return_status := fnd_api.g_ret_sts_error;
3870: END get_bank_info;
3871: */
3872: -----------------------------------------------------------------------

Line 3869: x_return_status := fnd_api.g_ret_sts_error;

3865: EXCEPTION
3866: WHEN FND_API.G_EXC_ERROR THEN
3867: x_return_status := fnd_api.g_ret_sts_error;
3868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3869: x_return_status := fnd_api.g_ret_sts_error;
3870: END get_bank_info;
3871: */
3872: -----------------------------------------------------------------------
3873: --Start of Comments

Line 3991: x_return_status := fnd_api.g_ret_sts_success;

3987: x_msg_count NUMBER;
3988: x_msg_data VARCHAR2(1000);
3989:
3990: BEGIN
3991: x_return_status := fnd_api.g_ret_sts_success;
3992:
3993: BEGIN
3994: SELECT cc.instrid,
3995: cc.expirydate,

Line 4020: x_return_status := fnd_api.g_ret_sts_error;

4016: l_card_exists := 'N';
4017: END;
4018: IF (Nvl(l_card_exists,'N') = 'Y' AND
4019: Nvl(l_expiry_date,Trunc(SYSDATE)) < Trunc(SYSDATE)) THEN
4020: x_return_status := fnd_api.g_ret_sts_error;
4021: FND_MESSAGE.set_name( 'PON', 'CREDIT_CARD_EXPIRED' );
4022: FND_MESSAGE.SET_TOKEN('CCNUM',To_Char(p_credit_card_num));
4023: FND_MSG_PUB.ADD;
4024: RETURN;

Line 4049: IBY_CREDITCARD_PKG.Create_Card(FND_API.G_FALSE,

4045: END IF;
4046: l_active_flag := 'Y';
4047: l_issuer := p_card_issuer_code;
4048:
4049: IBY_CREDITCARD_PKG.Create_Card(FND_API.G_FALSE,
4050: l_owner_id,
4051: l_holder_name,
4052: l_billing_address_id,
4053: l_address_type,

Line 4108: x_return_status := fnd_api.g_ret_sts_error;

4104:
4105:
4106: IF (x_instr_id IS NULL) THEN
4107: IF (x_result_code = iby_creditcard_pkg.G_RC_INVALID_CCNUMBER) THEN
4108: x_return_status := fnd_api.g_ret_sts_error;
4109: FND_MESSAGE.set_name( 'PON', 'CREDIT_CARD_NUMBER_NOT_VALID' );
4110: FND_MESSAGE.SET_TOKEN('CCNUM',l_card_number);
4111: FND_MSG_PUB.ADD;
4112: RETURN;

Line 4114: x_return_status := fnd_api.g_ret_sts_error;

4110: FND_MESSAGE.SET_TOKEN('CCNUM',l_card_number);
4111: FND_MSG_PUB.ADD;
4112: RETURN;
4113: ELSIF (x_result_code = iby_creditcard_pkg.G_RC_INVALID_CCEXPIRY) THEN
4114: x_return_status := fnd_api.g_ret_sts_error;
4115: FND_MESSAGE.set_name( 'PON', 'CREDIT_CARD_EXPIRED' );
4116: FND_MESSAGE.SET_TOKEN('CCNUM',l_card_number);
4117: FND_MSG_PUB.ADD;
4118: RETURN;

Line 4120: x_return_status := fnd_api.g_ret_sts_error;

4116: FND_MESSAGE.SET_TOKEN('CCNUM',l_card_number);
4117: FND_MSG_PUB.ADD;
4118: RETURN;
4119: ELSIF (x_result_code = iby_creditcard_pkg.G_RC_INVALID_CARD_ISSUER) THEN
4120: x_return_status := fnd_api.g_ret_sts_error;
4121: FND_MESSAGE.set_name( 'PON', 'CREDIT_CARD_ISSUER_NOT_VALID' );
4122: FND_MESSAGE.SET_NAME('CCISSUER',l_issuer);
4123: FND_MSG_PUB.ADD;
4124: RETURN;

Line 4136: FND_API.G_FALSE,

4132: l_payer.Cust_Account_Id := p_cust_account_id;
4133: l_payer.Account_Site_Id := p_site_use_id;
4134:
4135: IBY_FNDCPT_SETUP_PUB.Set_Payer_Attributes(1.0,
4136: FND_API.G_FALSE,
4137: FND_API.G_FALSE,
4138: x_return_status,
4139: x_msg_count,
4140: x_msg_data,

Line 4137: FND_API.G_FALSE,

4133: l_payer.Account_Site_Id := p_site_use_id;
4134:
4135: IBY_FNDCPT_SETUP_PUB.Set_Payer_Attributes(1.0,
4136: FND_API.G_FALSE,
4137: FND_API.G_FALSE,
4138: x_return_status,
4139: x_msg_count,
4140: x_msg_data,
4141: l_payer,

Line 4146: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

4142: x_payer_attributes,
4143: x_payer_attribs_id,
4144: x_set_payer_response);
4145:
4146: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4147: RETURN;
4148: END IF;
4149: IF (x_payer_attribs_id IS NULL) THEN
4150: x_return_status := fnd_api.g_ret_sts_error;

Line 4150: x_return_status := fnd_api.g_ret_sts_error;

4146: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4147: RETURN;
4148: END IF;
4149: IF (x_payer_attribs_id IS NULL) THEN
4150: x_return_status := fnd_api.g_ret_sts_error;
4151: RETURN;
4152: END IF;
4153:
4154:

Line 4155: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

4151: RETURN;
4152: END IF;
4153:
4154:
4155: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND
4156: (x_set_payer_response.result_code = IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS)) THEN
4157: l_channel_assignment.Pmt_Channel_Code := 'CREDIT_CARD';
4158: IBY_FNDCPT_SETUP_PUB.Set_Payer_Default_Pmt_Channel
4159: ( 1.0,

Line 4160: FND_API.G_FALSE,

4156: (x_set_payer_response.result_code = IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS)) THEN
4157: l_channel_assignment.Pmt_Channel_Code := 'CREDIT_CARD';
4158: IBY_FNDCPT_SETUP_PUB.Set_Payer_Default_Pmt_Channel
4159: ( 1.0,
4160: FND_API.G_FALSE,
4161: FND_API.G_FALSE,
4162: x_return_status,
4163: x_msg_count,
4164: x_msg_data,

Line 4161: FND_API.G_FALSE,

4157: l_channel_assignment.Pmt_Channel_Code := 'CREDIT_CARD';
4158: IBY_FNDCPT_SETUP_PUB.Set_Payer_Default_Pmt_Channel
4159: ( 1.0,
4160: FND_API.G_FALSE,
4161: FND_API.G_FALSE,
4162: x_return_status,
4163: x_msg_count,
4164: x_msg_data,
4165: l_payer,

Line 4172: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

4168: x_pmt_channel_response);
4169:
4170: END IF;
4171:
4172: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4173: RETURN;
4174: END IF;
4175:
4176: IF (x_channel_assignment_id IS NULL) THEN

Line 4177: x_return_status := fnd_api.g_ret_sts_error;

4173: RETURN;
4174: END IF;
4175:
4176: IF (x_channel_assignment_id IS NULL) THEN
4177: x_return_status := fnd_api.g_ret_sts_error;
4178: RETURN;
4179: END IF;
4180:
4181:

Line 4182: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

4178: RETURN;
4179: END IF;
4180:
4181:
4182: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND
4183: (x_pmt_channel_response.result_code = IBY_FNDCPT_COMMON_PUB.G_RC_SUCCESS)) THEN
4184: BEGIN
4185: SELECT instrument_payment_use_id
4186: INTO x_card_assignment_id

Line 4198: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND

4194: END;
4195: END IF;
4196:
4197:
4198: IF ((x_return_status = FND_API.G_RET_STS_SUCCESS) AND
4199: (NVL(l_instrument_exists,'N') = 'N')) THEN
4200: l_instrument.instrument_type := 'CREDITCARD';
4201: l_instrument.instrument_id := x_instr_id;
4202: l_assignment_attribs.instrument := l_instrument;

Line 4206: FND_API.G_FALSE,

4202: l_assignment_attribs.instrument := l_instrument;
4203: l_assignment_attribs.start_date := Trunc(SYSDATE);
4204:
4205: IBY_FNDCPT_SETUP_PUB.Set_Payer_Instr_Assignment(1.0,
4206: FND_API.G_FALSE,
4207: FND_API.G_FALSE,
4208: x_return_status,
4209: x_msg_count,
4210: x_msg_data,

Line 4207: FND_API.G_FALSE,

4203: l_assignment_attribs.start_date := Trunc(SYSDATE);
4204:
4205: IBY_FNDCPT_SETUP_PUB.Set_Payer_Instr_Assignment(1.0,
4206: FND_API.G_FALSE,
4207: FND_API.G_FALSE,
4208: x_return_status,
4209: x_msg_count,
4210: x_msg_data,
4211: l_payer,

Line 4217: IF (x_return_status = fnd_api.g_ret_sts_error) THEN

4213: x_card_assignment_id,
4214: x_inst_response);
4215: END IF;
4216:
4217: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
4218: RETURN;
4219: END IF;
4220:
4221: IF (x_card_assignment_id IS NULL) THEN

Line 4222: x_return_status := fnd_api.g_ret_sts_error;

4218: RETURN;
4219: END IF;
4220:
4221: IF (x_card_assignment_id IS NULL) THEN
4222: x_return_status := fnd_api.g_ret_sts_error;
4223: RETURN;
4224: END IF;
4225:
4226: EXCEPTION

Line 4227: WHEN FND_API.G_EXC_ERROR THEN

4223: RETURN;
4224: END IF;
4225:
4226: EXCEPTION
4227: WHEN FND_API.G_EXC_ERROR THEN
4228: x_return_status := fnd_api.g_ret_sts_error;
4229: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4230: x_return_status := fnd_api.g_ret_sts_error;
4231: END get_credit_card_info;

Line 4228: x_return_status := fnd_api.g_ret_sts_error;

4224: END IF;
4225:
4226: EXCEPTION
4227: WHEN FND_API.G_EXC_ERROR THEN
4228: x_return_status := fnd_api.g_ret_sts_error;
4229: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4230: x_return_status := fnd_api.g_ret_sts_error;
4231: END get_credit_card_info;
4232: */

Line 4229: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4225:
4226: EXCEPTION
4227: WHEN FND_API.G_EXC_ERROR THEN
4228: x_return_status := fnd_api.g_ret_sts_error;
4229: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4230: x_return_status := fnd_api.g_ret_sts_error;
4231: END get_credit_card_info;
4232: */
4233: -----------------------------------------------------------------------

Line 4230: x_return_status := fnd_api.g_ret_sts_error;

4226: EXCEPTION
4227: WHEN FND_API.G_EXC_ERROR THEN
4228: x_return_status := fnd_api.g_ret_sts_error;
4229: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4230: x_return_status := fnd_api.g_ret_sts_error;
4231: END get_credit_card_info;
4232: */
4233: -----------------------------------------------------------------------
4234: --Start of Comments

Line 4265: x_return_status := fnd_api.g_ret_sts_success;

4261: x_return_status OUT NOCOPY VARCHAR2)
4262: IS
4263:
4264: BEGIN
4265: x_return_status := fnd_api.g_ret_sts_success;
4266:
4267: SELECT CUST_TRX_NUMBER,
4268: CUST_TRX_ID,
4269: CUST_TRX_LINE_ID,

Line 4284: x_return_status := fnd_api.g_ret_sts_error;

4280: EXCEPTION
4281: WHEN No_Data_Found THEN
4282: FND_MESSAGE.SET_NAME('PON','DEPOSIT_TRX_NOT_FOUND');
4283: FND_MSG_PUB.ADD;
4284: x_return_status := fnd_api.g_ret_sts_error;
4285: END getTrxInfoFromParentTrx;
4286:
4287: -----------------------------------------------------------------------
4288: --Start of Comments

Line 4322: x_return_status := FND_API.G_RET_STS_SUCCESS;

4318: IS
4319:
4320: BEGIN
4321:
4322: x_return_status := FND_API.G_RET_STS_SUCCESS;
4323:
4324: BEGIN
4325: SELECT Max(acr.cash_receipt_id),
4326: Max(arp.receivable_application_id)

Line 4345: x_return_status := FND_API.G_RET_STS_ERROR;

4341: AND arp.cash_receipt_id= acr.cash_receipt_id
4342: AND arp.amount_applied > 0;
4343: EXCEPTION
4344: WHEN NO_DATA_FOUND THEN
4345: x_return_status := FND_API.G_RET_STS_ERROR;
4346: FND_MESSAGE.SET_NAME('PON','RECEIPT_NOT_CRE_FOR_DEPOSIT');
4347: FND_MESSAGE.SET_TOKEN('DEPOSIT_TRX_NUM',p_parent_trx_number);
4348: FND_MSG_PUB.ADD;
4349: x_receipt_num := NULL;

Line 4354: x_return_status := FND_API.G_RET_STS_ERROR;

4350: x_cash_receipt_id := NULL;
4351: x_receipt_status := NULL;
4352: RETURN;
4353: WHEN TOO_MANY_ROWS THEN
4354: x_return_status := FND_API.G_RET_STS_ERROR;
4355: RETURN;
4356: END;
4357: IF (x_cash_receipt_id IS NOT NULL) THEN
4358: BEGIN

Line 4371: x_return_status := FND_API.G_RET_STS_ERROR;

4367: AND acrh.status = 'CLEARED'
4368: AND acr.cash_receipt_id = x_cash_receipt_id;
4369: EXCEPTION
4370: WHEN NO_DATA_FOUND THEN
4371: x_return_status := FND_API.G_RET_STS_ERROR;
4372: FND_MESSAGE.SET_NAME('PON','RECEIPT_NOT_CLEARED');
4373: FND_MESSAGE.SET_TOKEN('DEPOSIT_TRX_NUM',p_parent_trx_number);
4374: FND_MESSAGE.SET_TOKEN('RECEIPT_NUM',x_receipt_num);
4375: FND_MSG_PUB.ADD;

Line 4381: x_return_status := FND_API.G_RET_STS_ERROR;

4377: x_cash_receipt_id := NULL;
4378: x_receipt_status := NULL;
4379: RETURN;
4380: WHEN TOO_MANY_ROWS THEN
4381: x_return_status := FND_API.G_RET_STS_ERROR;
4382: RETURN;
4383: END;
4384: END IF;
4385: EXCEPTION

Line 4387: x_return_status := FND_API.G_RET_STS_ERROR;

4383: END;
4384: END IF;
4385: EXCEPTION
4386: WHEN NO_DATA_FOUND THEN
4387: x_return_status := FND_API.G_RET_STS_ERROR;
4388: x_receipt_num := NULL;
4389: x_cash_receipt_id := NULL;
4390: x_receipt_status := NULL;
4391: WHEN TOO_MANY_ROWS THEN

Line 4392: x_return_status := FND_API.G_RET_STS_ERROR;

4388: x_receipt_num := NULL;
4389: x_cash_receipt_id := NULL;
4390: x_receipt_status := NULL;
4391: WHEN TOO_MANY_ROWS THEN
4392: x_return_status := FND_API.G_RET_STS_ERROR;
4393: END getReceiptInfoOfParentTrx;
4394:
4395: -----------------------------------------------------------------------
4396: --Start of Comments

Line 4424: x_return_status := FND_API.G_RET_STS_SUCCESS;

4420: l_auction_status pon_auction_headers_all.AUCTION_STATUS%TYPE;
4421: l_document_num pon_auction_headers_all.document_number%TYPE;
4422: BEGIN
4423:
4424: x_return_status := FND_API.G_RET_STS_SUCCESS;
4425:
4426: BEGIN
4427: SELECT ORG_ID,
4428: AUCTION_STATUS,

Line 4440: x_return_status := FND_API.G_RET_STS_ERROR;

4436: WHEN no_data_found THEN
4437: FND_MESSAGE.SET_NAME('PON','NEGOTIATION_NOT_FOUND');
4438: FND_MESSAGE.SET_TOKEN('AUCTION',l_document_num);
4439: FND_MSG_PUB.ADD;
4440: x_return_status := FND_API.G_RET_STS_ERROR;
4441: END;
4442:
4443: IF (l_auction_status <> 'ACTIVE') THEN
4444: IF (p_transaction_type_code NOT IN (G_EMD_FORFEIT,G_EMD_REFUND))

Line 4449: x_return_status := FND_API.G_RET_STS_ERROR;

4445: THEN
4446: FND_MESSAGE.SET_NAME('PON','NEGOTIATION_NOT_ACTIVE');
4447: FND_MESSAGE.SET_TOKEN('AUCTION',l_document_num);
4448: FND_MSG_PUB.ADD;
4449: x_return_status := FND_API.G_RET_STS_ERROR;
4450: END IF;
4451: END IF;
4452:
4453:

Line 4455: x_return_status := FND_API.G_RET_STS_ERROR;

4451: END IF;
4452:
4453:
4454: IF (p_emd_transaction_rec.transaction_date IS NULL ) THEN
4455: x_return_status := FND_API.G_RET_STS_ERROR;
4456: FND_MESSAGE.set_name( 'PON', 'TRX_DATE_IS_NULL' );
4457: FND_MSG_PUB.ADD;
4458: RETURN;
4459: END IF;

Line 4465: x_return_status := FND_API.G_RET_STS_ERROR;

4461: Relaxing the validation after discussing with PM
4462: IF (p_transaction_type_code = G_EMD_DEPOSIT) THEN
4463: IF (p_emd_transaction_rec.emd_due_date IS NOT null) THEN
4464: IF NOT (p_emd_transaction_rec.transaction_date <= p_emd_transaction_rec.emd_due_date) THEN
4465: x_return_status := FND_API.G_RET_STS_ERROR;
4466: FND_MESSAGE.set_name( 'PON', 'TRX_DATE_EXC_EMD_DUE_DATE' );
4467: FND_MSG_PUB.ADD;
4468: RETURN;
4469: END IF;

Line 4475: x_return_status := FND_API.G_RET_STS_ERROR;

4471: END IF;
4472: */
4473: IF (p_transaction_type_code = G_EMD_DEPOSIT) THEN
4474: IF (p_emd_transaction_rec.emd_amount IS null) THEN
4475: x_return_status := FND_API.G_RET_STS_ERROR;
4476: FND_MESSAGE.set_name( 'PON', 'EMD_AMT_NULL_ON_NEG' );
4477: FND_MESSAGE.SET_TOKEN('AUCTION',l_document_num);
4478: FND_MSG_PUB.ADD;
4479: RETURN;

Line 4488: x_return_status := FND_API.G_RET_STS_ERROR;

4484: print_log('Set of books id: '||ARP_GLOBAL.sysparam.set_of_books_id);
4485: print_log('transaction_date: '||To_Char(p_emd_transaction_rec.transaction_date));
4486: BEGIN
4487: IF NOT (arp_util.is_gl_date_valid(p_emd_transaction_rec.transaction_date)) THEN
4488: x_return_status := FND_API.G_RET_STS_ERROR;
4489: FND_MESSAGE.set_name( 'PON', 'TRX_DATE_NOT_IN_GL_PERIOD_O_F' );
4490: FND_MESSAGE.set_token('TRX_DATE',TO_CHAR(p_emd_transaction_rec.transaction_date));
4491: FND_MSG_PUB.ADD;
4492: RETURN;

Line 4497: x_return_status := FND_API.G_RET_STS_ERROR;

4493: END IF;
4494:
4495: EXCEPTION
4496: WHEN No_Data_Found THEN
4497: x_return_status := FND_API.G_RET_STS_ERROR;
4498: FND_MESSAGE.set_name( 'PON', 'TRX_DATE_NOT_IN_GL_PERIOD_O_F' );
4499: FND_MESSAGE.set_token('TRX_DATE',TO_CHAR(p_emd_transaction_rec.transaction_date));
4500: FND_MSG_PUB.ADD;
4501: RETURN;

Line 4503: x_return_status := FND_API.G_RET_STS_ERROR;

4499: FND_MESSAGE.set_token('TRX_DATE',TO_CHAR(p_emd_transaction_rec.transaction_date));
4500: FND_MSG_PUB.ADD;
4501: RETURN;
4502: WHEN OTHERS THEN
4503: x_return_status := FND_API.G_RET_STS_ERROR;
4504: FND_MESSAGE.set_name( 'PON', 'TRX_DATE_NOT_IN_GL_PERIOD_O_F' );
4505: FND_MESSAGE.set_token('TRX_DATE',TO_CHAR(p_emd_transaction_rec.transaction_date));
4506: FND_MSG_PUB.ADD;
4507: RETURN;

Line 4523: x_return_status := FND_API.G_RET_STS_ERROR;

4519: AND closing_status in ('O', 'F')
4520: AND NVL(adjustment_period_flag, 'N') = 'N';
4521: EXCEPTION
4522: WHEN No_Data_Found THEN
4523: x_return_status := FND_API.G_RET_STS_ERROR;
4524: FND_MESSAGE.set_name( 'PON', 'TRX_DATE_NOT_IN_AP_PERIOD_O_F' );
4525: FND_MESSAGE.set_token('TRX_DATE',TO_CHAR(p_emd_transaction_rec.transaction_date));
4526: FND_MSG_PUB.ADD;
4527: RETURN;

Line 4529: x_return_status := FND_API.G_RET_STS_ERROR;

4525: FND_MESSAGE.set_token('TRX_DATE',TO_CHAR(p_emd_transaction_rec.transaction_date));
4526: FND_MSG_PUB.ADD;
4527: RETURN;
4528: WHEN OTHERS THEN
4529: x_return_status := FND_API.G_RET_STS_ERROR;
4530: FND_MESSAGE.set_name( 'PON', 'TRX_DATE_NOT_IN_AP_PERIOD_O_F' );
4531: FND_MESSAGE.set_token('TRX_DATE',TO_CHAR(p_emd_transaction_rec.transaction_date));
4532: FND_MSG_PUB.ADD;
4533: RETURN;

Line 4538: WHEN FND_API.G_EXC_ERROR THEN

4534: END;
4535: END IF;
4536:
4537: EXCEPTION
4538: WHEN FND_API.G_EXC_ERROR THEN
4539: x_return_status := FND_API.G_RET_STS_ERROR;
4540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4541: x_return_status := FND_API.G_RET_STS_ERROR;
4542: END validate_trx_info;

Line 4539: x_return_status := FND_API.G_RET_STS_ERROR;

4535: END IF;
4536:
4537: EXCEPTION
4538: WHEN FND_API.G_EXC_ERROR THEN
4539: x_return_status := FND_API.G_RET_STS_ERROR;
4540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4541: x_return_status := FND_API.G_RET_STS_ERROR;
4542: END validate_trx_info;
4543:

Line 4540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4536:
4537: EXCEPTION
4538: WHEN FND_API.G_EXC_ERROR THEN
4539: x_return_status := FND_API.G_RET_STS_ERROR;
4540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4541: x_return_status := FND_API.G_RET_STS_ERROR;
4542: END validate_trx_info;
4543:
4544: -----------------------------------------------------------------------

Line 4541: x_return_status := FND_API.G_RET_STS_ERROR;

4537: EXCEPTION
4538: WHEN FND_API.G_EXC_ERROR THEN
4539: x_return_status := FND_API.G_RET_STS_ERROR;
4540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4541: x_return_status := FND_API.G_RET_STS_ERROR;
4542: END validate_trx_info;
4543:
4544: -----------------------------------------------------------------------
4545: --Start of Comments

Line 4624: x_return_status := fnd_api.g_ret_sts_success;

4620: l_organization_name hr_operating_units.NAME%TYPE;
4621: l_ra_batch_source_id NUMBER(15);
4622:
4623: BEGIN
4624: x_return_status := fnd_api.g_ret_sts_success;
4625:
4626: BEGIN
4627: SELECT name
4628: INTO l_organization_name

Line 4633: x_return_status := fnd_api.g_ret_sts_error;

4629: FROM hr_operating_units
4630: WHERE organization_id = p_org_id;
4631: EXCEPTION
4632: WHEN OTHERS THEN
4633: x_return_status := fnd_api.g_ret_sts_error;
4634: FND_MESSAGE.SET_NAME('PON','ORG_NOT_FOUND_IN_HR');
4635: FND_MESSAGE.SET_TOKEN('ORG_ID',To_Char(p_org_id));
4636: RETURN;
4637: END;

Line 4640: x_return_status := fnd_api.g_ret_sts_error;

4636: RETURN;
4637: END;
4638:
4639: IF (Nvl(p_emd_fin_integration,'N') <> 'Y') THEN
4640: x_return_status := fnd_api.g_ret_sts_error;
4641: FND_MESSAGE.SET_NAME('PON','PON_EMD_FIN_INTG_NOT_ENABLED');
4642: FND_MESSAGE.SET_TOKEN('ORG', l_organization_name);
4643: FND_MSG_PUB.ADD;
4644: RETURN;

Line 4648: x_return_status := fnd_api.g_ret_sts_error;

4644: RETURN;
4645: END IF;
4646:
4647: IF (p_ra_trx_type_id = NULL) THEN
4648: x_return_status := fnd_api.g_ret_sts_error;
4649: FND_MESSAGE.SET_NAME('PON','TRX_TYPE_NOT_IN_DEFINED_SETUP');
4650: FND_MSG_PUB.ADD;
4651: RETURN;
4652: END IF;

Line 4693: x_return_status := fnd_api.g_ret_sts_error;

4689: WHERE CUST_TRX_TYPE_ID = p_ra_trx_type_id
4690: AND org_id = p_org_id;
4691: EXCEPTION
4692: WHEN No_Data_Found THEN
4693: x_return_status := fnd_api.g_ret_sts_error;
4694: FND_MESSAGE.SET_NAME('PON','RA_TRX_TYPE_NOT_FOUND_IN_AR');
4695: FND_MSG_PUB.ADD;
4696: RETURN;
4697: END;

Line 4701: x_return_status := fnd_api.g_ret_sts_error;

4697: END;
4698:
4699: IF NOT((Trunc(SYSDATE) >= l_start_date) AND
4700: (Trunc(SYSDATE) < Nvl(l_end_date,Trunc(SYSDATE + 1)))) THEN
4701: x_return_status := fnd_api.g_ret_sts_error;
4702: FND_MESSAGE.SET_NAME('PON','RA_TRX_TYPE_NOT_ACTIVE');
4703: FND_MESSAGE.set_token('TRX_TYPE',l_deposit_trx_name);
4704: FND_MSG_PUB.ADD;
4705: RETURN;

Line 4721: x_return_status := fnd_api.g_ret_sts_error;

4717: l_creation_sign <> 'P' OR
4718: l_subsequent_trx_type_id IS NULL OR
4719: l_default_status <> 'OP') THEN
4720:
4721: x_return_status := fnd_api.g_ret_sts_error;
4722: FND_MESSAGE.SET_NAME('PON','TRX_TYPE_INFO_NOT_VALID');
4723: FND_MESSAGE.set_token('TRX_TYPE',l_deposit_trx_name);
4724: FND_MSG_PUB.ADD;
4725: RETURN;

Line 4735: x_return_status := fnd_api.g_ret_sts_error;

4731: WHERE CUST_TRX_TYPE_ID = p_ra_trx_type_id
4732: AND org_id = p_org_id;
4733: print_log('l_credit_memo_type_id:'||l_credit_memo_type_id);
4734: IF (l_credit_memo_type_id IS NULL) THEN
4735: x_return_status := fnd_api.g_ret_sts_error;
4736: FND_MESSAGE.SET_NAME('PON','CM_TYPE_NOT_IN_DEP_TRX_TYPE');
4737: FND_MSG_PUB.ADD;
4738: RETURN;
4739: ELSE

Line 4774: x_return_status := fnd_api.g_ret_sts_error;

4770: AND org_id = p_org_id;
4771: print_log('l_start_date:'||l_start_date||' l_end_date:'||l_end_date);
4772: IF NOT((Trunc(SYSDATE) >= l_start_date) AND
4773: (Trunc(SYSDATE) < Nvl(l_end_date,Trunc(SYSDATE + 1)))) THEN
4774: x_return_status := fnd_api.g_ret_sts_error;
4775: FND_MESSAGE.SET_NAME('PON','RA_TRX_TYPE_NOT_ACTIVE');
4776: FND_MESSAGE.set_token('TRX_TYPE',l_cm_trx_name);
4777: FND_MSG_PUB.ADD;
4778: RETURN;

Line 4793: x_return_status := fnd_api.g_ret_sts_error;

4789: l_gl_id_rev IS NULL OR
4790: l_creation_sign <> 'N' OR
4791: l_default_status <> 'OP') THEN
4792:
4793: x_return_status := fnd_api.g_ret_sts_error;
4794: FND_MESSAGE.SET_NAME('PON','CM_TRX_TYPE_INFO_NOT_VALID');
4795: FND_MESSAGE.set_token('TRX_TYPE',l_cm_trx_name);
4796: FND_MSG_PUB.ADD;
4797: RETURN;

Line 4808: x_return_status := fnd_api.g_ret_sts_error;

4804: WHERE CUST_TRX_TYPE_ID = p_ra_trx_type_id
4805: AND org_id = p_org_id;
4806:
4807: IF (l_subsequent_trx_type_id IS NULL) THEN
4808: x_return_status := fnd_api.g_ret_sts_error;
4809: FND_MESSAGE.SET_NAME('PON','INV_TYP_NOT_IN_DEP_TRX_TYP');
4810: FND_MSG_PUB.ADD;
4811: RETURN;
4812: ELSE

Line 4847: x_return_status := fnd_api.g_ret_sts_error;

4843: AND org_id = p_org_id;
4844:
4845: IF NOT((Trunc(SYSDATE) >= l_start_date) AND
4846: (Trunc(SYSDATE) < Nvl(l_end_date,Trunc(SYSDATE + 1)))) THEN
4847: x_return_status := fnd_api.g_ret_sts_error;
4848: FND_MESSAGE.SET_NAME('PON','RA_TRX_TYPE_NOT_ACTIVE');
4849: FND_MESSAGE.set_token('TRX_TYPE',l_invoice_trx_name);
4850: FND_MSG_PUB.ADD;
4851: RETURN;

Line 4866: x_return_status := fnd_api.g_ret_sts_error;

4862: l_gl_id_rev IS NULL OR
4863: l_creation_sign NOT IN ('P','A') OR
4864: l_default_status <> 'OP') THEN
4865:
4866: x_return_status := fnd_api.g_ret_sts_error;
4867: FND_MESSAGE.SET_NAME('PON','INV_TRX_TYPE_INFO_NOT_VALID');
4868: FND_MESSAGE.set_token('TRX_TYPE',l_invoice_trx_name);
4869: FND_MSG_PUB.ADD;
4870: RETURN;

Line 4884: x_return_status := fnd_api.g_ret_sts_error;

4880: l_ra_batch_source_id := p_ra_import_batch_source_id;
4881: END IF;
4882:
4883: IF (l_ra_batch_source_id IS NULL) THEN
4884: x_return_status := fnd_api.g_ret_sts_error;
4885: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_SOUR_NOT_IN_SETUP');
4886: FND_MSG_PUB.ADD;
4887: RETURN;
4888: ELSE

Line 4909: x_return_status := fnd_api.g_ret_sts_error;

4905: WHERE BATCH_SOURCE_ID = l_ra_batch_source_id
4906: AND ORG_ID = p_org_id;
4907: EXCEPTION
4908: WHEN No_Data_Found THEN
4909: x_return_status := fnd_api.g_ret_sts_error;
4910: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_SOURCE_NOT_DEF');
4911: FND_MSG_PUB.ADD;
4912: RETURN;
4913: END;

Line 4925: x_return_status := fnd_api.g_ret_sts_error;

4921: print_log('l_allow_dup_trx_num_flag:'||l_allow_dup_trx_num_flag);
4922: print_log('l_credit_memo_batch_source_id:'||l_credit_memo_batch_source_id);
4923:
4924: IF (l_batch_source_status <> 'A') THEN
4925: x_return_status := fnd_api.g_ret_sts_error;
4926: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_SOURCE_NOT_ACTIVE');
4927: fnd_message.set_token('BATCH_SOURCE',l_batch_source_name);
4928: FND_MSG_PUB.ADD;
4929: RETURN;

Line 4940: x_return_status := fnd_api.g_ret_sts_error;

4936: (l_batch_source_type <> 'INV') ) OR
4937: ( (p_transaction_type_code = G_EMD_FORFEIT) AND
4938: (l_batch_source_type <> 'FOREIGN') ) )
4939: ) THEN
4940: x_return_status := fnd_api.g_ret_sts_error;
4941: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_INFO_NOT_VALID');
4942: FND_MESSAGE.SET_TOKEN('BATCH_SOURCE',l_batch_source_name);
4943: FND_MSG_PUB.ADD;
4944: RETURN;

Line 4966: x_return_status := fnd_api.g_ret_sts_error;

4962: WHERE BATCH_SOURCE_ID = l_credit_memo_batch_source_id
4963: AND ORG_ID = p_org_id;
4964: EXCEPTION
4965: WHEN No_Data_Found THEN
4966: x_return_status := fnd_api.g_ret_sts_error;
4967: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_SOURCE_NOT_DEF');
4968: FND_MSG_PUB.ADD;
4969: RETURN;
4970: END;

Line 4973: x_return_status := fnd_api.g_ret_sts_error;

4969: RETURN;
4970: END;
4971:
4972: IF (l_cr_batch_source_status <> 'A') THEN
4973: x_return_status := fnd_api.g_ret_sts_error;
4974: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_SOURCE_NOT_ACTIVE');
4975: fnd_message.set_token('BATCH_SOURCE',l_credit_batch_source_name);
4976: FND_MSG_PUB.ADD;
4977: RETURN;

Line 4983: x_return_status := fnd_api.g_ret_sts_error;

4979: IF ((Nvl(l_cr_auto_batch_numbering_flag,'N') <> 'Y') OR
4980: (Nvl(l_cr_auto_trx_numbering_flag,'N') <> 'Y') OR
4981: (Nvl(l_cr_allow_dup_trx_num_flag,'N') <> 'N') OR
4982: (l_cr_batch_source_type <> 'INV')) THEN
4983: x_return_status := fnd_api.g_ret_sts_error;
4984: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_INFO_NOT_VALID');
4985: FND_MESSAGE.SET_TOKEN('BATCH_SOURCE',l_credit_batch_source_name);
4986: FND_MSG_PUB.ADD;
4987: RETURN;

Line 4997: x_return_status := fnd_api.g_ret_sts_error;

4993:
4994: IF (p_transaction_type_code in (G_EMD_DEPOSIT)) THEN
4995:
4996: IF (p_memo_line_id IS NULL) THEN
4997: x_return_status := fnd_api.g_ret_sts_error;
4998: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_NOT_IN_SETUP');
4999: FND_MSG_PUB.ADD;
5000: RETURN;
5001: ELSE

Line 5018: x_return_status := fnd_api.g_ret_sts_error;

5014: WHERE ORG_ID = p_org_id
5015: AND MEMO_LINE_ID = p_memo_line_id;
5016: EXCEPTION
5017: WHEN No_Data_Found THEN
5018: x_return_status := fnd_api.g_ret_sts_error;
5019: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_NOT_DEF_IN_AR');
5020: FND_MSG_PUB.ADD;
5021: RETURN;
5022: END;

Line 5026: x_return_status := fnd_api.g_ret_sts_error;

5022: END;
5023:
5024: IF NOT ((Trunc(SYSDATE) >= l_memo_line_start_date) AND
5025: (Trunc(SYSDATE) < Nvl(l_memo_line_end_date,Trunc(SYSDATE+1)))) THEN
5026: x_return_status := fnd_api.g_ret_sts_error;
5027: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_TYPE_NOT_ACTIVE');
5028: FND_MESSAGE.set_token('MEMO_LINE',l_memo_line_name);
5029: FND_MSG_PUB.ADD;
5030: RETURN;

Line 5035: x_return_status := fnd_api.g_ret_sts_error;

5031: END IF;
5032:
5033: IF (l_memo_line_type <> 'LINE' OR
5034: l_memo_line_rev_acc IS NULL) THEN
5035: x_return_status := fnd_api.g_ret_sts_error;
5036: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_INFO_NOT_VALID');
5037: FND_MESSAGE.set_token('MEMO_LINE',l_memo_line_name);
5038: FND_MSG_PUB.ADD;
5039: RETURN;

Line 5046: x_return_status := fnd_api.g_ret_sts_error;

5042: END IF;
5043: print_log('Before G_EMD_FORFEIT IF block');
5044: IF (p_transaction_type_code in (G_EMD_FORFEIT)) THEN
5045: IF (p_memo_line_invoice_id IS NULL) THEN
5046: x_return_status := fnd_api.g_ret_sts_error;
5047: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_NOT_IN_SETUP');
5048: FND_MSG_PUB.ADD;
5049: RETURN;
5050: ELSE

Line 5067: x_return_status := fnd_api.g_ret_sts_error;

5063: WHERE ORG_ID = p_org_id
5064: AND MEMO_LINE_ID = p_memo_line_invoice_id;
5065: EXCEPTION
5066: WHEN No_Data_Found THEN
5067: x_return_status := fnd_api.g_ret_sts_error;
5068: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_NOT_DEF_IN_AR');
5069: FND_MSG_PUB.ADD;
5070: RETURN;
5071: END;

Line 5075: x_return_status := fnd_api.g_ret_sts_error;

5071: END;
5072:
5073: IF NOT ((Trunc(SYSDATE) >= l_memo_line_start_date) AND
5074: (Trunc(SYSDATE) < Nvl(l_memo_line_end_date,Trunc(SYSDATE+1)))) THEN
5075: x_return_status := fnd_api.g_ret_sts_error;
5076: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_TYPE_NOT_ACTIVE');
5077: FND_MESSAGE.set_token('MEMO_LINE',l_memo_line_name);
5078: FND_MSG_PUB.ADD;
5079: RETURN;

Line 5084: x_return_status := fnd_api.g_ret_sts_error;

5080: END IF;
5081:
5082: IF (l_memo_line_type <> 'LINE' OR
5083: l_memo_line_rev_acc IS NULL) THEN
5084: x_return_status := fnd_api.g_ret_sts_error;
5085: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_INFO_NOT_VALID');
5086: FND_MESSAGE.set_token('MEMO_LINE',l_memo_line_name);
5087: FND_MSG_PUB.ADD;
5088: RETURN;

Line 5095: x_return_status := fnd_api.g_ret_sts_error;

5091: END IF;
5092:
5093: IF (p_transaction_type_code IN (G_EMD_DEPOSIT,G_EMD_FORFEIT)) THEN
5094: IF (p_payment_terms_id IS NULL) THEN
5095: x_return_status := fnd_api.g_ret_sts_error;
5096: FND_MESSAGE.SET_NAME('PON','PAYMENT_TERM_NOT_IN_SETUP');
5097: FND_MSG_PUB.ADD;
5098: RETURN;
5099: ELSE

Line 5120: x_return_status := fnd_api.g_ret_sts_error;

5116: AND rt.CALC_DISCOUNT_ON_LINES_FLAG = 'I'
5117: AND rt.term_id = p_payment_terms_id;
5118: EXCEPTION
5119: WHEN No_Data_Found THEN
5120: x_return_status := fnd_api.g_ret_sts_error;
5121: FND_MESSAGE.SET_NAME('PON','PAYMENT_TERM_NOT_DEF_IN_AR');
5122: FND_MSG_PUB.ADD;
5123: RETURN;
5124: END;

Line 5127: x_return_status := fnd_api.g_ret_sts_error;

5123: RETURN;
5124: END;
5125: IF NOT ((Trunc(SYSDATE) >= l_term_start_date) AND
5126: (Trunc(SYSDATE) < Nvl(l_term_end_Date,Trunc(SYSDATE+1)))) THEN
5127: x_return_status := fnd_api.g_ret_sts_error;
5128: FND_MESSAGE.SET_NAME('PON','PAYMENT_TERM_NOT_ACTIVE');
5129: FND_MESSAGE.set_token('PAYMENT_TERM',l_term_name);
5130: FND_MSG_PUB.ADD;
5131: RETURN;

Line 5173: x_return_status := fnd_api.g_ret_sts_success;

5169: l_payment_type_name pon_emd_payment_types_tl.NAME%TYPE;
5170: l_refund_payment_method_name iby_payment_methods_tl.payment_method_name%TYPE;
5171:
5172: BEGIN
5173: x_return_status := fnd_api.g_ret_sts_success;
5174:
5175: BEGIN
5176: SELECT NAME
5177: INTO l_payment_type_name

Line 5182: x_return_status := fnd_api.g_ret_sts_error;

5178: FROM PON_EMD_PAYMENT_TYPES_VL
5179: WHERE PAYMENT_TYPE_CODE=p_payment_type_code
5180: AND ORG_ID = p_org_id;
5181: EXCEPTION WHEN No_Data_Found then
5182: x_return_status := fnd_api.g_ret_sts_error;
5183: print_log('Payment types not found for the operating unit '||p_org_id);
5184: RETURN;
5185: END;
5186:

Line 5189: x_return_status := fnd_api.g_ret_sts_error;

5185: END;
5186:
5187:
5188: IF (p_receipt_method_id IS NULL) THEN
5189: x_return_status := fnd_api.g_ret_sts_error;
5190: FND_MESSAGE.SET_NAME('PON','REC_METH_NOT_DEF_FOR_PAY_TYP');
5191: FND_MESSAGE.SET_TOKEN('PAYMENT_TYPE',p_payment_type_code);
5192: FND_MSG_PUB.ADD;
5193: RETURN;

Line 5212: x_return_status := fnd_api.g_ret_sts_error;

5208: WHERE RM.RECEIPT_CLASS_ID = RC.RECEIPT_CLASS_ID
5209: AND RM.RECEIPT_METHOD_ID = p_receipt_method_id;
5210: EXCEPTION
5211: WHEN No_Data_Found THEN
5212: x_return_status := fnd_api.g_ret_sts_error;
5213: FND_MESSAGE.SET_NAME('PON','RECEIPT_METH_NOT_DEF_IN_AR');
5214: FND_MESSAGE.SET_TOKEN('PAYMENT_TYPE',p_payment_type_code);
5215: FND_MSG_PUB.ADD;
5216: RETURN;

Line 5221: x_return_status := fnd_api.g_ret_sts_error;

5217: END;
5218:
5219: IF NOT ((Trunc(SYSDATE) >= l_rm_start_date) AND
5220: (Trunc(SYSDATE) < Nvl(l_rm_end_date,Trunc(SYSDATE+1)))) THEN
5221: x_return_status := fnd_api.g_ret_sts_error;
5222: FND_MESSAGE.SET_NAME('PON','RECEIPT_METHOD_NOT_ACTIVE');
5223: FND_MESSAGE.set_token('RECEIPT_METHOD',l_receipt_method_name);
5224: FND_MSG_PUB.ADD;
5225: RETURN;

Line 5230: x_return_status := fnd_api.g_ret_sts_error;

5226: END IF;
5227:
5228: IF (p_payment_type_code IN (G_CASH,G_DEMAND_DRAFT,G_CHECK)) THEN
5229: IF (l_receipt_creation_method <> 'MANUAL') THEN
5230: x_return_status := fnd_api.g_ret_sts_error;
5231: FND_MESSAGE.SET_NAME('PON','RECEIPT_CRE_METH_NOT_VALID');
5232: FND_MESSAGE.set_token('RECEIPT_METHOD',l_receipt_method_name);
5233: FND_MSG_PUB.ADD;
5234: RETURN;

Line 5238: x_return_status := fnd_api.g_ret_sts_error;

5234: RETURN;
5235: END IF;
5236:
5237: IF (l_payment_channal_code IS NOT NULL) THEN
5238: x_return_status := fnd_api.g_ret_sts_error;
5239: FND_MESSAGE.SET_NAME('PON','PAY_METH_FOR_NOT_VALID');
5240: FND_MESSAGE.SET_TOKEN('PAYMENT_TYPE',l_payment_type_name);
5241: FND_MESSAGE.set_token('RECEIPT_METHOD',l_receipt_method_name);
5242: FND_MSG_PUB.ADD;

Line 5247: x_return_status := fnd_api.g_ret_sts_error;

5243: RETURN;
5244: END IF;
5245: ELSIF (p_payment_type_code = 'BANK_EFT_XFER') THEN
5246: IF (l_receipt_creation_method <> 'AUTOMATIC') THEN
5247: x_return_status := fnd_api.g_ret_sts_error;
5248: FND_MESSAGE.SET_NAME('PON','RECEIPT_CRE_METH_NOT_VALID');
5249: FND_MESSAGE.set_token('RECEIPT_METHOD',l_receipt_method_name);
5250: FND_MSG_PUB.ADD;
5251: RETURN;

Line 5255: x_return_status := fnd_api.g_ret_sts_error;

5251: RETURN;
5252: END IF;
5253:
5254: IF (l_payment_channal_code <> G_BANK_ACCT_XFER) THEN
5255: x_return_status := fnd_api.g_ret_sts_error;
5256: FND_MESSAGE.SET_NAME('PON','PAY_METH_NOT_VALID');
5257: FND_MESSAGE.SET_TOKEN('PAYMENT_TYPE',l_payment_type_name);
5258: FND_MESSAGE.set_token('RECEIPT_METHOD',l_receipt_method_name);
5259: FND_MSG_PUB.ADD;

Line 5264: x_return_status := fnd_api.g_ret_sts_error;

5260: RETURN;
5261: END IF;
5262: ELSIF (p_payment_type_code = G_CREDIT_CARD) THEN
5263: IF (l_receipt_creation_method <> 'AUTOMATIC') THEN
5264: x_return_status := fnd_api.g_ret_sts_error;
5265: FND_MESSAGE.SET_NAME('PON','RECEIPT_CRE_METH_NOT_VALID');
5266: FND_MESSAGE.set_token('RECEIPT_METHOD',l_receipt_method_name);
5267: FND_MSG_PUB.ADD;
5268: RETURN;

Line 5272: x_return_status := fnd_api.g_ret_sts_error;

5268: RETURN;
5269: END IF;
5270:
5271: IF (l_payment_channal_code <> G_CREDIT_CARD) THEN
5272: x_return_status := fnd_api.g_ret_sts_error;
5273: FND_MESSAGE.SET_NAME('PON','PAY_METH_NOT_VALID');
5274: FND_MESSAGE.SET_TOKEN('PAYMENT_TYPE',l_payment_type_name);
5275: FND_MESSAGE.set_token('RECEIPT_METHOD',l_receipt_method_name);
5276: FND_MSG_PUB.ADD;

Line 5285: x_return_status := fnd_api.g_ret_sts_error;

5281:
5282: IF (p_transaction_type_code = G_EMD_REFUND) THEN
5283: IF ((p_payment_type_code <> G_CREDIT_CARD) AND
5284: (p_refund_payment_method IS NULL)) THEN
5285: x_return_status := fnd_api.g_ret_sts_error;
5286: FND_MESSAGE.SET_NAME('PON','REF_PAY_METH_NOT_IN_SETUP');
5287: FND_MSG_PUB.ADD;
5288: RETURN;
5289: END IF;

Line 5298: x_return_status := fnd_api.g_ret_sts_error;

5294: FROM IBY_PAYMENT_METHODS_VL
5295: WHERE PAYMENT_METHOD_CODE = p_refund_payment_method;
5296: EXCEPTION
5297: WHEN No_Data_Found THEN
5298: x_return_status := fnd_api.g_ret_sts_error;
5299: FND_MESSAGE.SET_NAME('PON','REF_PAY_METH_NOT_VALID');
5300: FND_MESSAGE.SET_TOKEN('PAYMENT_TYPE',l_payment_type_name);
5301: FND_MESSAGE.SET_TOKEN('PAY_METHOD',l_refund_payment_method_name);
5302: FND_MSG_PUB.ADD;

Line 5331: x_return_status := fnd_api.g_ret_sts_success;

5327: l_status varchar2(1);
5328: l_industry varchar2(1);
5329: l_oracle_schema varchar2(30);
5330: BEGIN
5331: x_return_status := fnd_api.g_ret_sts_success;
5332:
5333: --Validate AR installation
5334: BEGIN
5335: l_return_value := fnd_installation.get_app_info(

Line 5345: x_return_status := fnd_api.g_ret_sts_error;

5341:
5342:
5343: if (l_return_value) THEN
5344: if l_status <> 'I' then
5345: x_return_status := fnd_api.g_ret_sts_error;
5346: FND_MESSAGE.SET_NAME('PON','AR_NOT_INSTALLED');
5347: FND_MSG_PUB.ADD;
5348: RETURN;
5349: end if;

Line 5351: x_return_status := fnd_api.g_ret_sts_error;

5347: FND_MSG_PUB.ADD;
5348: RETURN;
5349: end if;
5350: else
5351: x_return_status := fnd_api.g_ret_sts_error;
5352: FND_MESSAGE.SET_NAME('PON','AR_NOT_INSTALLED');
5353: FND_MSG_PUB.ADD;
5354: RETURN;
5355: end if;

Line 5358: x_return_status := fnd_api.g_ret_sts_error;

5354: RETURN;
5355: end if;
5356: EXCEPTION
5357: WHEN OTHERS THEN
5358: x_return_status := fnd_api.g_ret_sts_error;
5359: FND_MESSAGE.SET_NAME('PON','AR_NOT_INSTALLED');
5360: FND_MSG_PUB.ADD;
5361: RETURN;
5362: END;

Line 5374: x_return_status := fnd_api.g_ret_sts_error;

5370: );
5371:
5372: if (l_return_value) THEN
5373: if l_status <> 'I' then
5374: x_return_status := fnd_api.g_ret_sts_error;
5375: FND_MESSAGE.SET_NAME('PON','AP_NOT_INSTALLED');
5376: FND_MSG_PUB.ADD;
5377: RETURN;
5378: end if;

Line 5380: x_return_status := fnd_api.g_ret_sts_error;

5376: FND_MSG_PUB.ADD;
5377: RETURN;
5378: end if;
5379: else
5380: x_return_status := fnd_api.g_ret_sts_error;
5381: FND_MESSAGE.SET_NAME('PON','AP_NOT_INSTALLED');
5382: FND_MSG_PUB.ADD;
5383: RETURN;
5384: end if;

Line 5387: x_return_status := fnd_api.g_ret_sts_error;

5383: RETURN;
5384: end if;
5385: EXCEPTION
5386: WHEN OTHERS THEN
5387: x_return_status := fnd_api.g_ret_sts_error;
5388: FND_MESSAGE.SET_NAME('PON','AP_NOT_INSTALLED');
5389: FND_MSG_PUB.ADD;
5390: RETURN;
5391: END;

Line 5404: x_return_status := fnd_api.g_ret_sts_error;

5400: );
5401:
5402: if (l_return_value) then
5403: if l_status <> 'I' then
5404: x_return_status := fnd_api.g_ret_sts_error;
5405: FND_MESSAGE.SET_NAME('PON','IBY_NOT_INSTALLED');
5406: FND_MSG_PUB.ADD;
5407: RETURN;
5408: end if;

Line 5410: x_return_status := fnd_api.g_ret_sts_error;

5406: FND_MSG_PUB.ADD;
5407: RETURN;
5408: end if;
5409: else
5410: x_return_status := fnd_api.g_ret_sts_error;
5411: FND_MESSAGE.SET_NAME('PON','IBY_NOT_INSTALLED');
5412: FND_MSG_PUB.ADD;
5413: RETURN;
5414: end if;

Line 5417: x_return_status := fnd_api.g_ret_sts_error;

5413: RETURN;
5414: end if;
5415: EXCEPTION
5416: WHEN OTHERS THEN
5417: x_return_status := fnd_api.g_ret_sts_error;
5418: FND_MESSAGE.SET_NAME('PON','IBY_NOT_INSTALLED');
5419: FND_MSG_PUB.ADD;
5420: RETURN;
5421: END;

Line 5434: x_return_status := fnd_api.g_ret_sts_error;

5430: );
5431:
5432: if (l_return_value) then
5433: if l_status <> 'I' then
5434: x_return_status := fnd_api.g_ret_sts_error;
5435: FND_MESSAGE.SET_NAME('PON','GL_NOT_INSTALLED');
5436: FND_MSG_PUB.ADD;
5437: RETURN;
5438: end if;

Line 5440: x_return_status := fnd_api.g_ret_sts_error;

5436: FND_MSG_PUB.ADD;
5437: RETURN;
5438: end if;
5439: else
5440: x_return_status := fnd_api.g_ret_sts_error;
5441: FND_MESSAGE.SET_NAME('PON','GL_NOT_INSTALLED');
5442: FND_MSG_PUB.ADD;
5443: RETURN;
5444: end if;

Line 5447: x_return_status := fnd_api.g_ret_sts_error;

5443: RETURN;
5444: end if;
5445: EXCEPTION
5446: WHEN OTHERS THEN
5447: x_return_status := fnd_api.g_ret_sts_error;
5448: FND_MESSAGE.SET_NAME('PON','GL_NOT_INSTALLED');
5449: FND_MSG_PUB.ADD;
5450: RETURN;
5451: END;

Line 5596: x_return_status := fnd_api.g_ret_sts_success;

5592: print_log('p_in_rec.emd_transaction_id: '||p_in_rec.emd_transaction_id);
5593: print_log('p_in_rec.trx_count_in_group: '||p_in_rec.trx_count_in_group);
5594: print_log('p_in_rec.current_trx_number: '||p_in_rec.current_trx_number);
5595:
5596: x_return_status := fnd_api.g_ret_sts_success;
5597:
5598: BEGIN
5599: SELECT name
5600: INTO l_batch_source_name

Line 5607: x_return_status := fnd_api.g_ret_sts_success;

5603: AND org_id = p_in_rec.org_id
5604: AND Trunc(SYSDATE) BETWEEN start_date AND Nvl(end_date,Trunc(SYSDATE+1));
5605: EXCEPTION
5606: WHEN No_Data_Found THEN
5607: x_return_status := fnd_api.g_ret_sts_success;
5608: FND_MESSAGE.SET_NAME('PON','TRX_BATCH_SOURCE_NOT_DEF');
5609: FND_MESSAGE.SET_TOKEN('BATCH_SOURCE_ID',To_Char(p_in_rec.batch_source_id));
5610: FND_MSG_PUB.ADD;
5611: RETURN;

Line 5624: x_return_status := fnd_api.g_ret_sts_error;

5620: WHERE ORG_ID = p_in_rec.org_id
5621: AND MEMO_LINE_ID = p_in_rec.memo_line_id;
5622: EXCEPTION
5623: WHEN No_Data_Found THEN
5624: x_return_status := fnd_api.g_ret_sts_error;
5625: FND_MESSAGE.SET_NAME('PON','MEMO_LINE_NOT_DEF_IN_AR');
5626: FND_MSG_PUB.ADD;
5627: RETURN;
5628: END;

Line 5638: x_return_status := fnd_api.g_ret_sts_success;

5634: WHERE CUST_TRX_TYPE_ID = p_in_rec.trx_type_id
5635: AND org_id = p_in_rec.org_id;
5636: EXCEPTION
5637: WHEN OTHERS THEN
5638: x_return_status := fnd_api.g_ret_sts_success;
5639: RETURN;
5640: END;
5641:
5642: BEGIN

Line 5651: x_return_status := fnd_api.g_ret_sts_success;

5647: AND org_id = p_in_rec.org_id
5648: AND ROWNUM =1;
5649: EXCEPTION
5650: WHEN OTHERS THEN
5651: x_return_status := fnd_api.g_ret_sts_success;
5652: RETURN;
5653: END;
5654:
5655: /* Bug 8784319 */

Line 5749: x_return_status := fnd_api.g_ret_sts_error;

5745: p_in_rec.emd_transaction_id);
5746: EXCEPTION
5747: WHEN OTHERS THEN
5748: print_log('exception while inserting'||SQLERRM);
5749: x_return_status := fnd_api.g_ret_sts_error;
5750: rollback;
5751: RETURN;
5752: END;
5753:

Line 5808: x_return_status := fnd_api.g_ret_sts_error;

5804:
5805: EXCEPTION
5806: WHEN OTHERS THEN
5807: print_log('Error submitting concurrent request'||SQLERRM);
5808: x_return_status := fnd_api.g_ret_sts_error;
5809: RETURN;
5810: END;
5811: COMMIT;
5812: IF l_conc_req_id = 0 THEN

Line 5816: x_return_status := fnd_api.g_ret_sts_error;

5812: IF l_conc_req_id = 0 THEN
5813: print_log('l_conc_req_id'||l_conc_req_id);
5814: FND_MESSAGE.set_name('PON','AR_AUTO_INVOICE_SUBMIT_FAILED'); /*Concurrent program submission failed!!!!!*/
5815: FND_MSG_PUB.add;
5816: x_return_status := fnd_api.g_ret_sts_error;
5817:
5818: IF (p_in_rec.emd_trx_group_id IS NOT NULL) THEN
5819: DELETE FROM ra_interface_lines_all
5820: WHERE INTERFACE_LINE_CONTEXT = 'EMD TRANSACTIONS'

Line 5848: x_return_status := fnd_api.g_ret_sts_error;

5844: print_log('Dev status phase is not Completed');
5845: FND_MESSAGE.set_name('PON','AR_AUTO_INVOICE_JOB_FAILED');
5846: FND_MESSAGE.set_token('REQUEST_ID',l_conc_req_id);
5847: FND_MSG_PUB.add;
5848: x_return_status := fnd_api.g_ret_sts_error;
5849: IF (p_in_rec.emd_trx_group_id IS NOT NULL) THEN
5850: DELETE FROM ra_interface_lines_all
5851: WHERE INTERFACE_LINE_CONTEXT = 'EMD TRANSACTIONS'
5852: AND INTERFACE_LINE_ATTRIBUTE7 = to_char(p_in_rec.emd_trx_group_id);

Line 5946: x_return_status := fnd_api.g_ret_sts_success;

5942: NULL;
5943: END;
5944: END IF;
5945: END LOOP;
5946: x_return_status := fnd_api.g_ret_sts_success;
5947:
5948: END IF;
5949: ELSE
5950: IF (p_in_rec.emd_trx_group_id IS NOT NULL) THEN

Line 5956: x_return_status := fnd_api.g_ret_sts_error;

5952: WHERE INTERFACE_LINE_CONTEXT = 'EMD TRANSACTIONS'
5953: AND INTERFACE_LINE_ATTRIBUTE7 = to_char(p_in_rec.emd_trx_group_id);
5954: COMMIT;
5955: END IF;
5956: x_return_status := fnd_api.g_ret_sts_error;
5957: FND_MESSAGE.set_name('PON','AR_AUTO_INVOICE_JOB_FAILED');
5958: FND_MESSAGE.set_token('REQUEST_ID',l_conc_req_id);
5959: FND_MSG_PUB.ADD;
5960: END IF;

Line 6033: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

6029: IF (l_conc_req_id = 0) THEN
6030: print_log('post_emd_transactions l_conc_req_id'||l_conc_req_id);
6031: fnd_message.set_name ('PON','PON_EMD_CONC_SUBMIT_FAILED');
6032: FND_MSG_PUB.add;
6033: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6034: p_count => x_msg_count,
6035: p_data => x_msg_data);
6036: print_log('x_msg_count: '||x_msg_count);
6037: IF (x_msg_count > 1) THEN

Line 6042: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

6038: l_count := x_msg_count;
6039: x_msg_data := NULL;
6040: LOOP
6041: IF nvl(l_count, 0) > 0 THEN
6042: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
6043: x_msg_data := x_msg_data ||' '|| l_msg_data;
6044: l_count := nvl(l_count, 0) - 1;
6045: ELSE
6046: EXIT;

Line 6143: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,

6139: IF (l_conc_req_id = 0) THEN
6140: print_log('post_emd_transactions l_conc_req_id'||l_conc_req_id);
6141: fnd_message.set_name ('PON','PON_EMD_CONC_SUBMIT_FAILED');
6142: FND_MSG_PUB.add;
6143: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6144: p_count => x_msg_count,
6145: p_data => x_msg_data);
6146: print_log('x_msg_count: '||x_msg_count);
6147: IF (x_msg_count > 1) THEN

Line 6152: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);

6148: l_count := x_msg_count;
6149: x_msg_data := NULL;
6150: LOOP
6151: IF nvl(l_count, 0) > 0 THEN
6152: l_msg_data := FND_MSG_PUB.Get(l_count, FND_API.G_FALSE);
6153: x_msg_data := x_msg_data ||' '|| l_msg_data;
6154: l_count := nvl(l_count, 0) - 1;
6155: ELSE
6156: EXIT;