6: * ======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AR_RECEIPT_API_PUB';
9:
10: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
11: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
12: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
13: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;
14: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AR_RECEIPT_API_PUB';
9:
10: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
11: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
12: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
13: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;
14: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
15: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AR_RECEIPT_API_PUB';
9:
10: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
11: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
12: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
13: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;
14: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
15: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
16:
9:
10: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
11: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
12: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
13: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;
14: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
15: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
16:
17: pg_update_claim_amount NUMBER; /* Bug 4170060 for rct to rct applications */
10: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
11: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
12: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
13: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;
14: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
15: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
16:
17: pg_update_claim_amount NUMBER; /* Bug 4170060 for rct to rct applications */
18:
11: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
12: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
13: G_MSG_HIGH CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH;
14: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
15: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
16:
17: pg_update_claim_amount NUMBER; /* Bug 4170060 for rct to rct applications */
18:
19: /*-----------------------------------------------------------------------+
274: +--------------------------------------------------------------*/
275:
276: IF FND_API.to_Boolean( p_init_msg_list )
277: THEN
278: FND_MSG_PUB.initialize;
279: END IF;
280:
281:
282: Original_create_cash_info.customer_id := p_customer_id;
536: IF l_receipt_number IS NULL THEN
537: IF l_doc_sequence_value IS NOT NULL THEN
538: l_receipt_number := l_doc_sequence_value;
539: --warning message
540: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
541: THEN
542: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_NUM_DFLT_DOC_SEQ');
543: FND_MSG_PUB.Add;
544: END IF;
539: --warning message
540: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
541: THEN
542: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_NUM_DFLT_DOC_SEQ');
543: FND_MSG_PUB.Add;
544: END IF;
545: ELSE
546: IF PG_DEBUG in ('Y', 'C') THEN
547: arp_util.debug('Create_cash_1: ' || 'Receipt Number is null ');
547: arp_util.debug('Create_cash_1: ' || 'Receipt Number is null ');
548: END IF;
549: --raise error message
550: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_NUM_NULL');
551: FND_MSG_PUB.Add;
552: x_return_status := FND_API.G_RET_STS_ERROR;
553: END IF;
554: END IF;
555:
588:
589: arp_util.debug('Create_cash_122: ' || l_creation_method_code);
590: arp_util.debug('Create_cash_122: ' || l_payment_trxn_extension_id );
591: FND_MESSAGE.SET_NAME('AR','AR_CC_AUTH_FAILED');
592: FND_MSG_PUB.Add;
593: x_return_status := FND_API.G_RET_STS_ERROR;
594: END IF;
595:
596: /*Bug 5614569
621:
622: IF l_copy_return_status <> FND_API.G_RET_STS_SUCCESS THEN
623: arp_util.debug('Create_cash_123: ' );
624: FND_MESSAGE.set_name('AR', 'AR_CC_AUTH_FAILED');
625: FND_MSG_PUB.Add;
626: x_return_status := FND_API.G_RET_STS_ERROR;
627: END IF;
628:
629: l_payment_trxn_extension_id := l_copy_pmt_trxn_extension_id;
653:
654: IF l_create_return_status <> FND_API.G_RET_STS_SUCCESS THEN
655: arp_util.debug('Create_cash_123: ' );
656: FND_MESSAGE.set_name('AR', 'AR_CC_AUTH_FAILED');
657: FND_MSG_PUB.Add;
658: x_return_status := FND_API.G_RET_STS_ERROR;
659: END IF;
660:
661: l_payment_trxn_extension_id := l_create_pmt_trxn_extension_id;
713: ROLLBACK TO Create_cash_PVT;
714:
715: x_return_status := FND_API.G_RET_STS_ERROR ;
716:
717: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
718: p_count => x_msg_count,
719: p_data => x_msg_data);
720:
721: IF PG_DEBUG in ('Y', 'C') THEN
823: -- Display_Parameters;
824: x_return_status := FND_API.G_RET_STS_ERROR ;
825: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
826: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROC_RECEIPTS2.INSERT_CASH_RECEIPT : '||SQLERRM);
827: FND_MSG_PUB.Add;
828:
829: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
830: p_count => x_msg_count,
831: p_data => x_msg_data
825: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
826: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROC_RECEIPTS2.INSERT_CASH_RECEIPT : '||SQLERRM);
827: FND_MSG_PUB.Add;
828:
829: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
830: p_count => x_msg_count,
831: p_data => x_msg_data
832: );
833: RETURN;
842: arp_util.debug('Create_cash_1: ' || 'Cash Receipt id : '||to_char(l_cr_id));
843: END IF;
844:
845: /*-------------------------------------------------------+
846: | FND_MSG_PUB.Count_And_Get used get the count of mesg.|
847: | in the message stack. If there is only one message in |
848: | the stack it retrieves this message |
849: +-------------------------------------------------------*/
850:
847: | in the message stack. If there is only one message in |
848: | the stack it retrieves this message |
849: +-------------------------------------------------------*/
850:
851: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
852: p_count => x_msg_count,
853: p_data => x_msg_data
854: );
855:
883: x_return_status := FND_API.G_RET_STS_ERROR ;
884:
885: --Display_Parameters;
886:
887: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
888: p_count => x_msg_count,
889: p_data => x_msg_data
890: );
891:
898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
899:
900: -- Display_Parameters;
901:
902: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
903: p_count => x_msg_count,
904: p_data => x_msg_data
905: );
906:
919: -- Display_Parameters;
920: x_return_status := FND_API.G_RET_STS_ERROR ;
921: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
922: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_CASH : '||SQLERRM);
923: FND_MSG_PUB.Add;
924:
925: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
926: p_count => x_msg_count,
927: p_data => x_msg_data
921: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
922: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_CASH : '||SQLERRM);
923: FND_MSG_PUB.Add;
924:
925: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
926: p_count => x_msg_count,
927: p_data => x_msg_data
928: );
929: RETURN;
930: ELSE
931: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
932: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
933: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_CASH : '||SQLERRM);
934: FND_MSG_PUB.Add;
935: END IF;
936:
937: IF PG_DEBUG in ('Y', 'C') THEN
938: arp_util.debug('Create_cash_1: ' || SQLCODE);
941:
942: ROLLBACK TO Create_Cash_PVT;
943:
944:
945: IF FND_MSG_PUB.Check_Msg_Level
946: THEN
947: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
948: l_api_name
949: );
943:
944:
945: IF FND_MSG_PUB.Check_Msg_Level
946: THEN
947: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
948: l_api_name
949: );
950: END IF;
951:
949: );
950: END IF;
951:
952: -- Display_Parameters;
953: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
954: p_count => x_msg_count,
955: p_data => x_msg_data
956: );
957:
1279: +--------------------------------------------------------------*/
1280:
1281: IF FND_API.to_Boolean( p_init_msg_list )
1282: THEN
1283: FND_MSG_PUB.initialize;
1284: END IF;
1285:
1286: Original_application_info.cash_receipt_id := p_cash_receipt_id;
1287: Original_application_info.receipt_number := p_receipt_number;
1596: END IF;
1597:
1598: /* Bug fix 3435834
1599: The messages should be retrieved irrespective of the return status */
1600: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1601: p_count => x_msg_count,
1602: p_data => x_msg_data
1603: );
1604:
1738: -- Display_Parameters;
1739: x_return_status := FND_API.G_RET_STS_ERROR ;
1740: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
1741: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.RECEIPT_APPLICATION '||SQLERRM);
1742: FND_MSG_PUB.Add;
1743:
1744: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1745: p_count => x_msg_count,
1746: p_data => x_msg_data
1740: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
1741: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.RECEIPT_APPLICATION '||SQLERRM);
1742: FND_MSG_PUB.Add;
1743:
1744: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1745: p_count => x_msg_count,
1746: p_data => x_msg_data
1747: );
1748: RETURN;
1818: x_return_status := FND_API.G_RET_STS_ERROR ;
1819:
1820: -- Display_Parameters;
1821:
1822: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1823: p_count => x_msg_count,
1824: p_data => x_msg_data
1825: );
1826:
1833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1834:
1835: -- Display_Parameters;
1836:
1837: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1838: p_count => x_msg_count,
1839: p_data => x_msg_data
1840: );
1841:
1857:
1858: x_return_status := FND_API.G_RET_STS_ERROR ;
1859: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
1860: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
1861: FND_MSG_PUB.Add;
1862:
1863: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1864: p_count => x_msg_count,
1865: p_data => x_msg_data
1859: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
1860: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
1861: FND_MSG_PUB.Add;
1862:
1863: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1864: p_count => x_msg_count,
1865: p_data => x_msg_data
1866: );
1867:
1870: ELSE
1871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1872: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
1873: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
1874: FND_MSG_PUB.Add;
1875: END IF;
1876:
1877: IF PG_DEBUG in ('Y', 'C') THEN
1878: arp_util.debug('Apply: ' || SQLCODE, G_MSG_ERROR);
1880: END IF;
1881:
1882: ROLLBACK TO Apply_PVT;
1883:
1884: IF FND_MSG_PUB.Check_Msg_Level
1885: THEN
1886: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1887: l_api_name
1888: );
1882: ROLLBACK TO Apply_PVT;
1883:
1884: IF FND_MSG_PUB.Check_Msg_Level
1885: THEN
1886: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1887: l_api_name
1888: );
1889: END IF;
1890:
1889: END IF;
1890:
1891: -- Display_Parameters;
1892:
1893: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1894: p_count => x_msg_count,
1895: p_data => x_msg_data
1896: );
1897:
2074: +--------------------------------------------------------------*/
2075:
2076: IF FND_API.to_Boolean( p_init_msg_list )
2077: THEN
2078: FND_MSG_PUB.initialize;
2079: END IF;
2080:
2081: Original_application_info.cash_receipt_id := p_cash_receipt_id;
2082: Original_application_info.receipt_number := p_receipt_number;
2110: ELSE
2111: --Verify whether LLCA is allowed for given invoice
2112: IF NOT arp_standard.is_llca_allowed(l_org_id,p_customer_trx_id) THEN
2113: FND_MESSAGE.set_name('AR', 'AR_SUMMARIZED_DIST_NO_LLCA_RCT');
2114: FND_MSG_PUB.Add;
2115: x_return_status := FND_API.G_RET_STS_ERROR;
2116: RAISE FND_API.G_EXC_ERROR;
2117: END IF;
2118:
2515: END IF;
2516:
2517: /* Bug fix 3435834
2518: The messages should be retrieved irrespective of the return status */
2519: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2520: p_count => x_msg_count,
2521: p_data => x_msg_data
2522: );
2523:
2591: END IF;
2592:
2593: /* Bug fix 3435834
2594: The messages should be retrieved irrespective of the return status */
2595: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2596: p_count => x_msg_count,
2597: p_data => x_msg_data
2598: );
2599:
2687: --Bug fix for 5645383
2688: IF lfc_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2689: x_return_status := FND_API.G_RET_STS_ERROR;
2690: END IF;
2691: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2692: p_count => x_msg_count,
2693: p_data => x_msg_data
2694: );
2695: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2737: -- Display_Parameters;
2738: x_return_status := FND_API.G_RET_STS_ERROR ;
2739: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
2740: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.RECEIPT_APPLICATION '||SQLERRM);
2741: FND_MSG_PUB.Add;
2742:
2743: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
2744: p_count => x_msg_count,
2745: p_data => x_msg_data
2739: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
2740: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.RECEIPT_APPLICATION '||SQLERRM);
2741: FND_MSG_PUB.Add;
2742:
2743: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
2744: p_count => x_msg_count,
2745: p_data => x_msg_data
2746: );
2747: RETURN;
2795: --Bug fix for 5645383
2796: IF l_gdflex_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2797: x_return_status := FND_API.G_RET_STS_ERROR;
2798: END IF;
2799: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2800: p_count => x_msg_count,
2801: p_data => x_msg_data
2802: );
2803: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2835: x_return_status := FND_API.G_RET_STS_ERROR ;
2836:
2837: -- Display_Parameters;
2838:
2839: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2840: p_count => x_msg_count,
2841: p_data => x_msg_data
2842: );
2843:
2850: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2851:
2852: -- Display_Parameters;
2853:
2854: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2855: p_count => x_msg_count,
2856: p_data => x_msg_data
2857: );
2858:
2874:
2875: x_return_status := FND_API.G_RET_STS_ERROR ;
2876: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
2877: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
2878: FND_MSG_PUB.Add;
2879:
2880: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2881: p_count => x_msg_count,
2882: p_data => x_msg_data
2876: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
2877: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
2878: FND_MSG_PUB.Add;
2879:
2880: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2881: p_count => x_msg_count,
2882: p_data => x_msg_data
2883: );
2884:
2887: ELSE
2888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2889: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
2890: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY : '||SQLERRM);
2891: FND_MSG_PUB.Add;
2892: END IF;
2893:
2894: IF PG_DEBUG in ('Y', 'C') THEN
2895: arp_util.debug('Apply_In_Detail: ' || SQLCODE, G_MSG_ERROR);
2897: END IF;
2898:
2899: ROLLBACK TO Apply_In_Detail_PVT;
2900:
2901: IF FND_MSG_PUB.Check_Msg_Level
2902: THEN
2903: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
2904: l_api_name
2905: );
2899: ROLLBACK TO Apply_In_Detail_PVT;
2900:
2901: IF FND_MSG_PUB.Check_Msg_Level
2902: THEN
2903: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
2904: l_api_name
2905: );
2906: END IF;
2907:
2906: END IF;
2907:
2908: -- Display_Parameters;
2909:
2910: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2911: p_count => x_msg_count,
2912: p_data => x_msg_data
2913: );
2914: END Apply_In_Detail;
2987: +--------------------------------------------------------------*/
2988:
2989: IF FND_API.to_Boolean( p_init_msg_list )
2990: THEN
2991: FND_MSG_PUB.initialize;
2992: END IF;
2993:
2994: IF PG_DEBUG in ('Y', 'C') THEN
2995: arp_util.debug('ar_receipt_api.Unapply()+ ');
3114: ROLLBACK TO Unapply_PVT;
3115:
3116: x_return_status := FND_API.G_RET_STS_ERROR ;
3117:
3118: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3119: p_count => x_msg_count,
3120: p_data => x_msg_data
3121: );
3122:
3290: -- Display_Parameters;
3291: x_return_status := FND_API.G_RET_STS_ERROR ;
3292: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
3293: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
3294: FND_MSG_PUB.Add;
3295:
3296: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
3297: p_count => x_msg_count,
3298: p_data => x_msg_data
3292: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
3293: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
3294: FND_MSG_PUB.Add;
3295:
3296: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
3297: p_count => x_msg_count,
3298: p_data => x_msg_data
3299: );
3300: RETURN;
3332: x_return_status := FND_API.G_RET_STS_ERROR ;
3333:
3334: -- Display_Parameters;
3335:
3336: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3337: p_count => x_msg_count,
3338: p_data => x_msg_data
3339: );
3340:
3347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3348:
3349: -- Display_Parameters;
3350:
3351: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3352: p_count => x_msg_count,
3353: p_data => x_msg_data
3354: );
3355:
3368:
3369: x_return_status := FND_API.G_RET_STS_ERROR ;
3370: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
3371: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
3372: FND_MSG_PUB.Add;
3373:
3374: --If only one error message on the stack,
3375: --retrive it
3376:
3373:
3374: --If only one error message on the stack,
3375: --retrive it
3376:
3377: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3378: p_count => x_msg_count,
3379: p_data => x_msg_data
3380: );
3381:
3384: ELSE
3385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3386: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
3387: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY : '||SQLERRM);
3388: FND_MSG_PUB.Add;
3389: END IF;
3390:
3391: IF PG_DEBUG in ('Y', 'C') THEN
3392: arp_util.debug('Apply: ' || SQLCODE, G_MSG_ERROR);
3394: END IF;
3395:
3396: ROLLBACK TO Unapply_PVT;
3397:
3398: IF FND_MSG_PUB.Check_Msg_Level
3399: THEN
3400: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
3401: l_api_name
3402: );
3396: ROLLBACK TO Unapply_PVT;
3397:
3398: IF FND_MSG_PUB.Check_Msg_Level
3399: THEN
3400: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
3401: l_api_name
3402: );
3403: END IF;
3404:
3403: END IF;
3404:
3405: -- Display_Parameters;
3406:
3407: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3408: p_count => x_msg_count,
3409: p_data => x_msg_data
3410: );
3411:
3525: arp_standard.debug('Apply: ' || 'ERROR: Creation status is ' || rct_info.creation_status);
3526: END IF;
3527:
3528: FND_MESSAGE.set_name('AR', 'AR_PAY_PROCESS_INVALID_STATUS');
3529: FND_MSG_PUB.Add;
3530:
3531: x_return_status := FND_API.G_RET_STS_ERROR; -- should never happen
3532: RETURN;
3533: end if;
3639: IF (NVL(p_called_from,'NONE') = 'IREC') THEN
3640: IF PG_DEBUG in ('Y', 'C') THEN
3641: arp_standard.debug('Apply: ' || 'l_MSG_COUNT=>'||to_char(l_MSG_COUNT));
3642: END IF;
3643: fnd_msg_pub.dump_list;
3644: IF PG_DEBUG in ('Y', 'C') THEN
3645: arp_standard.debug('Apply: ' || 'Errors: ');
3646: END IF;
3647: IF(l_MSG_COUNT=1) THEN
3649: arp_standard.debug('Apply: ' || l_MSG_DATA);
3650: END IF;
3651: ELSIF(l_MSG_COUNT>1)THEN
3652: LOOP
3653: l_MSG_DATA:=FND_MSG_PUB.GET(p_encoded=>FND_API.G_FALSE);
3654: IF (l_MSG_DATA IS NULL)THEN
3655: EXIT;
3656: END IF;
3657: IF PG_DEBUG in ('Y', 'C') THEN
3664: if (l_return_status <> FND_API.G_RET_STS_SUCCESS)
3665: AND (NVL(p_called_from,'NONE') = 'IREC') then
3666:
3667: FND_MESSAGE.set_name('AR', 'AR_PAY_PROCESS_AUTHFAILURE');
3668: FND_MSG_PUB.Add;
3669: x_return_status := l_return_status;
3670: RETURN;
3671: elsif (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3672: --bug 3398538
3671: elsif (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3672: --bug 3398538
3673: arp_util.debug('Create_cash_124: ');
3674: FND_MESSAGE.set_name('AR', 'AR_CC_AUTH_FAILED');
3675: FND_MSG_PUB.Add;
3676: x_return_status := l_return_status;
3677: RETURN;
3678: end if;
3679:
3735: IF (NVL(p_called_from,'NONE') = 'IREC') THEN
3736: IF PG_DEBUG in ('Y', 'C') THEN
3737: arp_standard.debug('Apply: ' || 'l_MSG_COUNT=>'||to_char(l_MSG_COUNT));
3738: END IF;
3739: fnd_msg_pub.dump_list;
3740: IF PG_DEBUG in ('Y', 'C') THEN
3741: arp_standard.debug('Apply: ' || 'Errors: ');
3742: END IF;
3743: IF(l_MSG_COUNT=1) THEN
3745: arp_standard.debug('Apply: ' || l_MSG_DATA);
3746: END IF;
3747: ELSIF(l_MSG_COUNT>1)THEN
3748: LOOP
3749: l_MSG_DATA:=FND_MSG_PUB.GET(p_encoded=>FND_API.G_FALSE);
3750: IF (l_MSG_DATA IS NULL)THEN
3751: EXIT;
3752: END IF;
3753: IF PG_DEBUG in ('Y', 'C') THEN
3774: --if not pass the message stack received from iPayment
3775:
3776: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) AND (NVL(p_called_from,'NONE') = 'IREC') then
3777: FND_MESSAGE.set_name('AR', 'AR_PAY_PROCESS_CAPTFAILURE');
3778: FND_MSG_PUB.Add;
3779: --bug 3398538
3780: elsif (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3781: FND_MESSAGE.set_name('AR', 'AR_CC_CAPTURE_FAILED');
3782: FND_MSG_PUB.Add;
3778: FND_MSG_PUB.Add;
3779: --bug 3398538
3780: elsif (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3781: FND_MESSAGE.set_name('AR', 'AR_CC_CAPTURE_FAILED');
3782: FND_MSG_PUB.Add;
3783: end if;
3784: x_return_status := l_return_status;
3785:
3786: END IF; -- if capture required...
3920: arp_standard.debug('Apply: ' || 'ERROR: Creation status is ' || rct_info.creation_status);
3921: END IF;
3922:
3923: FND_MESSAGE.set_name('AR', 'AR_PAY_PROCESS_INVALID_STATUS');
3924: FND_MSG_PUB.Add;
3925:
3926: x_return_status := FND_API.G_RET_STS_ERROR; -- should never happen
3927: RETURN;
3928: end if;
4080: arp_standard.debug('x_msg_count :<' || l_msg_count || '>');
4081:
4082: FOR i IN 1..l_msg_count LOOP
4083: arp_standard.debug('x_msg #' || TO_CHAR(i) || ' = <' ||
4084: SUBSTR(fnd_msg_pub.get(p_msg_index => i,p_encoded => FND_API.G_FALSE),1,150) || '>');
4085: END LOOP;
4086:
4087: IF PG_DEBUG in ('Y', 'C') THEN
4088: arp_standard.debug( '-------------------------------------');
4121: IF (NVL(p_called_from,'NONE') = 'IREC') THEN
4122: IF PG_DEBUG in ('Y', 'C') THEN
4123: arp_standard.debug( 'l_MSG_COUNT=>'||to_char(l_MSG_COUNT));
4124: END IF;
4125: fnd_msg_pub.dump_list;
4126: IF PG_DEBUG in ('Y', 'C') THEN
4127: arp_standard.debug( 'Errors: ');
4128: END IF;
4129: IF(l_MSG_COUNT=1) THEN
4131: arp_standard.debug( l_MSG_DATA);
4132: END IF;
4133: ELSIF(l_MSG_COUNT>1)THEN
4134: LOOP
4135: l_MSG_DATA:=FND_MSG_PUB.GET(p_encoded=>FND_API.G_FALSE);
4136: IF (l_MSG_DATA IS NULL)THEN
4137: EXIT;
4138: END IF;
4139: IF PG_DEBUG in ('Y', 'C') THEN
4146: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
4147: AND (NVL(p_called_from,'NONE') = 'IREC') then
4148:
4149: FND_MESSAGE.set_name('AR', 'AR_PAY_PROCESS_AUTHFAILURE');
4150: FND_MSG_PUB.Add;
4151: x_return_status := l_return_status;
4152: RETURN;
4153:
4154: ELSIF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4154: ELSIF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4155:
4156: arp_standard.debug('create_cash_126');
4157: FND_MESSAGE.set_name('AR', 'AR_CC_AUTH_FAILED');
4158: FND_MSG_PUB.Add;
4159:
4160: IF l_response_rec.Result_Code is NOT NULL THEN
4161:
4162: ---Raise the PAYMENT error code concatenated with the message
4169: arp_standard.debug( 'l_iby_msg_data: ' || l_iby_msg_data);
4170: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4171: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT',l_iby_msg_data);
4172:
4173: FND_MSG_PUB.Add;
4174:
4175: END IF;
4176:
4177: IF l_authresult_rec.PaymentSys_Code is not null THEN
4185:
4186: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4187: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT',l_vend_msg_data);
4188:
4189: FND_MSG_PUB.Add;
4190:
4191: END IF;
4192:
4193:
4190:
4191: END IF;
4192:
4193:
4194: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
4195: p_count => x_msg_count,
4196: p_data => x_msg_data );
4197:
4198: x_return_status := l_return_status;
4239: arp_standard.debug('x_msg_count :<' || ls_msg_count || '>');
4240:
4241: FOR i IN 1..ls_msg_count LOOP
4242: arp_standard.debug('x_msg #' || TO_CHAR(i) || ' = <' ||
4243: SUBSTR(fnd_msg_pub.get(p_msg_index => i,p_encoded => FND_API.G_FALSE),1,150) || '>');
4244: END LOOP;
4245:
4246: IF PG_DEBUG in ('Y', 'C') THEN
4247: arp_standard.debug( '-------------------------------------');
4255: IF (NVL(p_called_from,'NONE') = 'IREC') THEN
4256: IF PG_DEBUG in ('Y', 'C') THEN
4257: arp_standard.debug( 'ls_MSG_COUNT=>'||to_char(ls_MSG_COUNT));
4258: END IF;
4259: fnd_msg_pub.dump_list;
4260: IF PG_DEBUG in ('Y', 'C') THEN
4261: arp_standard.debug( 'Errors: ');
4262: END IF;
4263: IF(ls_MSG_COUNT=1) THEN
4265: arp_standard.debug( ls_MSG_DATA);
4266: END IF;
4267: ELSIF(ls_MSG_COUNT>1)THEN
4268: LOOP
4269: ls_MSG_DATA:=FND_MSG_PUB.GET(p_encoded=>FND_API.G_FALSE);
4270: IF (ls_MSG_DATA IS NULL)THEN
4271: EXIT;
4272: END IF;
4273: IF PG_DEBUG in ('Y', 'C') THEN
4280: IF (ls_return_status <> FND_API.G_RET_STS_SUCCESS)
4281: AND (NVL(p_called_from,'NONE') = 'IREC') then
4282:
4283: FND_MESSAGE.set_name('AR', 'AR_PAY_PROCESS_AUTHFAILURE');
4284: FND_MSG_PUB.Add;
4285: x_return_status := ls_return_status;
4286: RETURN;
4287:
4288: ELSIF (ls_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4288: ELSIF (ls_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4289:
4290:
4291: FND_MESSAGE.set_name('AR', 'AR_CC_CAPTURE_FAILED');
4292: FND_MSG_PUB.Add;
4293:
4294: IF ls_response_rec.Result_Code is NOT NULL THEN
4295:
4296: ---Raise the PAYMENT error code concatenated with the message
4303: arp_standard.debug( 'ls_iby_msg_data: ' || ls_iby_msg_data);
4304: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4305: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT',ls_iby_msg_data);
4306:
4307: FND_MSG_PUB.Add;
4308:
4309: END IF;
4310:
4311:
4308:
4309: END IF;
4310:
4311:
4312: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
4313: p_count => x_msg_count,
4314: p_data => x_msg_data );
4315:
4316: x_return_status := ls_return_status;
4432: IF p_receipt_date NOT BETWEEN l_start_date AND NVL(l_end_date, to_date('31-12-4712','DD-MM-YYYY')) THEN
4433: arp_standard.debug ( 'Receipt date out of instrument assignment range. Receipt will not be created for this instrument.');
4434: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4435: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Instrument assignment date range out of bound.');
4436: FND_MSG_PUB.Add;
4437: x_return_status := FND_API.G_RET_STS_ERROR;
4438: RETURN;
4439: ELSE
4440: arp_standard.debug ('Receipt date is valid for instrument assignment.');
4443: EXCEPTION WHEN NO_DATA_FOUND THEN
4444: arp_standard.debug ( 'No Data found while getting date range for instrument assignment '|| sqlerrm);
4445: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4446: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','No data range found for instrument assignment.');
4447: FND_MSG_PUB.Add;
4448: x_return_status := FND_API.G_RET_STS_ERROR;
4449: RETURN;
4450: WHEN OTHERS THEN
4451: arp_standard.debug ( 'Exception while getting date range for instrument assignment '|| sqlerrm);
4450: WHEN OTHERS THEN
4451: arp_standard.debug ( 'Exception while getting date range for instrument assignment '|| sqlerrm);
4452: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4453: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Error getting data range found for instrument assignment.');
4454: FND_MSG_PUB.Add;
4455: x_return_status := FND_API.G_RET_STS_ERROR;
4456: RETURN;
4457: END ;
4458:
4517: arp_standard.debug('x_msg_count :<' || l_msg_count || '>');
4518:
4519: FOR i IN 1..l_msg_count LOOP
4520: arp_standard.debug('x_msg #' || TO_CHAR(i) || ' = <' ||
4521: SUBSTR(fnd_msg_pub.get(p_msg_index => i,p_encoded => FND_API.G_FALSE),1,150) || '>');
4522: END LOOP;
4523:
4524:
4525: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4525: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4526:
4527: arp_standard.debug('create_cash_127');
4528: FND_MESSAGE.set_name('AR', 'AR_CC_AUTH_FAILED');
4529: FND_MSG_PUB.Add;
4530:
4531: IF l_response_rec.result_Code is NOT NULL THEN
4532:
4533: ---Raise the PAYMENT error code concatenated with the message
4538: arp_standard.debug( 'l_cpy_msg_data: ' || l_cpy_msg_data);
4539: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4540: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT',l_cpy_msg_data);
4541:
4542: FND_MSG_PUB.Add;
4543:
4544: END IF;
4545:
4546: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
4542: FND_MSG_PUB.Add;
4543:
4544: END IF;
4545:
4546: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
4547: p_count => x_msg_count,
4548: p_data => x_msg_data );
4549:
4550: x_return_status := l_return_status;
4637: IF p_receipt_date NOT BETWEEN l_start_date AND NVL(l_end_date, to_date('31-12-4712','DD-MM-YYYY')) THEN
4638: arp_standard.debug ( 'Receipt date out of instrument assignment range. Receipt will not be created for this instrument.');
4639: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4640: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Instrument assignment date range out of bound.');
4641: FND_MSG_PUB.Add;
4642: x_return_status := FND_API.G_RET_STS_ERROR;
4643: RETURN;
4644: ELSE
4645: arp_standard.debug ('Receipt date is valid for instrument assignment.');
4648: EXCEPTION WHEN NO_DATA_FOUND THEN
4649: arp_standard.debug ( 'No Data found while getting date range for instrument assignment '|| sqlerrm);
4650: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4651: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','No data range found for instrument assignment.');
4652: FND_MSG_PUB.Add;
4653: x_return_status := FND_API.G_RET_STS_ERROR;
4654: RETURN;
4655: WHEN OTHERS THEN
4656: arp_standard.debug ( 'Exception while getting date range for instrument assignment '|| sqlerrm);
4655: WHEN OTHERS THEN
4656: arp_standard.debug ( 'Exception while getting date range for instrument assignment '|| sqlerrm);
4657: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4658: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Error getting data range found for instrument assignment.');
4659: FND_MSG_PUB.Add;
4660: x_return_status := FND_API.G_RET_STS_ERROR;
4661: RETURN;
4662: END ;
4663: /* End - Bug 13056525 : Get start and end date for instrument assignment. */
4716: END IF;
4717:
4718: FOR i IN 1..l_msg_count LOOP
4719: arp_standard.debug('x_msg #' || TO_CHAR(i) || ' = <' ||
4720: SUBSTR(fnd_msg_pub.get(p_msg_index => i,p_encoded => FND_API.G_FALSE),1,150) || '>');
4721: END LOOP;
4722:
4723:
4724: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4734: arp_standard.debug('PARM-l_trxn_attribs_rec.Trxn_Ref_Number1 ' ||l_trxn_attribs_rec.Trxn_Ref_Number1);
4735: arp_standard.debug('PARM-l_assignment_id ' ||l_assignment_id);
4736:
4737:
4738: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
4739: p_count => x_msg_count,
4740: p_data => x_msg_data );
4741:
4742: x_return_status := l_return_status;
4933: Create routine must have removed it from the stack and put it on x_msg_data
4934: */
4935: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
4936: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_AND_APPLY : '||l_create_msg_data);
4937: FND_MSG_PUB.Add;
4938: END IF;
4939:
4940: Apply( p_api_version => p_api_version,
4941: p_init_msg_list => FND_API.G_FALSE, --message stack is not initialized here.
5031: END IF;
5032: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5033: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
5034: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_AND_APPLY : '||SQLERRM);
5035: FND_MSG_PUB.Add;
5036: END Create_and_apply;
5037:
5038: /*=======================================================================
5039: | PUBLIC Procedure Create_Apply_On_Acc
5225: | Initialize message list if p_init_msg_list is set to TRUE |
5226: +--------------------------------------------------------------*/
5227: IF FND_API.to_Boolean( p_init_msg_list )
5228: THEN
5229: FND_MSG_PUB.initialize;
5230: END IF;
5231:
5232:
5233: /*-------------------------------------------------+
5315: IF l_create_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5316:
5317: x_return_status := l_create_return_status;
5318: ROLLBACK TO Create_Apply_On_Acc;
5319: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
5320: p_count => l_create_msg_count,
5321: p_data => l_create_msg_data);
5322:
5323: x_msg_count := l_create_msg_count;
5334: ---it from the stack and put it on x_msg_data
5335:
5336: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
5337: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_AND_APPLY : '||l_create_msg_data);
5338: FND_MSG_PUB.Add;
5339: END IF;
5340:
5341: /*------------------------------------------------------+
5342: | Call the internal routine to apply on account receipt|
5373: +------------------------------------------------------*/
5374: IF l_apply_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5375: x_return_status := l_apply_return_status;
5376: ROLLBACK TO Create_Apply_On_Acc;
5377: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
5378: p_count => l_apply_msg_count,
5379: p_data => l_apply_msg_data);
5380:
5381: x_msg_count := l_apply_msg_count;
5419: arp_util.debug('Create_Apply_On_Acc: ' || 'p_payment_response_error_code: ' || l_response_error_code);
5420: END IF;
5421:
5422: ROLLBACK TO Create_Apply_On_Acc;
5423: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
5424: p_count => x_msg_count,
5425: p_data => x_msg_data);
5426: RETURN; -- exit back to caller
5427: END IF;
5449:
5450: x_return_status := FND_API.G_RET_STS_ERROR ;
5451: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
5452: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_RECEIPT_API_PUB.Create_Apply_On_Acc:'|| SQLERRM);
5453: FND_MSG_PUB.Add;
5454: ROLLBACK TO Create_Apply_On_Acc;
5455: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
5456: p_count => x_msg_count,
5457: p_data => x_msg_data);
5451: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
5452: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_RECEIPT_API_PUB.Create_Apply_On_Acc:'|| SQLERRM);
5453: FND_MSG_PUB.Add;
5454: ROLLBACK TO Create_Apply_On_Acc;
5455: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
5456: p_count => x_msg_count,
5457: p_data => x_msg_data);
5458:
5459:
5560:
5561: p_return_status := FND_API.G_RET_STS_ERROR ;
5562: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
5563: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_REVERSE_RECEIPT.REVERSE : '||SQLERRM);
5564: FND_MSG_PUB.Add;
5565:
5566: RETURN;
5567: ELSE
5568: RAISE;
5668: +--------------------------------------------------------------*/
5669:
5670: IF FND_API.to_Boolean( p_init_msg_list )
5671: THEN
5672: FND_MSG_PUB.initialize;
5673: END IF;
5674: /*-----------------------------------------+
5675: | Initialize return status to SUCCESS |
5676: +-----------------------------------------*/
5781: IF PG_DEBUG in ('Y', 'C') THEN
5782: arp_util.debug('Apply: ' || 'Standard reversal not possible for this receipt');
5783: END IF;
5784: FND_MESSAGE.SET_NAME('AR','AR_RAPI_NON_REVERSIBLE');
5785: FND_MSG_PUB.Add;
5786: l_rev_return_status := FND_API.G_RET_STS_ERROR;
5787: END IF;
5788:
5789:
5807: IF arp_reverse_receipt.check_settlement_status(
5808: p_extension_id => l_trxn_extn_id)
5809: THEN
5810: FND_MESSAGE.SET_NAME('AR','AR_IBY_SETTLEMENT_PENDING');
5811: FND_MSG_PUB.ADD;
5812: l_pend_settlment_status:= FND_API.G_RET_STS_ERROR;
5813: END IF;
5814: END IF;
5815: -- Bug 2232366 - check for existence of claims and if they are cancellable
5817: p_cr_id => p_cash_receipt_id,
5818: p_include_trx_claims => 'Y')
5819: THEN
5820: FND_MESSAGE.SET_NAME('AR','AR_RW_NO_REVERSAL_WITH_CLAIMS');
5821: FND_MSG_PUB.Add;
5822: l_clm_return_status := FND_API.G_RET_STS_ERROR;
5823: ELSE
5824: arp_reverse_receipt.cancel_claims(
5825: p_cr_id => p_cash_receipt_id
5907: ROLLBACK TO Reverse_PVT;
5908:
5909: x_return_status := FND_API.G_RET_STS_ERROR ;
5910:
5911: FND_MSG_PUB.Count_And_Get(
5912: p_count => x_msg_count,
5913: p_data => x_msg_data
5914: );
5915:
6055: ROLLBACK TO Reverse_PVT;
6056:
6057: x_return_status := FND_API.G_RET_STS_ERROR ;
6058:
6059: FND_MSG_PUB.Count_And_Get(
6060: p_count => x_msg_count,
6061: p_data => x_msg_data
6062: );
6063:
6143: x_return_status := FND_API.G_RET_STS_ERROR ;
6144:
6145: -- Display_Parameters;
6146:
6147: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6148: p_data => x_msg_data
6149: );
6150:
6151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6158:
6159: -- Display_Parameters;
6160:
6161: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6162: p_data => x_msg_data
6163: );
6164:
6165: WHEN OTHERS THEN
6178:
6179: x_return_status := FND_API.G_RET_STS_ERROR ;
6180: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6181: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','REVERSE : '||SQLERRM);
6182: FND_MSG_PUB.Add;
6183:
6184: --If only one error message on the stack,
6185: --retrive it
6186:
6183:
6184: --If only one error message on the stack,
6185: --retrive it
6186:
6187: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6188: p_data => x_msg_data
6189: );
6190:
6191: RETURN;
6193: ELSE
6194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6195: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6196: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','REVERSE : '||SQLERRM);
6197: FND_MSG_PUB.Add;
6198: END IF;
6199:
6200: IF PG_DEBUG in ('Y', 'C') THEN
6201: arp_util.debug('Apply: ' || SQLCODE, G_MSG_ERROR);
6203: END IF;
6204:
6205: ROLLBACK TO Reverse_PVT;
6206:
6207: IF FND_MSG_PUB.Check_Msg_Level
6208: THEN
6209: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
6210: l_api_name
6211: );
6205: ROLLBACK TO Reverse_PVT;
6206:
6207: IF FND_MSG_PUB.Check_Msg_Level
6208: THEN
6209: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
6210: l_api_name
6211: );
6212: END IF;
6213:
6212: END IF;
6213:
6214: -- Display_Parameters;
6215:
6216: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
6217: p_data => x_msg_data
6218: );
6219:
6220:
6297: +--------------------------------------------------------------*/
6298:
6299: IF FND_API.to_Boolean( p_init_msg_list )
6300: THEN
6301: FND_MSG_PUB.initialize;
6302: END IF;
6303:
6304: IF PG_DEBUG in ('Y', 'C') THEN
6305: arp_util.debug('Apply_on_account()+ ');
6431: ROLLBACK TO Apply_on_ac_PVT;
6432:
6433: x_return_status := FND_API.G_RET_STS_ERROR ;
6434:
6435: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6436: p_count => x_msg_count,
6437: p_data => x_msg_data
6438: );
6439:
6528:
6529: x_return_status := FND_API.G_RET_STS_ERROR ;
6530: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6531: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.ON_ACCOUNT_RECEIPTS : '||SQLERRM);
6532: FND_MSG_PUB.Add;
6533:
6534: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
6535: p_count => x_msg_count,
6536: p_data => x_msg_data
6530: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6531: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.ON_ACCOUNT_RECEIPTS : '||SQLERRM);
6532: FND_MSG_PUB.Add;
6533:
6534: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
6535: p_count => x_msg_count,
6536: p_data => x_msg_data
6537: );
6538: RETURN;
6566: x_return_status := FND_API.G_RET_STS_ERROR ;
6567:
6568: -- Display_Parameters;
6569:
6570: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6571: p_count => x_msg_count,
6572: p_data => x_msg_data
6573: );
6574:
6581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6582:
6583: -- Display_Parameters;
6584:
6585: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6586: p_count => x_msg_count,
6587: p_data => x_msg_data
6588: );
6589:
6605:
6606: x_return_status := FND_API.G_RET_STS_ERROR ;
6607: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6608: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY_ON_ACCOUNT : '||SQLERRM);
6609: FND_MSG_PUB.Add;
6610:
6611: --If only one error message on the stack,
6612: --retrive it
6613: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6609: FND_MSG_PUB.Add;
6610:
6611: --If only one error message on the stack,
6612: --retrive it
6613: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6614: p_count => x_msg_count,
6615: p_data => x_msg_data
6616: );
6617:
6620: ELSE
6621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6622: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6623: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY_ON_ACCOUNT : '||SQLERRM);
6624: FND_MSG_PUB.Add;
6625: END IF;
6626:
6627: IF PG_DEBUG in ('Y', 'C') THEN
6628: arp_util.debug('Apply: ' || SQLCODE, G_MSG_ERROR);
6630: END IF;
6631:
6632: ROLLBACK TO Apply_on_ac_PVT;
6633:
6634: IF FND_MSG_PUB.Check_Msg_Level
6635: THEN
6636: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
6637: l_api_name
6638: );
6632: ROLLBACK TO Apply_on_ac_PVT;
6633:
6634: IF FND_MSG_PUB.Check_Msg_Level
6635: THEN
6636: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
6637: l_api_name
6638: );
6639: END IF;
6640:
6639: END IF;
6640:
6641: -- Display_Parameters;
6642:
6643: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6644: p_count => x_msg_count,
6645: p_data => x_msg_data
6646: );
6647: END Apply_on_account;
6702: +--------------------------------------------------------------*/
6703:
6704: IF FND_API.to_Boolean( p_init_msg_list )
6705: THEN
6706: FND_MSG_PUB.initialize;
6707: END IF;
6708:
6709: IF PG_DEBUG in ('Y', 'C') THEN
6710: arp_util.debug('Unapply_on_account: ' || 'ar_receipt_api.Unapply_on_ac()+ ');
6788: ROLLBACK TO Unapply_on_ac_PVT;
6789:
6790: x_return_status := FND_API.G_RET_STS_ERROR ;
6791:
6792: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6793: p_count => x_msg_count,
6794: p_data => x_msg_data
6795: );
6796:
6835: -- Display_Parameters;
6836: x_return_status := FND_API.G_RET_STS_ERROR ;
6837: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6838: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
6839: FND_MSG_PUB.Add;
6840:
6841: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
6842: p_count => x_msg_count,
6843: p_data => x_msg_data
6837: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6838: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
6839: FND_MSG_PUB.Add;
6840:
6841: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
6842: p_count => x_msg_count,
6843: p_data => x_msg_data
6844: );
6845: RETURN;
6877: x_return_status := FND_API.G_RET_STS_ERROR ;
6878:
6879: -- Display_Parameters;
6880:
6881: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6882: p_count => x_msg_count,
6883: p_data => x_msg_data
6884: );
6885:
6892: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6893:
6894: -- Display_Parameters;
6895:
6896: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6897: p_count => x_msg_count,
6898: p_data => x_msg_data
6899: );
6900:
6916:
6917: x_return_status := FND_API.G_RET_STS_ERROR ;
6918: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6919: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY_ON_ACCOUNT : '||SQLERRM);
6920: FND_MSG_PUB.Add;
6921: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6922: p_count => x_msg_count,
6923: p_data => x_msg_data
6924: );
6917: x_return_status := FND_API.G_RET_STS_ERROR ;
6918: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6919: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY_ON_ACCOUNT : '||SQLERRM);
6920: FND_MSG_PUB.Add;
6921: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6922: p_count => x_msg_count,
6923: p_data => x_msg_data
6924: );
6925:
6928: ELSE
6929: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6930: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
6931: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY_ON_ACCOUNT : '||SQLERRM);
6932: FND_MSG_PUB.Add;
6933: END IF;
6934:
6935: IF PG_DEBUG in ('Y', 'C') THEN
6936: arp_util.debug('Unapply_on_account: ' || SQLCODE, G_MSG_ERROR);
6938: END IF;
6939:
6940: ROLLBACK TO Unapply_on_ac_PVT;
6941:
6942: IF FND_MSG_PUB.Check_Msg_Level
6943: THEN
6944: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
6945: l_api_name
6946: );
6940: ROLLBACK TO Unapply_on_ac_PVT;
6941:
6942: IF FND_MSG_PUB.Check_Msg_Level
6943: THEN
6944: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
6945: l_api_name
6946: );
6947: END IF;
6948:
6947: END IF;
6948:
6949: -- Display_Parameters;
6950:
6951: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
6952: p_count => x_msg_count,
6953: p_data => x_msg_data
6954: );
6955: END Unapply_on_account;
7020: +--------------------------------------------------------------*/
7021:
7022: IF FND_API.to_Boolean( p_init_msg_list )
7023: THEN
7024: FND_MSG_PUB.initialize;
7025: END IF;
7026:
7027: IF PG_DEBUG in ('Y', 'C') THEN
7028: arp_util.debug('ar_receipt_api.Unapply_other_account()+ ');
7160: ROLLBACK TO Unapply_other_ac_PVT;
7161:
7162: x_return_status := FND_API.G_RET_STS_ERROR ;
7163:
7164: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7165: p_count => x_msg_count,
7166: p_data => x_msg_data
7167: );
7168:
7219: -- Display_Parameters;
7220: x_return_status := FND_API.G_RET_STS_ERROR ;
7221: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7222: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
7223: FND_MSG_PUB.Add;
7224:
7225: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
7226: p_count => x_msg_count,
7227: p_data => x_msg_data
7221: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7222: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
7223: FND_MSG_PUB.Add;
7224:
7225: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
7226: p_count => x_msg_count,
7227: p_data => x_msg_data
7228: );
7229: RETURN;
7261: x_return_status := FND_API.G_RET_STS_ERROR ;
7262:
7263: -- Display_Parameters;
7264:
7265: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7266: p_count => x_msg_count,
7267: p_data => x_msg_data
7268: );
7269:
7276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7277:
7278: -- Display_Parameters;
7279:
7280: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7281: p_count => x_msg_count,
7282: p_data => x_msg_data
7283: );
7284:
7300:
7301: x_return_status := FND_API.G_RET_STS_ERROR ;
7302: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7303: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY_ON_ACCOUNT : '||SQLERRM);
7304: FND_MSG_PUB.Add;
7305: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7306: p_count => x_msg_count,
7307: p_data => x_msg_data
7308: );
7301: x_return_status := FND_API.G_RET_STS_ERROR ;
7302: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7303: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY_ON_ACCOUNT : '||SQLERRM);
7304: FND_MSG_PUB.Add;
7305: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7306: p_count => x_msg_count,
7307: p_data => x_msg_data
7308: );
7309:
7312: ELSE
7313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7314: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7315: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UNAPPLY_OTHER_ACCOUNT : '||SQLERRM);
7316: FND_MSG_PUB.Add;
7317: END IF;
7318:
7319: IF PG_DEBUG in ('Y', 'C') THEN
7320: arp_util.debug('Unapply_other_account: ' || SQLCODE, G_MSG_ERROR);
7322: END IF;
7323:
7324: ROLLBACK TO Unapply_other_ac_PVT;
7325:
7326: IF FND_MSG_PUB.Check_Msg_Level
7327: THEN
7328: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
7329: l_api_name
7330: );
7324: ROLLBACK TO Unapply_other_ac_PVT;
7325:
7326: IF FND_MSG_PUB.Check_Msg_Level
7327: THEN
7328: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
7329: l_api_name
7330: );
7331: END IF;
7332:
7331: END IF;
7332:
7333: -- Display_Parameters;
7334:
7335: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7336: p_count => x_msg_count,
7337: p_data => x_msg_data
7338: );
7339: END Unapply_other_account;
7482: +--------------------------------------------------------------*/
7483:
7484: IF FND_API.to_Boolean( p_init_msg_list )
7485: THEN
7486: FND_MSG_PUB.initialize;
7487: END IF;
7488:
7489: IF PG_DEBUG in ('Y', 'C') THEN
7490: arp_util.debug('Activity_application()+ ');
7682: l_pay_term_return_status := FND_API.G_RET_STS_ERROR ;
7683:
7684: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7685: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Invalid Payment Term');
7686: FND_MSG_PUB.Add;
7687:
7688: IF PG_DEBUG in ('Y', 'C') THEN
7689: arp_util.debug('Activity_application: ' || 'Invalid Payment Term. Rolling back and setting status to ERROR');
7690: END IF;
7698: l_pay_priority_return_status := FND_API.G_RET_STS_ERROR ;
7699:
7700: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7701: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Payment Priority Not In Range(1-99)');
7702: FND_MSG_PUB.Add;
7703:
7704: IF PG_DEBUG in ('Y', 'C') THEN
7705: arp_util.debug('Activity_application: ' || 'Payment Priority Not In Range(1-99). Rolling back and setting status to ERROR');
7706: END IF;
7727: ROLLBACK TO Activity_app_PVT;
7728:
7729: x_return_status := FND_API.G_RET_STS_ERROR ;
7730:
7731: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7732: p_count => x_msg_count,
7733: p_data => x_msg_data
7734: );
7735:
7825: -- Display_Parameters;
7826: x_return_status := FND_API.G_RET_STS_ERROR ;
7827: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7828: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.ACTIVITY_APPLICATION : '||SQLERRM);
7829: FND_MSG_PUB.Add;
7830:
7831: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
7832: p_count => x_msg_count,
7833: p_data => x_msg_data
7827: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7828: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.ACTIVITY_APPLICATION : '||SQLERRM);
7829: FND_MSG_PUB.Add;
7830:
7831: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
7832: p_count => x_msg_count,
7833: p_data => x_msg_data
7834: );
7835: RETURN;
7893: -- Display_Parameters;
7894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7895: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7896: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_REFUNDS_PVT.Create_Refund : '||SQLERRM);
7897: FND_MSG_PUB.Add;
7898:
7899: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
7900: p_count => x_msg_count,
7901: p_data => x_msg_data
7895: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7896: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_REFUNDS_PVT.Create_Refund : '||SQLERRM);
7897: FND_MSG_PUB.Add;
7898:
7899: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
7900: p_count => x_msg_count,
7901: p_data => x_msg_data
7902: );
7903: RETURN;
7937: x_return_status := FND_API.G_RET_STS_ERROR ;
7938:
7939: -- Display_Parameters;
7940:
7941: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7942: p_count => x_msg_count,
7943: p_data => x_msg_data
7944: );
7945:
7952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7953:
7954: -- Display_Parameters;
7955:
7956: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7957: p_count => x_msg_count,
7958: p_data => x_msg_data
7959: );
7960:
7976:
7977: x_return_status := FND_API.G_RET_STS_ERROR ;
7978: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7979: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ACTIVITY_APPLICATION : '||SQLERRM);
7980: FND_MSG_PUB.Add;
7981:
7982: --If only one error message on the stack,
7983: --retrive it
7984:
7981:
7982: --If only one error message on the stack,
7983: --retrive it
7984:
7985: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
7986: p_count => x_msg_count,
7987: p_data => x_msg_data
7988: );
7989:
7992: ELSE
7993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7994: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
7995: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ACTIVITY_APPLICATION : '||SQLERRM);
7996: FND_MSG_PUB.Add;
7997: END IF;
7998:
7999: IF PG_DEBUG in ('Y', 'C') THEN
8000: arp_util.debug('Activity_application: ' || SQLCODE, G_MSG_ERROR);
8002: END IF;
8003:
8004: ROLLBACK TO Activity_app_PVT;
8005:
8006: IF FND_MSG_PUB.Check_Msg_Level
8007: THEN
8008: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
8009: l_api_name
8010: );
8004: ROLLBACK TO Activity_app_PVT;
8005:
8006: IF FND_MSG_PUB.Check_Msg_Level
8007: THEN
8008: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
8009: l_api_name
8010: );
8011: END IF;
8012:
8011: END IF;
8012:
8013: -- Display_Parameters;
8014:
8015: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8016: p_count => x_msg_count,
8017: p_data => x_msg_data
8018: );
8019: END Activity_application;
8078: +--------------------------------------------------------------*/
8079:
8080: IF FND_API.to_Boolean( p_init_msg_list )
8081: THEN
8082: FND_MSG_PUB.initialize;
8083: END IF;
8084:
8085: IF PG_DEBUG in ('Y', 'C') THEN
8086: arp_util.debug('ar_receipt_api.activity_unapplication()+ ');
8191: ROLLBACK TO Activity_unapplication_PVT;
8192:
8193: x_return_status := FND_API.G_RET_STS_ERROR ;
8194:
8195: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8196: p_count => x_msg_count,
8197: p_data => x_msg_data
8198: );
8199:
8238: -- Display_Parameters;
8239: x_return_status := FND_API.G_RET_STS_ERROR ;
8240: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8241: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
8242: FND_MSG_PUB.Add;
8243:
8244: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
8245: p_count => x_msg_count,
8246: p_data => x_msg_data
8240: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8241: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.REVERSE : '||SQLERRM);
8242: FND_MSG_PUB.Add;
8243:
8244: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
8245: p_count => x_msg_count,
8246: p_data => x_msg_data
8247: );
8248: RETURN;
8280: x_return_status := FND_API.G_RET_STS_ERROR ;
8281:
8282: -- Display_Parameters;
8283:
8284: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8285: p_count => x_msg_count,
8286: p_data => x_msg_data
8287: );
8288:
8295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8296:
8297: -- Display_Parameters;
8298:
8299: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8300: p_count => x_msg_count,
8301: p_data => x_msg_data
8302: );
8303:
8316:
8317: x_return_status := FND_API.G_RET_STS_ERROR ;
8318: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8319: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ACTIVITY_UNAPPLICATION : '||SQLERRM);
8320: FND_MSG_PUB.Add;
8321:
8322: --If only one error message on the stack,
8323: --retrive it
8324: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8320: FND_MSG_PUB.Add;
8321:
8322: --If only one error message on the stack,
8323: --retrive it
8324: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8325: p_count => x_msg_count,
8326: p_data => x_msg_data
8327: );
8328:
8331: ELSE
8332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8333: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8334: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ACTIVITY_UNAPPLICATION : '||SQLERRM);
8335: FND_MSG_PUB.Add;
8336: END IF;
8337:
8338: IF PG_DEBUG in ('Y', 'C') THEN
8339: arp_util.debug('Activity_Unapplication: ' || SQLCODE, G_MSG_ERROR);
8341: END IF;
8342:
8343: ROLLBACK TO Activity_unapplication_PVT;
8344:
8345: IF FND_MSG_PUB.Check_Msg_Level
8346: THEN
8347: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
8348: l_api_name
8349: );
8343: ROLLBACK TO Activity_unapplication_PVT;
8344:
8345: IF FND_MSG_PUB.Check_Msg_Level
8346: THEN
8347: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
8348: l_api_name
8349: );
8350: END IF;
8351:
8350: END IF;
8351:
8352: -- Display_Parameters;
8353:
8354: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8355: p_count => x_msg_count,
8356: p_data => x_msg_data
8357: );
8358: END Activity_unapplication;
8448: +--------------------------------------------------------------*/
8449:
8450: IF FND_API.to_Boolean( p_init_msg_list )
8451: THEN
8452: FND_MSG_PUB.initialize;
8453: END IF;
8454:
8455: arp_util.debug('Apply_other_account()+ ');
8456: /*-----------------------------------------+
8634: ROLLBACK TO Apply_other_ac_PVT;
8635:
8636: x_return_status := FND_API.G_RET_STS_ERROR ;
8637:
8638: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8639: p_count => x_msg_count,
8640: p_data => x_msg_data
8641: );
8642:
8744:
8745: x_return_status := FND_API.G_RET_STS_ERROR ;
8746: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8747: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.APPLY_OTHER_ACCOUNT : '||SQLERRM);
8748: FND_MSG_PUB.Add;
8749:
8750: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
8751: p_count => x_msg_count,
8752: p_data => x_msg_data
8746: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8747: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARP_PROCESS_APPLICATION.APPLY_OTHER_ACCOUNT : '||SQLERRM);
8748: FND_MSG_PUB.Add;
8749:
8750: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
8751: p_count => x_msg_count,
8752: p_data => x_msg_data
8753: );
8754: RETURN;
8776: x_return_status := FND_API.G_RET_STS_ERROR ;
8777:
8778: -- Display_Parameters;
8779:
8780: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8781: p_count => x_msg_count,
8782: p_data => x_msg_data
8783: );
8784:
8789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8790:
8791: -- Display_Parameters;
8792:
8793: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8794: p_count => x_msg_count,
8795: p_data => x_msg_data
8796: );
8797:
8813:
8814: x_return_status := FND_API.G_RET_STS_ERROR ;
8815: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8816: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY_OTHER_ACCOUNT : '||SQLERRM);
8817: FND_MSG_PUB.Add;
8818:
8819: --If only one error message on the stack,
8820: --retrive it
8821: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8817: FND_MSG_PUB.Add;
8818:
8819: --If only one error message on the stack,
8820: --retrive it
8821: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8822: p_count => x_msg_count,
8823: p_data => x_msg_data
8824: );
8825:
8828: ELSE
8829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8830: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
8831: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY_OTHER_ACCOUNT : '||SQLERRM);
8832: FND_MSG_PUB.Add;
8833: END IF;
8834:
8835: arp_util.debug(SQLCODE, G_MSG_ERROR);
8836: arp_util.debug(SQLERRM, G_MSG_ERROR);
8836: arp_util.debug(SQLERRM, G_MSG_ERROR);
8837:
8838: ROLLBACK TO Apply_other_ac_PVT;
8839:
8840: IF FND_MSG_PUB.Check_Msg_Level
8841: THEN
8842: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
8843: l_api_name
8844: );
8838: ROLLBACK TO Apply_other_ac_PVT;
8839:
8840: IF FND_MSG_PUB.Check_Msg_Level
8841: THEN
8842: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
8843: l_api_name
8844: );
8845: END IF;
8846:
8845: END IF;
8846:
8847: -- Display_Parameters;
8848:
8849: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
8850: p_count => x_msg_count,
8851: p_data => x_msg_data
8852: );
8853: END;
9000: +--------------------------------------------------------------*/
9001:
9002: IF FND_API.to_Boolean( p_init_msg_list )
9003: THEN
9004: FND_MSG_PUB.initialize;
9005: END IF;
9006:
9007: IF PG_DEBUG in ('Y', 'C') THEN
9008: arp_util.debug('ar_receipt_api.create_misc()+ ');
9195: l_receipt_number := l_doc_sequence_value;
9196: -- Copy the Receipt Number in the out NOCOPY parameter
9197: p_receipt_number := l_receipt_number;
9198: --warning message
9199: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
9200: THEN
9201: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_NUM_DFLT_DOC_SEQ');
9202: FND_MSG_PUB.Add;
9203: END IF;
9198: --warning message
9199: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
9200: THEN
9201: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_NUM_DFLT_DOC_SEQ');
9202: FND_MSG_PUB.Add;
9203: END IF;
9204: ELSE
9205: IF PG_DEBUG in ('Y', 'C') THEN
9206: arp_util.debug('create_misc: ' || 'Receipt Number is null ');
9206: arp_util.debug('create_misc: ' || 'Receipt Number is null ');
9207: END IF;
9208: --raise error message
9209: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_NUM_NULL');
9210: FND_MSG_PUB.Add;
9211: x_return_status := FND_API.G_RET_STS_ERROR;
9212: END IF;
9213: END IF;
9214:
9226: ROLLBACK TO Create_misc_PVT;
9227:
9228: x_return_status := FND_API.G_RET_STS_ERROR ;
9229:
9230: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
9231: p_count => x_msg_count,
9232: p_data => x_msg_data);
9233:
9234: IF PG_DEBUG in ('Y', 'C') THEN
9272:
9273: arp_util.debug('Create_cash_122: ' || l_creation_method);
9274: arp_util.debug('Create_cash_122: ' || l_payment_trxn_extension_id );
9275: FND_MESSAGE.SET_NAME('AR','AR_CC_AUTH_FAILED');
9276: FND_MSG_PUB.Add;
9277: x_return_status := FND_API.G_RET_STS_ERROR;
9278: END IF;
9279:
9280: IF l_creation_method = 'A' THEN
9312:
9313: IF l_copy_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9314: arp_util.debug('Create_cash_123: ' );
9315: FND_MESSAGE.set_name('AR', 'AR_CC_AUTH_FAILED');
9316: FND_MSG_PUB.Add;
9317: x_return_status := FND_API.G_RET_STS_ERROR;
9318: END IF;
9319: l_payment_trxn_extension_id := l_copy_pmt_trxn_extension_id;
9320:
9493: x_return_status := FND_API.G_RET_STS_ERROR ;
9494: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
9495: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT',
9496: 'ARP_PROCESS_MISC_RECEIPTS.INSERT_MISC_RECEIPT : '||SQLERRM);
9497: FND_MSG_PUB.Add;
9498:
9499: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
9500: p_count => x_msg_count,
9501: p_data => x_msg_data
9495: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT',
9496: 'ARP_PROCESS_MISC_RECEIPTS.INSERT_MISC_RECEIPT : '||SQLERRM);
9497: FND_MSG_PUB.Add;
9498:
9499: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
9500: p_count => x_msg_count,
9501: p_data => x_msg_data
9502: );
9503: RETURN;
9511: arp_util.debug('create_misc: ' || 'Misc Receipt id : '||to_char(p_misc_receipt_id));
9512: END IF;
9513:
9514: /*-------------------------------------------------------+
9515: | FND_MSG_PUB.Count_And_Get used get the count of mesg.|
9516: | in the message stack. If there is only one message in |
9517: | the stack it retrieves this message |
9518: +-------------------------------------------------------*/
9519:
9516: | in the message stack. If there is only one message in |
9517: | the stack it retrieves this message |
9518: +-------------------------------------------------------*/
9519:
9520: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
9521: p_count => x_msg_count,
9522: p_data => x_msg_data
9523: );
9524:
9556: x_return_status := FND_API.G_RET_STS_ERROR ;
9557:
9558: --Display_Parameters;
9559:
9560: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
9561: p_count => x_msg_count,
9562: p_data => x_msg_data
9563: );
9564:
9571: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9572:
9573: -- Display_Parameters;
9574:
9575: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
9576: p_count => x_msg_count,
9577: p_data => x_msg_data
9578: );
9579:
9592: -- Display_Parameters;
9593: x_return_status := FND_API.G_RET_STS_ERROR ;
9594: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
9595: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_MISC : '||SQLERRM);
9596: FND_MSG_PUB.Add;
9597:
9598: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
9599: p_count => x_msg_count,
9600: p_data => x_msg_data
9594: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
9595: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_MISC : '||SQLERRM);
9596: FND_MSG_PUB.Add;
9597:
9598: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
9599: p_count => x_msg_count,
9600: p_data => x_msg_data
9601: );
9602: RETURN;
9603: ELSE
9604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9605: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
9606: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','CREATE_MISC : '||SQLERRM);
9607: FND_MSG_PUB.Add;
9608: END IF;
9609:
9610: IF PG_DEBUG in ('Y', 'C') THEN
9611: arp_util.debug('create_misc: ' || SQLCODE);
9614:
9615: ROLLBACK TO Create_misc_PVT;
9616:
9617:
9618: IF FND_MSG_PUB.Check_Msg_Level
9619: THEN
9620: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
9621: l_api_name
9622: );
9616:
9617:
9618: IF FND_MSG_PUB.Check_Msg_Level
9619: THEN
9620: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
9621: l_api_name
9622: );
9623: END IF;
9624:
9622: );
9623: END IF;
9624:
9625: -- Display_Parameters;
9626: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
9627: p_count => x_msg_count,
9628: p_data => x_msg_data
9629: );
9630:
9778: +--------------------------------------------------------------*/
9779:
9780: IF FND_API.to_Boolean( p_init_msg_list )
9781: THEN
9782: FND_MSG_PUB.initialize;
9783: END IF;
9784:
9785:
9786: IF PG_DEBUG in ('Y', 'C') THEN
9924: ROLLBACK TO Apply_Open_Receipt_PVT;
9925:
9926: x_return_status := FND_API.G_RET_STS_ERROR ;
9927:
9928: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
9929: p_count => x_msg_count,
9930: p_data => x_msg_data
9931: );
9932:
10140: arp_util.debug('Apply_Open_Receipt: l_net_rec_app_id = ' || l_net_rec_app_id);
10141: arp_util.debug('Apply_Open_Receipt: l_open_net_rec_app_id = ' || l_open_net_rec_app_id);
10142: END IF;
10143: FND_MESSAGE.SET_NAME('AR','AR_RAPI_REC_APP_ID_INVALID');
10144: FND_MSG_PUB.Add;
10145: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10146: END IF;
10147:
10148: BEGIN
10213: x_return_status := FND_API.G_RET_STS_ERROR ;
10214:
10215: -- Display_Parameters;
10216:
10217: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10218: p_count => x_msg_count,
10219: p_data => x_msg_data
10220: );
10221:
10228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10229:
10230: -- Display_Parameters;
10231:
10232: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10233: p_count => x_msg_count,
10234: p_data => x_msg_data
10235: );
10236:
10252:
10253: x_return_status := FND_API.G_RET_STS_ERROR ;
10254: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
10255: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY_Open_Receipt : '||SQLERRM);
10256: FND_MSG_PUB.Add;
10257:
10258: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10259: p_count => x_msg_count,
10260: p_data => x_msg_data
10254: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
10255: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY_Open_Receipt : '||SQLERRM);
10256: FND_MSG_PUB.Add;
10257:
10258: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10259: p_count => x_msg_count,
10260: p_data => x_msg_data
10261: );
10262:
10265: ELSE
10266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10267: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
10268: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','APPLY_Open_Receipt : '||SQLERRM);
10269: FND_MSG_PUB.Add;
10270: END IF;
10271:
10272: IF PG_DEBUG in ('Y', 'C') THEN
10273: arp_util.debug('Apply_Open_Receipt: ' || SQLCODE, G_MSG_ERROR);
10275: END IF;
10276:
10277: ROLLBACK TO Apply_Open_Receipt_PVT;
10278:
10279: IF FND_MSG_PUB.Check_Msg_Level
10280: THEN
10281: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
10282: l_api_name
10283: );
10277: ROLLBACK TO Apply_Open_Receipt_PVT;
10278:
10279: IF FND_MSG_PUB.Check_Msg_Level
10280: THEN
10281: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
10282: l_api_name
10283: );
10284: END IF;
10285:
10284: END IF;
10285:
10286: -- Display_Parameters;
10287:
10288: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10289: p_count => x_msg_count,
10290: p_data => x_msg_data
10291: );
10292:
10347: +--------------------------------------------------------------*/
10348:
10349: IF FND_API.to_Boolean( p_init_msg_list )
10350: THEN
10351: FND_MSG_PUB.initialize;
10352: END IF;
10353:
10354: IF PG_DEBUG in ('Y', 'C') THEN
10355: arp_util.debug('Unapply_Open_Receipt: ' || 'ar_receipt_api.Unapply_Open_Receipt()+ ');
10497: x_return_status := FND_API.G_RET_STS_ERROR ;
10498:
10499: -- Display_Parameters;
10500:
10501: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10502: p_count => x_msg_count,
10503: p_data => x_msg_data
10504: );
10505:
10512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10513:
10514: -- Display_Parameters;
10515:
10516: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10517: p_count => x_msg_count,
10518: p_data => x_msg_data
10519: );
10520:
10536:
10537: x_return_status := FND_API.G_RET_STS_ERROR ;
10538: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
10539: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UnaPPLY_Open_Receipt : '||SQLERRM);
10540: FND_MSG_PUB.Add;
10541:
10542: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10543: p_count => x_msg_count,
10544: p_data => x_msg_data
10538: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
10539: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UnaPPLY_Open_Receipt : '||SQLERRM);
10540: FND_MSG_PUB.Add;
10541:
10542: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10543: p_count => x_msg_count,
10544: p_data => x_msg_data
10545: );
10546:
10549: ELSE
10550: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10551: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
10552: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','UnaPPLY_Open_Receipt : '||SQLERRM);
10553: FND_MSG_PUB.Add;
10554: END IF;
10555:
10556: IF PG_DEBUG in ('Y', 'C') THEN
10557: arp_util.debug('Unapply_Open_Receipt: ' || SQLCODE, G_MSG_ERROR);
10559: END IF;
10560:
10561: ROLLBACK TO Unapply_Open_Receipt_PVT;
10562:
10563: IF FND_MSG_PUB.Check_Msg_Level
10564: THEN
10565: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
10566: l_api_name
10567: );
10561: ROLLBACK TO Unapply_Open_Receipt_PVT;
10562:
10563: IF FND_MSG_PUB.Check_Msg_Level
10564: THEN
10565: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
10566: l_api_name
10567: );
10568: END IF;
10569:
10568: END IF;
10569:
10570: -- Display_Parameters;
10571:
10572: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
10573: p_count => x_msg_count,
10574: p_data => x_msg_data
10575: );
10576:
10733: IF nvl(p_called_from,'X') <> 'SUBMIT_OFFLINE' THEN
10734:
10735: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
10736: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','API called with wrong parameters. Call is not internal');
10737: FND_MSG_PUB.Add;
10738: x_return_status := FND_API.G_RET_STS_ERROR;
10739: return;
10740: END IF;
10741:
10920: ELSE
10921: /*
10922: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
10923: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
10924: FND_MSG_PUB.Add;
10925: x_return_status := FND_API.G_RET_STS_ERROR;
10926: EXIT;
10927: */
10928: l_crh_upd.rec_status(i) := 'INVALID_GL_DATE';
11303: ROLLBACK TO Reverse_Rem_PVT;
11304: l_error_message := 'Unexpected Error: ' || substr(1,100,sqlerrm);
11305: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
11306: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
11307: FND_MSG_PUB.Add;
11308: x_return_status := FND_API.G_RET_STS_ERROR;
11309: x_msg_data := substr(1,2000,sqlerrm);
11310: END Reverse_Remittances_in_err;
11311:
11814:
11815: ELSIF l_msg_count > 1 THEN
11816: FOR l_count IN 1..l_msg_count LOOP
11817:
11818: l_msg_data :=FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,FND_API.G_FALSE);
11819:
11820: IF PG_DEBUG in ('Y', 'C') THEN
11821: arp_standard.debug ( 'the number is ' || l_count );
11822: arp_standard.debug ( 'the message data is ' || l_msg_data );
11957: +--------------------------------------------------------------*/
11958:
11959: IF FND_API.to_Boolean( p_init_msg_list )
11960: THEN
11961: FND_MSG_PUB.initialize;
11962: END IF;
11963:
11964:
11965: IF PG_DEBUG in ('Y', 'C') THEN
12028: and cust_acct.status = 'A' ;
12029: EXCEPTION
12030: WHEN no_data_found THEN
12031: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_ID_INVALID');
12032: FND_MSG_PUB.Add;
12033: RAISE FND_API.G_EXC_ERROR;
12034: END;
12035: ELSIF ( l_pay_unrel_inv_flag = 'N')
12036: THEN
12063: );
12064: EXCEPTION
12065: WHEN no_data_found THEN
12066: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_ID_INVALID');
12067: FND_MSG_PUB.Add;
12068: RAISE FND_API.G_EXC_ERROR;
12069: END;
12070: END IF;
12071:
12092:
12093: EXCEPTION
12094: WHEN no_data_found THEN
12095: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUS_STE_USE_ID_INVALID');
12096: FND_MSG_PUB.Add;
12097: RAISE FND_API.G_EXC_ERROR;
12098: END;
12099:
12100: /*----------------------------------------------+
12112: WHEN OTHERS THEN
12113: arp_standard.debug('Change_customer: ' || 'Unexpected error '||sqlerrm||
12114: ' at AR_RECEIPT_API_PUB.Change_customer()+');
12115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12116: IF FND_MSG_PUB.Check_Msg_Level
12117: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
12118: THEN
12119: FND_MSG_PUB.Add_Exc_Msg
12120: ( G_PKG_NAME ,
12113: arp_standard.debug('Change_customer: ' || 'Unexpected error '||sqlerrm||
12114: ' at AR_RECEIPT_API_PUB.Change_customer()+');
12115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12116: IF FND_MSG_PUB.Check_Msg_Level
12117: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
12118: THEN
12119: FND_MSG_PUB.Add_Exc_Msg
12120: ( G_PKG_NAME ,
12121: l_api_name
12115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12116: IF FND_MSG_PUB.Check_Msg_Level
12117: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
12118: THEN
12119: FND_MSG_PUB.Add_Exc_Msg
12120: ( G_PKG_NAME ,
12121: l_api_name
12122: );
12123: END IF;
12135: x_return_status := FND_API.G_RET_STS_ERROR ;
12136:
12137: -- Display_Parameters;
12138:
12139: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
12140: p_count => x_msg_count,
12141: p_data => x_msg_data
12142: );
12143:
12150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12151:
12152: -- Display_Parameters;
12153:
12154: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
12155: p_count => x_msg_count,
12156: p_data => x_msg_data
12157: );
12158:
12167:
12168: x_return_status := FND_API.G_RET_STS_ERROR ;
12169: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
12170: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Change_customer: '||SQLERRM);
12171: FND_MSG_PUB.Add;
12172:
12173: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
12174: p_count => x_msg_count,
12175: p_data => x_msg_data
12169: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
12170: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Change_customer: '||SQLERRM);
12171: FND_MSG_PUB.Add;
12172:
12173: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
12174: p_count => x_msg_count,
12175: p_data => x_msg_data
12176: );
12177: RETURN;
12178: ELSE
12179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12180: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
12181: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Change_customer : '||SQLERRM);
12182: FND_MSG_PUB.Add;
12183: END IF;
12184:
12185: IF PG_DEBUG in ('Y', 'C') THEN
12186: arp_util.debug( SQLCODE, G_MSG_ERROR);
12188: END IF;
12189:
12190: ROLLBACK TO Change_customer_PVT;
12191:
12192: IF FND_MSG_PUB.Check_Msg_Level
12193: THEN
12194: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
12195: l_api_name
12196: );
12190: ROLLBACK TO Change_customer_PVT;
12191:
12192: IF FND_MSG_PUB.Check_Msg_Level
12193: THEN
12194: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
12195: l_api_name
12196: );
12197: END IF;
12198:
12197: END IF;
12198:
12199: -- Display_Parameters;
12200:
12201: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
12202: p_count => x_msg_count,
12203: p_data => x_msg_data
12204: );
12205: