123: p_exchange_rate_cache IN BINARY_INTEGER DEFAULT 1000
124: ) IS
125: BEGIN
126: IF PG_DEBUG in ('Y', 'C') THEN
127: arp_util.debug('Configure_Library_Caches()+ ');
128: END IF;
129:
130: G_SITE_USE_CACHE_SIZE := p_site_use_cache;
131: G_CUST_NUM_CACHE_SIZE := p_cust_number_cache;
140: G_METHOD_INFO_CACHE_SIZE := p_method_info_cache;
141: G_EXCHANGE_RATE_CACHE_SIZE := p_exchange_rate_cache;
142:
143: IF PG_DEBUG in ('Y', 'C') THEN
144: arp_util.debug('Configure_Library_Caches()- ');
145: END IF;
146:
147: EXCEPTION
148: WHEN OTHERS THEN
146:
147: EXCEPTION
148: WHEN OTHERS THEN
149: IF PG_DEBUG in ('Y', 'C') THEN
150: arp_util.debug('EXCEPTION: Configure_Library_Caches() ');
151: END IF;
152: RAISE;
153:
154: END Configure_Library_Caches;
160:
161: BEGIN
162:
163: IF PG_DEBUG in ('Y', 'C') THEN
164: arp_util.debug('Add_Value_To_Cache()+ ');
165: END IF;
166:
167: IF ( p_cache_name = 'CUSTOMER_NUMBER' )
168: THEN
280: G_Legal_Entity_Cache_Tbl( p_index ).id := p_id;
281: END IF;
282: END IF;
283: IF PG_DEBUG in ('Y', 'C') THEN
284: arp_util.debug('Add_Value_To_Cache()- ');
285: END IF;
286:
287: EXCEPTION
288: WHEN OTHERS THEN
286:
287: EXCEPTION
288: WHEN OTHERS THEN
289: IF PG_DEBUG in ('Y', 'C') THEN
290: arp_util.debug('EXCEPTION: Add_Value_To_Cache. Cache: ' ||
291: p_cache_name || ' ' ||
292: ' Value: ' || p_value);
293: END IF;
294: RAISE;
306:
307: BEGIN
308:
309: IF PG_DEBUG in ('Y', 'C') THEN
310: arp_util.debug('Find_Value_In_Cache()+ ');
311: END IF;
312:
313: IF (p_cache_name = 'CUSTOMER_NUMBER')
314: THEN
469:
470: END LOOP;
471:
472: IF PG_DEBUG in ('Y', 'C') THEN
473: arp_util.debug('Find_Value_In_Cache()- ');
474: END IF;
475:
476: RETURN(NULL);
477:
478: EXCEPTION
479:
480: WHEN OTHERS THEN
481: IF PG_DEBUG in ('Y', 'C') THEN
482: arp_util.debug('EXCEPTION: Find_Value_In_Cache. Cache: ' ||
483: p_cache_name || ' ' ||
484: ' Value: ' || p_value);
485: END IF;
486:
504:
505: BEGIN
506:
507: IF PG_DEBUG in ('Y', 'C') THEN
508: arp_util.debug('Get_Id()+ ');
509: END IF;
510:
511: IF ( p_value IS NULL )
512: THEN
662: NVL( l_index, 0 ) + 1
663: );
664:
665: IF PG_DEBUG in ('Y', 'C') THEN
666: arp_util.debug('Get_Id: ' || 'Value selected. Entity: '||
667: p_entity || ',' ||
668: ' Value: ' || p_value || ',' ||
669: 'ID: ' || l_selected_id);
670: arp_util.debug('Get_Id()- ');
666: arp_util.debug('Get_Id: ' || 'Value selected. Entity: '||
667: p_entity || ',' ||
668: ' Value: ' || p_value || ',' ||
669: 'ID: ' || l_selected_id);
670: arp_util.debug('Get_Id()- ');
671: END IF;
672:
673: RETURN( l_selected_id );
674:
678: END IF; -- end p_value is not null case
679:
680:
681: IF PG_DEBUG in ('Y', 'C') THEN
682: arp_util.debug('Get_Id()- ');
683: END IF;
684:
685:
686: EXCEPTION
686: EXCEPTION
687:
688: WHEN NO_DATA_FOUND THEN
689: IF PG_DEBUG in ('Y', 'C') THEN
690: arp_util.debug('Get_Id: ' || 'Value not found. Entity: ' ||
691: p_entity ||' Value: ' || p_value);
692: END IF;
693: return(null);
694: IF PG_DEBUG in ('Y', 'C') THEN
691: p_entity ||' Value: ' || p_value);
692: END IF;
693: return(null);
694: IF PG_DEBUG in ('Y', 'C') THEN
695: arp_util.debug('Get_Id()- ');
696: END IF;
697:
698: WHEN OTHERS THEN
699: IF PG_DEBUG in ('Y', 'C') THEN
696: END IF;
697:
698: WHEN OTHERS THEN
699: IF PG_DEBUG in ('Y', 'C') THEN
700: arp_util.debug('Get_Id: ' || 'Value not found. Entity: ' ||
701: p_entity ||' Value: ' || p_value);
702: END IF;
703: RAISE;
704:
715: ) IS
716: BEGIN
717:
718: IF PG_DEBUG in ('Y', 'C') THEN
719: arp_util.debug('Add_Site_Use_To_Cache()+ ');
720: END IF;
721: IF ( p_index <= G_SITE_USE_CACHE_SIZE )
722: THEN
723: G_Site_Use_Cache_Tbl(p_index).customer_id :=
728: p_site_use_code;
729: G_Site_Use_Cache_Tbl(p_index).id := p_id;
730: END IF;
731: IF PG_DEBUG in ('Y', 'C') THEN
732: arp_util.debug('Add_Site_Use_To_Cache()- ');
733: END IF;
734: EXCEPTION
735: WHEN OTHERS THEN
736: IF PG_DEBUG in ('Y', 'C') THEN
733: END IF;
734: EXCEPTION
735: WHEN OTHERS THEN
736: IF PG_DEBUG in ('Y', 'C') THEN
737: arp_util.debug('EXCEPTION: Add_Site_Use_To_Cache');
738: END IF;
739: RAISE;
740: END Add_Site_Use_To_Cache;
741:
752:
753: BEGIN
754:
755: IF PG_DEBUG in ('Y', 'C') THEN
756: arp_util.debug('Find_Site_Use_In_Cache()+ ');
757: END IF;
758:
759: l_count := G_Site_Use_Cache_Tbl.count;
760:
781:
782: END LOOP;
783:
784: IF PG_DEBUG in ('Y', 'C') THEN
785: arp_util.debug('Find_Site_Use_In_Cache()- ');
786: END IF;
787:
788: RETURN(NULL);
789:
790: EXCEPTION
791:
792: WHEN OTHERS THEN
793: IF PG_DEBUG in ('Y', 'C') THEN
794: arp_util.debug('EXCEPTION: Find_Site_Use_In_Cache');
795: END IF;
796:
797: RAISE;
798:
810: l_index BINARY_INTEGER;
811: BEGIN
812:
813: IF PG_DEBUG in ('Y', 'C') THEN
814: arp_util.debug('Get_Site_Use_Id()+ ');
815: END IF;
816:
817: /* IF ( p_customer_id IS NULL ) THEN
818: RETURN(NULL);
846: AND site_use.location = p_location;
847: EXCEPTION
848: WHEN no_data_found THEN
849: IF PG_DEBUG in ('Y', 'C') THEN
850: arp_util.debug('Get_Site_Use_Id: ' || 'No data found in the hz_cust_site_uses for the location :'||p_location);
851: END IF;
852: --the error message will be raised in the validation routine.
853: null;
854: END;
874:
875: EXCEPTION
876: WHEN no_data_found THEN
877: IF PG_DEBUG in ('Y', 'C') THEN
878: arp_util.debug('Get_Site_Use_Id: ' || 'No_data_found : Site use id could not be defaulted for customer_id '||to_char(p_customer_id));
879: END IF;
880: --This is the case where customer site use id is null
881: --neither it was supplied by the user nor it could be defaulted
882: --a WARNING message raised in the validation routine to indicate
901: RETURN( l_selected_id );
902: EXCEPTION
903: WHEN others THEN
904: IF PG_DEBUG in ('Y', 'C') THEN
905: arp_util.debug('EXCEPTION: Get_Site_Use_Id.');
906: END IF;
907: raise;
908:
909: END Get_Site_Use_Id;
947:
948: EXCEPTION
949: WHEN others THEN
950: IF PG_DEBUG in ('Y', 'C') THEN
951: arp_util.debug('EXCEPTION: Get_Cross_Validated_Id() '||p_entity);
952: END IF;
953: raise;
954: END Get_Cross_Validated_Id;
955:
959: l_index BINARY_INTEGER;
960: BEGIN
961:
962: IF PG_DEBUG in ('Y', 'C') THEN
963: arp_util.debug('Add_Method_Info_To_Cache()+ ');
964: END IF;
965: IF p_index IS NULL THEN
966: l_index := nvl(Method_Info_Cache_Tbl.LAST,0) + 1;
967: END IF;
970:
971: Method_Info_Cache_Tbl(l_index) := p_method_info_record;
972:
973: IF PG_DEBUG in ('Y', 'C') THEN
974: arp_util.debug('Added the record at index '|| l_index);
975: END IF;
976: END IF;
977:
978: IF PG_DEBUG in ('Y', 'C') THEN
975: END IF;
976: END IF;
977:
978: IF PG_DEBUG in ('Y', 'C') THEN
979: arp_util.debug('Add_Method_Info_To_Cache()- ');
980: END IF;
981:
982: EXCEPTION
983:
982: EXCEPTION
983:
984: WHEN OTHERS THEN
985: IF PG_DEBUG in ('Y', 'C') THEN
986: arp_util.debug('EXCEPTION: Add_Method_Info_To_Cache');
987: END IF;
988: RAISE;
989: END Add_Method_Info_To_Cache;
990:
996: l_index_curr BINARY_INTEGER;
997:
998: BEGIN
999: IF PG_DEBUG in ('Y', 'C') THEN
1000: arp_util.debug('Get_Method_Info_From_Cache ()+ ');
1001: END IF;
1002:
1003: l_count := Method_Info_Cache_Tbl.count;
1004:
1018: Nvl(Method_info_cache_tbl(L_index).Rma_end_date, P_receipt_date ) ) ) Then
1019: P_method_info_record := Method_info_cache_tbl(L_index);
1020:
1021: If Pg_debug In ('y', 'c') Then
1022: Arp_util.Debug('found The Record In Cache ');
1023: End If;
1024: Exit;
1025: End If;
1026: End Loop;
1026: End Loop;
1027: END IF;
1028:
1029: IF PG_DEBUG in ('Y', 'C') THEN
1030: arp_util.debug('Get_Method_Info_From_Cache ()- ');
1031: END IF;
1032:
1033: EXCEPTION
1034: WHEN others THEN
1032:
1033: EXCEPTION
1034: WHEN others THEN
1035: IF PG_DEBUG in ('Y', 'C') THEN
1036: arp_util.debug('EXCEPTION: Get_Method_Info_From_Cache() ');
1037: END IF;
1038: raise;
1039: END Get_Method_Info_From_Cache;
1040:
1048: ) IS
1049: BEGIN
1050:
1051: IF PG_DEBUG in ('Y', 'C') THEN
1052: arp_util.debug('Add_Exchange_Rate_To_Cache()+ ');
1053: END IF;
1054:
1055:
1056: IF ( p_index <= G_EXCHANGE_RATE_CACHE_SIZE )
1065: p_exchange_rate_date;
1066: END IF;
1067:
1068: IF PG_DEBUG in ('Y', 'C') THEN
1069: arp_util.debug('Add_Exchange_Rate_To_Cache()- ');
1070: END IF;
1071:
1072: EXCEPTION
1073:
1072: EXCEPTION
1073:
1074: WHEN OTHERS THEN
1075: IF PG_DEBUG in ('Y', 'C') THEN
1076: arp_util.debug('EXCEPTION: Add_Exchange_Rate_To_Cache');
1077: END IF;
1078:
1079: RAISE;
1080:
1089: l_default_gl_date DATE;
1090: BEGIN
1091: p_return_status := FND_API.G_RET_STS_SUCCESS;
1092: IF PG_DEBUG in ('Y', 'C') THEN
1093: arp_util.debug('Default_gl_date ()+');
1094: END IF;
1095: IF p_gl_date IS NULL THEN
1096: IF (arp_util.validate_and_default_gl_date(
1097: p_entered_date,
1092: IF PG_DEBUG in ('Y', 'C') THEN
1093: arp_util.debug('Default_gl_date ()+');
1094: END IF;
1095: IF p_gl_date IS NULL THEN
1096: IF (arp_util.validate_and_default_gl_date(
1097: p_entered_date,
1098: NULL,
1099: p_validation_date, /* Bug fix 3547720 */
1100: NULL,
1111: l_error_message) = TRUE)
1112: THEN
1113: p_gl_date := l_default_gl_date;
1114: IF PG_DEBUG in ('Y', 'C') THEN
1115: arp_util.debug('Default_gl_date: ' || 'Defaulted GL Date : '||to_char(p_gl_date,'DD-MON-YYYY'));
1116: END IF;
1117: ELSE
1118: IF PG_DEBUG in ('Y', 'C') THEN
1119: arp_util.debug('Default_gl_date: ' || 'GL Date could not be defaulted ');
1115: arp_util.debug('Default_gl_date: ' || 'Defaulted GL Date : '||to_char(p_gl_date,'DD-MON-YYYY'));
1116: END IF;
1117: ELSE
1118: IF PG_DEBUG in ('Y', 'C') THEN
1119: arp_util.debug('Default_gl_date: ' || 'GL Date could not be defaulted ');
1120: END IF;
1121: -- Raise error message if failure in defaulting the gl_date
1122: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
1123: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
1125: p_return_status := FND_API.G_RET_STS_ERROR;
1126: END IF;
1127: END IF;
1128: IF PG_DEBUG in ('Y', 'C') THEN
1129: arp_util.debug('Default_gl_date ()-');
1130: END IF;
1131: END default_gl_date;
1132:
1133:
1142: l_set_of_books_id NUMBER := arp_global.set_of_books_id;
1143: l_functional_currency VARCHAR2(100) := arp_global.functional_currency;
1144: BEGIN
1145: IF PG_DEBUG in ('Y', 'C') THEN
1146: arp_util.debug('Find_Cached_Exchange_Rate ()+');
1147: END IF;
1148: IF (p_currency_code IS NOT NULL) AND
1149: (p_currency_code <> l_functional_currency) AND
1150: (p_exchange_rate_date IS NOT NULL) AND
1188: */
1189: END IF;
1190: RETURN( l_exchange_rate );
1191: IF PG_DEBUG in ('Y', 'C') THEN
1192: arp_util.debug('Find_Cached_Exchange_Rate ()-');
1193: END IF;
1194: EXCEPTION
1195: WHEN gl_currency_api.NO_RATE THEN
1196: --rate does not exist set appropriate message.
1196: --rate does not exist set appropriate message.
1197: --p_return_status := FND_API.G_RET_STS_ERROR ;
1198: return(null);
1199: IF PG_DEBUG in ('Y', 'C') THEN
1200: arp_util.debug('Find_Cached_Exchange_Rate: ' || 'Exception : gl_currency_api.NO_RATE ');
1201: END IF;
1202: WHEN gl_currency_api.INVALID_CURRENCY THEN
1203: -- invalid currency set appropriate message.
1204: --p_return_status := FND_API.G_RET_STS_ERROR ;
1203: -- invalid currency set appropriate message.
1204: --p_return_status := FND_API.G_RET_STS_ERROR ;
1205: return(null);
1206: IF PG_DEBUG in ('Y', 'C') THEN
1207: arp_util.debug('Find_Cached_Exchange_Rate: ' || 'Exception: gl_currency_api.INVALID_CURRENCY ');
1208: END IF;
1209: WHEN others THEN
1210: IF PG_DEBUG in ('Y', 'C') THEN
1211: arp_util.debug('EXCEPTION: Find_Cached_Exchange_Rate() ');
1207: arp_util.debug('Find_Cached_Exchange_Rate: ' || 'Exception: gl_currency_api.INVALID_CURRENCY ');
1208: END IF;
1209: WHEN others THEN
1210: IF PG_DEBUG in ('Y', 'C') THEN
1211: arp_util.debug('EXCEPTION: Find_Cached_Exchange_Rate() ');
1212: END IF;
1213: raise;
1214: END Find_Cached_Exchange_Rate;
1215:
1289: l_method_info_record Method_Info_Cache_Rec_Type;
1290:
1291: BEGIN
1292: IF PG_DEBUG in ('Y', 'C') THEN
1293: arp_util.debug('Default_Receipt_Method_Info ()+');
1294: END IF;
1295:
1296: p_return_status := FND_API.G_RET_STS_SUCCESS;
1297:
1354: END IF;
1355: END IF;
1356:
1357: IF PG_DEBUG in ('Y', 'C') THEN
1358: arp_util.debug('Default_Receipt_Method_Info ()-');
1359: END IF;
1360:
1361: EXCEPTION
1362: WHEN no_data_found THEN
1369: p_return_status := FND_API.G_RET_STS_ERROR;
1370: FND_MESSAGE.SET_NAME('AR','AR_RAPI_REM_BK_AC_ID_NULL');
1371: FND_MSG_PUB.Add;
1372: IF PG_DEBUG in ('Y', 'C') THEN
1373: arp_util.debug('Default_Receipt_Method_Info: ' || 'The remittance bank account could not be defaulted ');
1374: END IF;
1375: WHEN others THEN
1376: IF PG_DEBUG in ('Y', 'C') THEN
1377: arp_util.debug('EXCEPTION: Default_Receipt_Method_info() ');
1373: arp_util.debug('Default_Receipt_Method_Info: ' || 'The remittance bank account could not be defaulted ');
1374: END IF;
1375: WHEN others THEN
1376: IF PG_DEBUG in ('Y', 'C') THEN
1377: arp_util.debug('EXCEPTION: Default_Receipt_Method_info() ');
1378: arp_util.debug('Default_Receipt_Method_Info: ' || 'p_receipt_method_id = '
1379: ||TO_CHAR(p_receipt_method_id));
1380: END IF;
1381: raise;
1374: END IF;
1375: WHEN others THEN
1376: IF PG_DEBUG in ('Y', 'C') THEN
1377: arp_util.debug('EXCEPTION: Default_Receipt_Method_info() ');
1378: arp_util.debug('Default_Receipt_Method_Info: ' || 'p_receipt_method_id = '
1379: ||TO_CHAR(p_receipt_method_id));
1380: END IF;
1381: raise;
1382:
1394: l_chart_of_accounts_id gl_sets_of_books.chart_of_accounts_id%type;
1395: l_validation_date date ;
1396: BEGIN
1397: IF PG_DEBUG in ('Y', 'C') THEN
1398: arp_util.debug('validate_cc_segments ()+');
1399: END IF;
1400: p_return_status := FND_API.G_RET_STS_SUCCESS;
1401: l_validation_date := p_gl_date;
1402: l_chart_of_accounts_id := arp_global.chart_of_accounts_id;
1400: p_return_status := FND_API.G_RET_STS_SUCCESS;
1401: l_validation_date := p_gl_date;
1402: l_chart_of_accounts_id := arp_global.chart_of_accounts_id;
1403: IF PG_DEBUG in ('Y', 'C') THEN
1404: arp_util.debug('l_chart_of_accounts_id = '||to_char(l_chart_of_accounts_id));
1405: END IF;
1406: l_concat_segs := fnd_flex_ext.get_segs('SQLGL','GL#',
1407: l_chart_of_accounts_id,
1408: p_code_combination_id);
1406: l_concat_segs := fnd_flex_ext.get_segs('SQLGL','GL#',
1407: l_chart_of_accounts_id,
1408: p_code_combination_id);
1409: IF PG_DEBUG in ('Y', 'C') THEN
1410: arp_util.debug('l_concat_segs = '||l_concat_segs);
1411: END IF;
1412: l_value := FND_FLEX_KEYVAL.validate_segs('CHECK_SEGMENTS','SQLGL','GL#',
1413: l_chart_of_accounts_id,
1414: l_concat_segs,
1414: l_concat_segs,
1415: 'V',l_validation_date);
1416: IF l_value THEN
1417: IF PG_DEBUG in ('Y', 'C') THEN
1418: arp_util.debug('Returning true');
1419: END IF;
1420: ELSE
1421: IF PG_DEBUG in ('Y', 'C') THEN
1422: arp_util.debug('Returning False');
1418: arp_util.debug('Returning true');
1419: END IF;
1420: ELSE
1421: IF PG_DEBUG in ('Y', 'C') THEN
1422: arp_util.debug('Returning False');
1423: END IF;
1424: END IF;
1425: IF (NOT l_value) THEN
1426: FND_MESSAGE.SET_NAME('AR',p_message);
1454: l_gl_date DATE;
1455: l_cc_val_ret_status VARCHAR2(1) DEFAULT FND_API.G_RET_STS_SUCCESS;
1456: BEGIN
1457: IF PG_DEBUG in ('Y', 'C') THEN
1458: arp_util.debug('Validate_Receipt_Method_ccid ()+');
1459: END IF;
1460: p_return_status := FND_API.G_RET_STS_SUCCESS;
1461: l_gl_date := p_gl_date;
1462: IF p_receipt_method_id IS NOT NULL
1654: l_cross_rate NUMBER;
1655: l_conversion_rate NUMBER;
1656: BEGIN
1657: IF PG_DEBUG in ('Y', 'C') THEN
1658: arp_util.debug('Default_Currency_info ()+');
1659: END IF;
1660: p_return_status := FND_API.G_RET_STS_SUCCESS;
1661:
1662: IF p_currency_code <> arp_global.functional_currency THEN
1741: END IF; --if echange rate type IS NOT NULL
1742: END IF; --entered_currency <> functional currency
1743:
1744: IF PG_DEBUG in ('Y', 'C') THEN
1745: arp_util.debug('Default_Currency_info ()+');
1746: END IF;
1747: EXCEPTION
1748: WHEN others THEN
1749: IF PG_DEBUG in ('Y', 'C') THEN
1746: END IF;
1747: EXCEPTION
1748: WHEN others THEN
1749: IF PG_DEBUG in ('Y', 'C') THEN
1750: arp_util.debug('EXCEPTION: Default_Currency_Info() ');
1751: arp_util.debug('Default_Currency_info: ' || 'p_currency_code = '||p_currency_code);
1752: END IF;
1753: raise;
1754: END Default_Currency_Info;
1747: EXCEPTION
1748: WHEN others THEN
1749: IF PG_DEBUG in ('Y', 'C') THEN
1750: arp_util.debug('EXCEPTION: Default_Currency_Info() ');
1751: arp_util.debug('Default_Currency_info: ' || 'p_currency_code = '||p_currency_code);
1752: END IF;
1753: raise;
1754: END Default_Currency_Info;
1755:
1788: l_get_x_val_return_status VARCHAR2(1);
1789: l_boe_flag VARCHAR2(1);
1790: BEGIN
1791: IF PG_DEBUG in ('Y', 'C') THEN
1792: arp_util.debug('Default_cash_ids_from_values ()+');
1793: END IF;
1794: p_return_status := FND_API.G_RET_STS_SUCCESS;
1795: -- Customer ID/Number/Name
1796: -- If 0 has been entered in as the customer ID, consider it null
1947:
1948: EXCEPTION
1949: WHEN no_data_found THEN
1950: IF PG_DEBUG in ('Y', 'C') THEN
1951: arp_util.debug('Default_cash_ids: ' || 'Invalid receipt method id');
1952: END IF;
1953: null;
1954: END;
1955:
2209: END IF;
2210:
2211:
2212: IF PG_DEBUG in ('Y', 'C') THEN
2213: arp_util.debug('Default_cash_ids_from_values ()-');
2214: END IF;
2215: EXCEPTION
2216: WHEN others THEN
2217: IF PG_DEBUG in ('Y', 'C') THEN
2214: END IF;
2215: EXCEPTION
2216: WHEN others THEN
2217: IF PG_DEBUG in ('Y', 'C') THEN
2218: arp_util.debug('EXCEPTION: Default_cash_ids_from_values() ',
2219: G_MSG_UERROR);
2220: END IF;
2221: raise;
2222:
2255: l_bank_acc_val_ret_status VARCHAR2(1) DEFAULT FND_API.G_RET_STS_SUCCESS;
2256: BEGIN
2257:
2258: IF PG_DEBUG in ('Y', 'C') THEN
2259: arp_util.debug('Get_Cash_Defaults()+ ');
2260: END IF;
2261: p_return_status := FND_API.G_RET_STS_SUCCESS;
2262: -- default the receipt date if NULL
2263: IF (p_receipt_date IS NULL)
2273: p_gl_date,
2274: NULL,
2275: l_def_gl_dt_return_status);
2276: IF PG_DEBUG in ('Y', 'C') THEN
2277: arp_util.debug('Get_Cash_Defaults: ' || 'l_default_gl_date_return_status : '||l_def_gl_dt_return_status);
2278: END IF;
2279: END IF;
2280:
2281: IF (p_deposit_date IS NULL)
2297: );
2298:
2299: --Set the precision of the receipt amount as per currency
2300: IF p_amount is NOT NULL THEN
2301: p_amount := arp_util.CurrRound( p_amount,
2302: p_currency_code
2303: );
2304: END IF;
2305:
2331: l_bank_acc_val_ret_status <> FND_API.G_RET_STS_SUCCESS THEN /* Bug3315058 */
2332: p_return_status := FND_API.G_RET_STS_ERROR;
2333: END IF;
2334: IF PG_DEBUG in ('Y', 'C') THEN
2335: arp_util.debug('Get_Cash_Defaults: ' || '************Cash Defaults********************');
2336: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
2337: arp_util.debug('Get_Cash_Defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2332: p_return_status := FND_API.G_RET_STS_ERROR;
2333: END IF;
2334: IF PG_DEBUG in ('Y', 'C') THEN
2335: arp_util.debug('Get_Cash_Defaults: ' || '************Cash Defaults********************');
2336: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
2337: arp_util.debug('Get_Cash_Defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2333: END IF;
2334: IF PG_DEBUG in ('Y', 'C') THEN
2335: arp_util.debug('Get_Cash_Defaults: ' || '************Cash Defaults********************');
2336: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
2337: arp_util.debug('Get_Cash_Defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2334: IF PG_DEBUG in ('Y', 'C') THEN
2335: arp_util.debug('Get_Cash_Defaults: ' || '************Cash Defaults********************');
2336: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
2337: arp_util.debug('Get_Cash_Defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2335: arp_util.debug('Get_Cash_Defaults: ' || '************Cash Defaults********************');
2336: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
2337: arp_util.debug('Get_Cash_Defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2336: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
2337: arp_util.debug('Get_Cash_Defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2337: arp_util.debug('Get_Cash_Defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2345: arp_util.debug('Get_Cash_Defaults: ' || 'remit bank acct use id : '||to_char(p_remittance_bank_account_id));
2338: arp_util.debug('Get_Cash_Defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2345: arp_util.debug('Get_Cash_Defaults: ' || 'remit bank acct use id : '||to_char(p_remittance_bank_account_id));
2346: arp_util.debug('Get_Cash_Defaults: ' || 'p_state : '||p_state);
2339: arp_util.debug('Get_Cash_Defaults: ' || 'p_maturity_date : '||to_char(p_maturity_date,'DD-MON-YYYY'));
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2345: arp_util.debug('Get_Cash_Defaults: ' || 'remit bank acct use id : '||to_char(p_remittance_bank_account_id));
2346: arp_util.debug('Get_Cash_Defaults: ' || 'p_state : '||p_state);
2347: arp_util.debug('Get_Cash_Defaults ()-');
2340: arp_util.debug('Get_Cash_Defaults: ' || 'p_currency_code : '||p_currency_code);
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2345: arp_util.debug('Get_Cash_Defaults: ' || 'remit bank acct use id : '||to_char(p_remittance_bank_account_id));
2346: arp_util.debug('Get_Cash_Defaults: ' || 'p_state : '||p_state);
2347: arp_util.debug('Get_Cash_Defaults ()-');
2348: END IF;
2341: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_rate_date,'DD-MON-YYYY'));
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2345: arp_util.debug('Get_Cash_Defaults: ' || 'remit bank acct use id : '||to_char(p_remittance_bank_account_id));
2346: arp_util.debug('Get_Cash_Defaults: ' || 'p_state : '||p_state);
2347: arp_util.debug('Get_Cash_Defaults ()-');
2348: END IF;
2349: END Get_Cash_Defaults;
2342: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2345: arp_util.debug('Get_Cash_Defaults: ' || 'remit bank acct use id : '||to_char(p_remittance_bank_account_id));
2346: arp_util.debug('Get_Cash_Defaults: ' || 'p_state : '||p_state);
2347: arp_util.debug('Get_Cash_Defaults ()-');
2348: END IF;
2349: END Get_Cash_Defaults;
2350:
2343: arp_util.debug('Get_Cash_Defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
2344: arp_util.debug('Get_Cash_Defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
2345: arp_util.debug('Get_Cash_Defaults: ' || 'remit bank acct use id : '||to_char(p_remittance_bank_account_id));
2346: arp_util.debug('Get_Cash_Defaults: ' || 'p_state : '||p_state);
2347: arp_util.debug('Get_Cash_Defaults ()-');
2348: END IF;
2349: END Get_Cash_Defaults;
2350:
2351: FUNCTION Get_grace_days(
2379:
2380: EXCEPTION
2381: WHEN OTHERS THEN
2382: IF PG_DEBUG in ('Y', 'C') THEN
2383: arp_util.debug('EXCEPTION: Get_grace_days()');
2384: END IF;
2385: raise;
2386: END Get_grace_days;
2387:
2399: l_amount_applied NUMBER;
2400: l_amount_applied_from NUMBER;
2401: BEGIN
2402: IF PG_DEBUG in ('Y', 'C') THEN
2403: arp_util.debug('Default_trans_to_receipt_rate ()+');
2404: END IF;
2405:
2406: p_return_status := FND_API.G_RET_STS_SUCCESS;
2407: --if the trx currency and the receipt currency are not same
2442: --rate does not exist set appropriate message.
2443: --p_return_status := FND_API.G_RET_STS_ERROR ;
2444: l_temp_rate := NULL;
2445: IF PG_DEBUG in ('Y', 'C') THEN
2446: arp_util.debug('Default_trans_to_receipt_rate: ' || 'Exception : gl_currency_api.NO_RATE ');
2447: END IF;
2448: WHEN gl_currency_api.INVALID_CURRENCY THEN
2449: -- invalid currency set appropriate message.
2450: --p_return_status := FND_API.G_RET_STS_ERROR ;
2449: -- invalid currency set appropriate message.
2450: --p_return_status := FND_API.G_RET_STS_ERROR ;
2451: l_temp_rate := NULL;
2452: IF PG_DEBUG in ('Y', 'C') THEN
2453: arp_util.debug('Default_trans_to_receipt_rate: ' || 'Exception: gl_currency_api.INVALID_CURRENCY ');
2454: END IF;
2455: END;
2456: END IF ;
2457:
2474: --rate does not exist set appropriate message.
2475: --p_return_status := FND_API.G_RET_STS_ERROR ;
2476: l_temp_rate := NULL;
2477: IF PG_DEBUG in ('Y', 'C') THEN
2478: arp_util.debug('Default_trans_to_receipt_rate: ' || 'Exception : gl_currency_api.NO_RATE ');
2479: END IF;
2480: WHEN gl_currency_api.INVALID_CURRENCY THEN
2481: -- invalid currency set appropriate message.
2482: --p_return_status := FND_API.G_RET_STS_ERROR ;
2481: -- invalid currency set appropriate message.
2482: --p_return_status := FND_API.G_RET_STS_ERROR ;
2483: l_temp_rate := NULL;
2484: IF PG_DEBUG in ('Y', 'C') THEN
2485: arp_util.debug('Default_trans_to_receipt_rate: ' || 'Exception: gl_currency_api.INVALID_CURRENCY ');
2486: END IF;
2487: END;
2488:
2489: IF p_trans_to_receipt_rate IS NOT NULL THEN
2516:
2517: IF p_amount_applied_from IS NOT NULL AND
2518: p_amount_applied IS NOT NULL
2519: THEN
2520: l_amount_applied_from := arp_util.CurrRound(
2521: p_amount_applied_from,
2522: p_cr_currency_code
2523: );
2524: /* Bugfix 2916389. Use p_trx_currency_code instead of
2522: p_cr_currency_code
2523: );
2524: /* Bugfix 2916389. Use p_trx_currency_code instead of
2525: p_cr_currency_code. */
2526: l_amount_applied := arp_util.CurrRound(
2527: p_amount_applied,
2528: p_trx_currency_code
2529: );
2530: p_trans_to_receipt_rate := ROUND(l_amount_applied_from/l_amount_applied, 38);
2533: END IF;
2534:
2535: END IF;
2536: IF PG_DEBUG in ('Y', 'C') THEN
2537: arp_util.debug('Default_trans_to_receipt_rate: ' || 'p_trans_to_receipt_rate :'||to_char(p_trans_to_receipt_rate));
2538: arp_util.debug('Default_trans_to_receipt_rate ()-');
2539: END IF;
2540: EXCEPTION
2541: WHEN others THEN
2534:
2535: END IF;
2536: IF PG_DEBUG in ('Y', 'C') THEN
2537: arp_util.debug('Default_trans_to_receipt_rate: ' || 'p_trans_to_receipt_rate :'||to_char(p_trans_to_receipt_rate));
2538: arp_util.debug('Default_trans_to_receipt_rate ()-');
2539: END IF;
2540: EXCEPTION
2541: WHEN others THEN
2542: IF PG_DEBUG in ('Y', 'C') THEN
2539: END IF;
2540: EXCEPTION
2541: WHEN others THEN
2542: IF PG_DEBUG in ('Y', 'C') THEN
2543: arp_util.debug('EXCEPTION: Default_trans_to_receipt_rate()');
2544: END IF;
2545: raise;
2546: END Default_trans_to_receipt_rate;
2547:
2568:
2569:
2570: BEGIN
2571: IF PG_DEBUG in ('Y', 'C') THEN
2572: arp_util.debug('Default_amount_applied_from ()+');
2573: END IF;
2574: p_return_status := FND_API.G_RET_STS_SUCCESS;
2575:
2576: -- Added for Bug 13595334
2643: l_total_amt_app_from := l_total_amt_app * p_trans_to_receipt_rate;
2644:
2645: l_amount_app_from := l_total_amt_app_from -l_amt_app_from_prev;
2646:
2647: p_amount_applied_from := arp_util.currround(l_amount_app_from, p_cr_currency_code);
2648:
2649: ELSE
2650: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2651: END IF;
2646:
2647: p_amount_applied_from := arp_util.currround(l_amount_app_from, p_cr_currency_code);
2648:
2649: ELSE
2650: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2651: END IF;
2652:
2653: ELSE
2654: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2650: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2651: END IF;
2652:
2653: ELSE
2654: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2655: END IF;
2656: ELSE
2657: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2658: END IF;
2653: ELSE
2654: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2655: END IF;
2656: ELSE
2657: p_amount_applied_from := arp_util.currround(p_amount_applied * p_trans_to_receipt_rate, p_cr_currency_code);
2658: END IF;
2659: END IF;
2660:
2661: END IF;
2661: END IF;
2662:
2663: ELSE
2664: --if user has entered the amount_applied_from then round it.
2665: p_amount_applied_from := arp_util.CurrRound(
2666: p_amount_applied_from,
2667: p_cr_currency_code
2668: );
2669: END IF;
2668: );
2669: END IF;
2670:
2671: IF PG_DEBUG in ('Y', 'C') THEN
2672: arp_util.debug('Default_amount_applied_from ()+');
2673: END IF;
2674:
2675: EXCEPTION
2676: WHEN others THEN
2674:
2675: EXCEPTION
2676: WHEN others THEN
2677: IF PG_DEBUG in ('Y', 'C') THEN
2678: arp_util.debug('Default_amount_applied_from: ' || 'EXCEPTION: Default_applied_amount_from()');
2679: END IF;
2680: raise;
2681:
2682: END Default_amount_applied_from;
2740:
2741:
2742: BEGIN
2743: IF PG_DEBUG in ('Y', 'C') THEN
2744: arp_util.debug('Default_val_llca_parameters()+');
2745: END IF;
2746: p_return_status := FND_API.G_RET_STS_SUCCESS;
2747:
2748:
2753: p_msg_data,
2754: p_msg_count);
2755:
2756: IF PG_DEBUG in ('Y', 'C') THEN
2757: arp_util.debug('Default_val_llca_parameters: Initialization Return Status : '||p_return_status);
2758: END IF;
2759:
2760: IF p_return_status <> FND_API.G_RET_STS_SUCCESS
2761: THEN
2764: FND_MSG_PUB.Add;
2765: p_return_status := FND_API.G_RET_STS_ERROR ;
2766:
2767: IF PG_DEBUG in ('Y', 'C') THEN
2768: arp_util.debug('Apply_In_Detail: ' || 'Error(s) occurred in arp_process_det_pkg.Initialization ');
2769: END IF;
2770: Return;
2771: END IF;
2772:
2772:
2773: IF p_llca_type = 'S'
2774: THEN
2775: IF PG_DEBUG in ('Y', 'C') THEN
2776: arp_util.debug('Default_val_llca_parameters: Summary Level Application ');
2777: END IF;
2778: IF p_line_amount IS NULL AND p_tax_amount IS NULL
2779: AND p_freight_amount IS NULL AND p_charges_amount is NULL
2780: THEN
2796: FND_MSG_PUB.Add;
2797: END IF;
2798:
2799: IF PG_DEBUG in ('Y', 'C') THEN
2800: arp_util.debug('Default_application_info: ' ||
2801: 'Amount applied has been defaulted to the sum of
2802: line/tax/freight/charges amount ');
2803: END IF;
2804: END IF;
2806:
2807: Elsif P_llca_type = 'L'
2808: Then
2809: IF PG_DEBUG in ('Y', 'C') THEN
2810: arp_util.debug('Default_val_llca_parameters: Line Level Application ');
2811: END IF;
2812: IF ( Nvl(p_line_amount,0) <> 0
2813: and Nvl(p_tax_amount,0) <> 0
2814: and nvl(p_charges_amount,0) <> 0
2823: FND_MSG_PUB.Add;
2824: END IF;
2825:
2826: IF PG_DEBUG in ('Y', 'C') THEN
2827: arp_util.debug('Default_val_llca_parameters: ' || 'Line, Tax,
2828: , Charges amount has been defaulted to Null');
2829: END IF;
2830: END IF;
2831:
2847: FND_MSG_PUB.Add;
2848: END IF;
2849:
2850: IF PG_DEBUG in ('Y', 'C') THEN
2851: arp_util.debug('Default_val_llca_parameters: ' || 'Amount applied
2852: amount has been defaulted to Null');
2853: END IF;
2854: END IF;
2855: Else
2854: END IF;
2855: Else
2856: -- Specified Lines
2857: IF PG_DEBUG in ('Y', 'C') THEN
2858: arp_util.debug('Specified one or more lines in PLSQL table... ');
2859: END IF;
2860:
2861: -- Calculate the line level amounts
2862: For sp_lines_row in gt_lines_cur(p_customer_trx_id)
2905: and line.customer_trx_line_id = tax.link_to_cust_trx_line_id (+);
2906: EXCEPTION
2907: WHEN NO_DATA_FOUND THEN
2908: IF PG_DEBUG in ('Y', 'C') THEN
2909: arp_util.debug('' || 'EXCEPTION: Default_val_llca_parameters()');
2910: END IF;
2911: p_return_status := FND_API.G_RET_STS_ERROR ;
2912: FND_MESSAGE.SET_NAME( 'AR','AR_RAPI_TRX_LINE_ID_INVALID');
2913: FND_MSG_PUB.ADD;
2913: FND_MSG_PUB.ADD;
2914: RAISE;
2915: WHEN others THEN
2916: IF PG_DEBUG in ('Y', 'C') THEN
2917: arp_util.debug('' || 'EXCEPTION: Default_val_llca_parameters()');
2918: END IF;
2919: RAISE;
2920: END;
2921: IF PG_DEBUG in ('Y', 'C') THEN
2918: END IF;
2919: RAISE;
2920: END;
2921: IF PG_DEBUG in ('Y', 'C') THEN
2922: arp_util.debug('Customer_trx_line_id =>'||to_char(sp_lines_row.customer_trx_line_id));
2923: END IF;
2924: Select decode ( ( Nvl(l_line_amount_remaining,0)
2925: / ( Nvl(l_line_amount_remaining,0)
2926: + Nvl(l_line_tax_remaining,0)
2949: sp_lines_row.amount_applied_from,
2950: p_cr_date,
2951: l_def_rate_return_status
2952: );
2953: sp_lines_row.amount_applied := arp_util.CurrRound(
2954: sp_lines_row.amount_applied_from / l_trans_to_receipt_rate,
2955: p_invoice_currency_code);
2956: sp_lines_row.tax_amount := NULL;
2957: sp_lines_row.line_amount := NULL;
2957: sp_lines_row.line_amount := NULL;
2958:
2959:
2960: IF PG_DEBUG in ('Y', 'C') THEN
2961: arp_util.debug('Default_val_llca_parameters: ' || 'Default trans_to_receipt_rate status: '||l_def_rate_return_status);
2962: arp_util.debug('Default_val_llca_parameters: ' || 'l_trans_to_receipt_rate: '||l_trans_to_receipt_rate);
2963: arp_util.debug('Default_val_llca_parameters: ' || 'sp_lines_row.amount_applied: '||sp_lines_row.amount_applied);
2964: END IF;
2965:
2958:
2959:
2960: IF PG_DEBUG in ('Y', 'C') THEN
2961: arp_util.debug('Default_val_llca_parameters: ' || 'Default trans_to_receipt_rate status: '||l_def_rate_return_status);
2962: arp_util.debug('Default_val_llca_parameters: ' || 'l_trans_to_receipt_rate: '||l_trans_to_receipt_rate);
2963: arp_util.debug('Default_val_llca_parameters: ' || 'sp_lines_row.amount_applied: '||sp_lines_row.amount_applied);
2964: END IF;
2965:
2966: END IF;
2959:
2960: IF PG_DEBUG in ('Y', 'C') THEN
2961: arp_util.debug('Default_val_llca_parameters: ' || 'Default trans_to_receipt_rate status: '||l_def_rate_return_status);
2962: arp_util.debug('Default_val_llca_parameters: ' || 'l_trans_to_receipt_rate: '||l_trans_to_receipt_rate);
2963: arp_util.debug('Default_val_llca_parameters: ' || 'sp_lines_row.amount_applied: '||sp_lines_row.amount_applied);
2964: END IF;
2965:
2966: END IF;
2967: END IF;
2972: -- First Priority Line Amount
2973: If sp_lines_row.line_amount is not null /*Nvl(sp_lines_row.line_amount,0) <> 0*/
2974: Then
2975: IF PG_DEBUG in ('Y', 'C') THEN
2976: arp_util.debug('First priority : Line Amount ');
2977: arp_util.debug('Line Amount has taken precedence over the amount applied ');
2978: END IF;
2979: l_calc_tot_amount_app := arp_util.CurrRound(
2980: ( nvl(sp_lines_row.line_amount,0)
2973: If sp_lines_row.line_amount is not null /*Nvl(sp_lines_row.line_amount,0) <> 0*/
2974: Then
2975: IF PG_DEBUG in ('Y', 'C') THEN
2976: arp_util.debug('First priority : Line Amount ');
2977: arp_util.debug('Line Amount has taken precedence over the amount applied ');
2978: END IF;
2979: l_calc_tot_amount_app := arp_util.CurrRound(
2980: ( nvl(sp_lines_row.line_amount,0)
2981: / nvl(l_calc_line_per,1)
2975: IF PG_DEBUG in ('Y', 'C') THEN
2976: arp_util.debug('First priority : Line Amount ');
2977: arp_util.debug('Line Amount has taken precedence over the amount applied ');
2978: END IF;
2979: l_calc_tot_amount_app := arp_util.CurrRound(
2980: ( nvl(sp_lines_row.line_amount,0)
2981: / nvl(l_calc_line_per,1)
2982: )
2983: ,p_invoice_currency_code);
2980: ( nvl(sp_lines_row.line_amount,0)
2981: / nvl(l_calc_line_per,1)
2982: )
2983: ,p_invoice_currency_code);
2984: l_calc_line_amount := arp_util.CurrRound(sp_lines_row.line_amount
2985: ,p_invoice_currency_code);
2986:
2987: -- Calculate Line amount based on the Amount Applied.
2988: Elsif sp_lines_row.amount_applied is not null /*Nvl(sp_lines_row.amount_applied,0) <> 0*/
2987: -- Calculate Line amount based on the Amount Applied.
2988: Elsif sp_lines_row.amount_applied is not null /*Nvl(sp_lines_row.amount_applied,0) <> 0*/
2989: Then
2990: IF PG_DEBUG in ('Y', 'C') THEN
2991: arp_util.debug('Considered the Amount Applied value ');
2992: End If;
2993:
2994: l_calc_tot_amount_app := arp_util.CurrRound(sp_lines_row.amount_applied
2995: ,p_invoice_currency_code);
2990: IF PG_DEBUG in ('Y', 'C') THEN
2991: arp_util.debug('Considered the Amount Applied value ');
2992: End If;
2993:
2994: l_calc_tot_amount_app := arp_util.CurrRound(sp_lines_row.amount_applied
2995: ,p_invoice_currency_code);
2996: l_calc_line_amount := arp_util.CurrRound((l_calc_tot_amount_app
2997: * l_calc_line_per),p_invoice_currency_code);
2998: End If;
2992: End If;
2993:
2994: l_calc_tot_amount_app := arp_util.CurrRound(sp_lines_row.amount_applied
2995: ,p_invoice_currency_code);
2996: l_calc_line_amount := arp_util.CurrRound((l_calc_tot_amount_app
2997: * l_calc_line_per),p_invoice_currency_code);
2998: End If;
2999:
3000: IF PG_DEBUG in ('Y', 'C') THEN
2997: * l_calc_line_per),p_invoice_currency_code);
2998: End If;
2999:
3000: IF PG_DEBUG in ('Y', 'C') THEN
3001: arp_util.debug('l_calc_tot_amount_app -> '||to_char(l_calc_tot_amount_app));
3002: arp_util.debug('l_calc_line_amount -> '||to_char(l_calc_line_amount));
3003: END IF;
3004:
3005:
2998: End If;
2999:
3000: IF PG_DEBUG in ('Y', 'C') THEN
3001: arp_util.debug('l_calc_tot_amount_app -> '||to_char(l_calc_tot_amount_app));
3002: arp_util.debug('l_calc_line_amount -> '||to_char(l_calc_line_amount));
3003: END IF;
3004:
3005:
3006: -- Tax amount has taken precedence over the Line / amount applied
3006: -- Tax amount has taken precedence over the Line / amount applied
3007: If sp_lines_row.tax_amount is not null /*NVL(sp_lines_row.tax_amount,0) <> 0*/
3008: THEN
3009: IF PG_DEBUG in ('Y', 'C') THEN
3010: arp_util.debug('Tax Amount has taken precedence over the amount applied ');
3011: End If;
3012: l_calc_tax_amount := arp_util.CurrRound(sp_lines_row.tax_amount
3013: ,p_invoice_currency_code);
3014:
3008: THEN
3009: IF PG_DEBUG in ('Y', 'C') THEN
3010: arp_util.debug('Tax Amount has taken precedence over the amount applied ');
3011: End If;
3012: l_calc_tax_amount := arp_util.CurrRound(sp_lines_row.tax_amount
3013: ,p_invoice_currency_code);
3014:
3015: l_calc_tot_amount_app := l_calc_line_amount +
3016: l_calc_tax_amount;
3015: l_calc_tot_amount_app := l_calc_line_amount +
3016: l_calc_tax_amount;
3017: Else
3018: IF PG_DEBUG in ('Y', 'C') THEN
3019: arp_util.debug('Amount Applied has taken precedence over the Tax Amount');
3020: End If;
3021: -- Amount applied has taken precedence over the tax amount
3022: l_calc_tax_amount := arp_util.CurrRound((Nvl(l_calc_tot_amount_app,0)
3023: - Nvl(l_calc_line_amount,0))
3018: IF PG_DEBUG in ('Y', 'C') THEN
3019: arp_util.debug('Amount Applied has taken precedence over the Tax Amount');
3020: End If;
3021: -- Amount applied has taken precedence over the tax amount
3022: l_calc_tax_amount := arp_util.CurrRound((Nvl(l_calc_tot_amount_app,0)
3023: - Nvl(l_calc_line_amount,0))
3024: ,p_invoice_currency_code);
3025: End If;
3026:
3035: END If;
3036:
3037:
3038: IF PG_DEBUG in ('Y', 'C') THEN
3039: arp_util.debug('l_calc_tot_amount_app -> '||to_char(l_calc_tot_amount_app));
3040: arp_util.debug('l_calc_line_amount -> '||to_char(l_calc_line_amount));
3041: arp_util.debug('l_calc_tax_amount -> '||to_char(l_calc_tax_amount));
3042: END IF;
3043:
3036:
3037:
3038: IF PG_DEBUG in ('Y', 'C') THEN
3039: arp_util.debug('l_calc_tot_amount_app -> '||to_char(l_calc_tot_amount_app));
3040: arp_util.debug('l_calc_line_amount -> '||to_char(l_calc_line_amount));
3041: arp_util.debug('l_calc_tax_amount -> '||to_char(l_calc_tax_amount));
3042: END IF;
3043:
3044: -- Check for overapply
3037:
3038: IF PG_DEBUG in ('Y', 'C') THEN
3039: arp_util.debug('l_calc_tot_amount_app -> '||to_char(l_calc_tot_amount_app));
3040: arp_util.debug('l_calc_line_amount -> '||to_char(l_calc_line_amount));
3041: arp_util.debug('l_calc_tax_amount -> '||to_char(l_calc_tax_amount));
3042: END IF;
3043:
3044: -- Check for overapply
3045: l_payment_amount_cal := (-1) * l_calc_tot_amount_app;
3120: l_cum_line_discount := Nvl(l_cum_line_discount,0) + Nvl(sp_lines_row.line_discount,0);
3121: l_cum_tax_discount := Nvl(l_cum_tax_discount,0) + Nvl(sp_lines_row.tax_discount,0);
3122:
3123: IF PG_DEBUG in ('Y', 'C') THEN
3124: arp_util.debug('l_cum_tot_amount_app -> '||to_char(l_cum_amount_app));
3125: arp_util.debug('l_cum_line_amount -> '||to_char(l_cum_line_amount));
3126: arp_util.debug('l_cum_tax_amount -> '||to_char(l_cum_tax_amount));
3127: arp_util.debug('l_cum_line_discount -> '||to_char(l_cum_line_discount));
3128: arp_util.debug('l_cum_tax_discount -> '||to_char(l_cum_tax_discount));
3121: l_cum_tax_discount := Nvl(l_cum_tax_discount,0) + Nvl(sp_lines_row.tax_discount,0);
3122:
3123: IF PG_DEBUG in ('Y', 'C') THEN
3124: arp_util.debug('l_cum_tot_amount_app -> '||to_char(l_cum_amount_app));
3125: arp_util.debug('l_cum_line_amount -> '||to_char(l_cum_line_amount));
3126: arp_util.debug('l_cum_tax_amount -> '||to_char(l_cum_tax_amount));
3127: arp_util.debug('l_cum_line_discount -> '||to_char(l_cum_line_discount));
3128: arp_util.debug('l_cum_tax_discount -> '||to_char(l_cum_tax_discount));
3129: END IF;
3122:
3123: IF PG_DEBUG in ('Y', 'C') THEN
3124: arp_util.debug('l_cum_tot_amount_app -> '||to_char(l_cum_amount_app));
3125: arp_util.debug('l_cum_line_amount -> '||to_char(l_cum_line_amount));
3126: arp_util.debug('l_cum_tax_amount -> '||to_char(l_cum_tax_amount));
3127: arp_util.debug('l_cum_line_discount -> '||to_char(l_cum_line_discount));
3128: arp_util.debug('l_cum_tax_discount -> '||to_char(l_cum_tax_discount));
3129: END IF;
3130: End Loop;
3123: IF PG_DEBUG in ('Y', 'C') THEN
3124: arp_util.debug('l_cum_tot_amount_app -> '||to_char(l_cum_amount_app));
3125: arp_util.debug('l_cum_line_amount -> '||to_char(l_cum_line_amount));
3126: arp_util.debug('l_cum_tax_amount -> '||to_char(l_cum_tax_amount));
3127: arp_util.debug('l_cum_line_discount -> '||to_char(l_cum_line_discount));
3128: arp_util.debug('l_cum_tax_discount -> '||to_char(l_cum_tax_discount));
3129: END IF;
3130: End Loop;
3131:
3124: arp_util.debug('l_cum_tot_amount_app -> '||to_char(l_cum_amount_app));
3125: arp_util.debug('l_cum_line_amount -> '||to_char(l_cum_line_amount));
3126: arp_util.debug('l_cum_tax_amount -> '||to_char(l_cum_tax_amount));
3127: arp_util.debug('l_cum_line_discount -> '||to_char(l_cum_line_discount));
3128: arp_util.debug('l_cum_tax_discount -> '||to_char(l_cum_tax_discount));
3129: END IF;
3130: End Loop;
3131:
3132: -- Check for overapply
3137: THEN
3138: p_return_status := FND_API.G_RET_STS_ERROR;
3139:
3140: IF PG_DEBUG in ('Y', 'C') THEN
3141: arp_util.debug('Apply_In_Detail: ' || 'Error(s) occurred in Overapply check. ');
3142: END IF;
3143:
3144: END IF;
3145: -- Check for overapply
3151: p_tax_discount := nvl(l_cum_tax_discount,0);
3152: p_discount := nvl(p_line_discount,0) + nvl(p_tax_discount,0)
3153: + nvl(p_freight_discount,0);
3154: IF PG_DEBUG in ('Y', 'C') THEN
3155: arp_util.debug('p_amount_applied => '||to_char(p_amount_applied) );
3156: arp_util.debug('p_line_amount => '||to_char(l_cum_line_amount));
3157: arp_util.debug('p_tax_amount => '||to_char(l_cum_tax_amount));
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3152: p_discount := nvl(p_line_discount,0) + nvl(p_tax_discount,0)
3153: + nvl(p_freight_discount,0);
3154: IF PG_DEBUG in ('Y', 'C') THEN
3155: arp_util.debug('p_amount_applied => '||to_char(p_amount_applied) );
3156: arp_util.debug('p_line_amount => '||to_char(l_cum_line_amount));
3157: arp_util.debug('p_tax_amount => '||to_char(l_cum_tax_amount));
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3160: arp_util.debug('p_tax_discount => '||to_char(p_tax_discount));
3153: + nvl(p_freight_discount,0);
3154: IF PG_DEBUG in ('Y', 'C') THEN
3155: arp_util.debug('p_amount_applied => '||to_char(p_amount_applied) );
3156: arp_util.debug('p_line_amount => '||to_char(l_cum_line_amount));
3157: arp_util.debug('p_tax_amount => '||to_char(l_cum_tax_amount));
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3160: arp_util.debug('p_tax_discount => '||to_char(p_tax_discount));
3161: arp_util.debug('p_freight_discount => '||to_char(p_freight_discount));
3154: IF PG_DEBUG in ('Y', 'C') THEN
3155: arp_util.debug('p_amount_applied => '||to_char(p_amount_applied) );
3156: arp_util.debug('p_line_amount => '||to_char(l_cum_line_amount));
3157: arp_util.debug('p_tax_amount => '||to_char(l_cum_tax_amount));
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3160: arp_util.debug('p_tax_discount => '||to_char(p_tax_discount));
3161: arp_util.debug('p_freight_discount => '||to_char(p_freight_discount));
3162: arp_util.debug('p_discount (Total) => '||to_char(p_discount));
3155: arp_util.debug('p_amount_applied => '||to_char(p_amount_applied) );
3156: arp_util.debug('p_line_amount => '||to_char(l_cum_line_amount));
3157: arp_util.debug('p_tax_amount => '||to_char(l_cum_tax_amount));
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3160: arp_util.debug('p_tax_discount => '||to_char(p_tax_discount));
3161: arp_util.debug('p_freight_discount => '||to_char(p_freight_discount));
3162: arp_util.debug('p_discount (Total) => '||to_char(p_discount));
3163: END IF;
3156: arp_util.debug('p_line_amount => '||to_char(l_cum_line_amount));
3157: arp_util.debug('p_tax_amount => '||to_char(l_cum_tax_amount));
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3160: arp_util.debug('p_tax_discount => '||to_char(p_tax_discount));
3161: arp_util.debug('p_freight_discount => '||to_char(p_freight_discount));
3162: arp_util.debug('p_discount (Total) => '||to_char(p_discount));
3163: END IF;
3164:
3157: arp_util.debug('p_tax_amount => '||to_char(l_cum_tax_amount));
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3160: arp_util.debug('p_tax_discount => '||to_char(p_tax_discount));
3161: arp_util.debug('p_freight_discount => '||to_char(p_freight_discount));
3162: arp_util.debug('p_discount (Total) => '||to_char(p_discount));
3163: END IF;
3164:
3165: END IF; /* GT COUNT END IF */
3158: arp_util.debug('p_freight_amount => '||to_char(p_freight_amount));
3159: arp_util.debug('p_line_discount => '||to_char(p_line_discount));
3160: arp_util.debug('p_tax_discount => '||to_char(p_tax_discount));
3161: arp_util.debug('p_freight_discount => '||to_char(p_freight_discount));
3162: arp_util.debug('p_discount (Total) => '||to_char(p_discount));
3163: END IF;
3164:
3165: END IF; /* GT COUNT END IF */
3166: END IF; /* P_llca_type ENDIF */
3166: END IF; /* P_llca_type ENDIF */
3167:
3168:
3169: IF PG_DEBUG in ('Y', 'C') THEN
3170: arp_util.debug('Default_val_llca_parameters()-');
3171: END IF;
3172: EXCEPTION
3173: WHEN others THEN
3174: IF PG_DEBUG in ('Y', 'C') THEN
3171: END IF;
3172: EXCEPTION
3173: WHEN others THEN
3174: IF PG_DEBUG in ('Y', 'C') THEN
3175: arp_util.debug('EXCEPTION: Default_val_llca_parameters: ()');
3176: END IF;
3177: raise;
3178: END;
3179:
3233: l_allow_discount VARCHAR2(1) DEFAULT 'Y'; /* Bug fix 3450317 */
3234:
3235: BEGIN
3236: IF PG_DEBUG in ('Y', 'C') THEN
3237: arp_util.debug('Default_disc_and_amt_applied ()+');
3238: END IF;
3239: p_return_status := FND_API.G_RET_STS_SUCCESS;
3240: IF PG_DEBUG in ('Y', 'C') THEN
3241: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3237: arp_util.debug('Default_disc_and_amt_applied ()+');
3238: END IF;
3239: p_return_status := FND_API.G_RET_STS_SUCCESS;
3240: IF PG_DEBUG in ('Y', 'C') THEN
3241: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3242: END IF;
3243: IF p_amount_applied IS NULL THEN
3244: IF PG_DEBUG in ('Y', 'C') THEN
3245: arp_util.debug('Default_disc_and_amt_applied: ' || 'The p_amount_applied is NULL ');
3241: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3242: END IF;
3243: IF p_amount_applied IS NULL THEN
3244: IF PG_DEBUG in ('Y', 'C') THEN
3245: arp_util.debug('Default_disc_and_amt_applied: ' || 'The p_amount_applied is NULL ');
3246: END IF;
3247: IF p_trx_currency_code <> p_cr_currency_code --The cross-currency case
3248: THEN
3249: l_exchange_rate_type := pg_profile_cc_rate_type;
3247: IF p_trx_currency_code <> p_cr_currency_code --The cross-currency case
3248: THEN
3249: l_exchange_rate_type := pg_profile_cc_rate_type;
3250: IF PG_DEBUG in ('Y', 'C') THEN
3251: arp_util.debug('Default_disc_and_amt_applied: ' || 'default cross currency exchange rate type :'||l_exchange_rate_type);
3252: END IF;
3253: IF ( (gl_currency_api.is_fixed_rate(
3254: p_cr_currency_code,
3255: p_trx_currency_code,
3257: ) = 'Y' ) OR
3258: l_exchange_rate_type IS NOT NULL)
3259: THEN
3260: IF PG_DEBUG in ('Y', 'C') THEN
3261: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_trx_currency_code :'||p_trx_currency_code);
3262: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_currency_code :'||p_cr_currency_code);
3263: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_date :'||p_cr_date);
3264: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_exchange_rate_type :'||l_exchange_rate_type);
3265: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_amount_due_remaining :'||to_char(p_amount_due_remaining));
3258: l_exchange_rate_type IS NOT NULL)
3259: THEN
3260: IF PG_DEBUG in ('Y', 'C') THEN
3261: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_trx_currency_code :'||p_trx_currency_code);
3262: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_currency_code :'||p_cr_currency_code);
3263: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_date :'||p_cr_date);
3264: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_exchange_rate_type :'||l_exchange_rate_type);
3265: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_amount_due_remaining :'||to_char(p_amount_due_remaining));
3266: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_unapp_amount :'||to_char(p_cr_unapp_amount));
3259: THEN
3260: IF PG_DEBUG in ('Y', 'C') THEN
3261: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_trx_currency_code :'||p_trx_currency_code);
3262: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_currency_code :'||p_cr_currency_code);
3263: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_date :'||p_cr_date);
3264: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_exchange_rate_type :'||l_exchange_rate_type);
3265: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_amount_due_remaining :'||to_char(p_amount_due_remaining));
3266: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_unapp_amount :'||to_char(p_cr_unapp_amount));
3267: END IF;
3260: IF PG_DEBUG in ('Y', 'C') THEN
3261: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_trx_currency_code :'||p_trx_currency_code);
3262: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_currency_code :'||p_cr_currency_code);
3263: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_date :'||p_cr_date);
3264: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_exchange_rate_type :'||l_exchange_rate_type);
3265: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_amount_due_remaining :'||to_char(p_amount_due_remaining));
3266: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_unapp_amount :'||to_char(p_cr_unapp_amount));
3267: END IF;
3268:
3261: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_trx_currency_code :'||p_trx_currency_code);
3262: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_currency_code :'||p_cr_currency_code);
3263: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_date :'||p_cr_date);
3264: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_exchange_rate_type :'||l_exchange_rate_type);
3265: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_amount_due_remaining :'||to_char(p_amount_due_remaining));
3266: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_unapp_amount :'||to_char(p_cr_unapp_amount));
3267: END IF;
3268:
3269: BEGIN
3262: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_currency_code :'||p_cr_currency_code);
3263: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_date :'||p_cr_date);
3264: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_exchange_rate_type :'||l_exchange_rate_type);
3265: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_amount_due_remaining :'||to_char(p_amount_due_remaining));
3266: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_cr_unapp_amount :'||to_char(p_cr_unapp_amount));
3267: END IF;
3268:
3269: BEGIN
3270:
3291: l_exchange_rate_type,
3292: p_cr_unapp_amount);
3293:
3294: IF PG_DEBUG in ('Y', 'C') THEN
3295: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_convert_amount_inv:'||to_char(l_convert_amount_inv));
3296: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_convert_amount_cr :'||to_char(l_convert_amount_cr));
3297: END IF;
3298:
3299:
3292: p_cr_unapp_amount);
3293:
3294: IF PG_DEBUG in ('Y', 'C') THEN
3295: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_convert_amount_inv:'||to_char(l_convert_amount_inv));
3296: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_convert_amount_cr :'||to_char(l_convert_amount_cr));
3297: END IF;
3298:
3299:
3300: EXCEPTION
3301: WHEN gl_currency_api.NO_RATE THEN
3302: l_convert_amount_inv := NULL;
3303: l_convert_amount_cr := NULL;
3304: IF PG_DEBUG in ('Y', 'C') THEN
3305: arp_util.debug('Default_disc_and_amt_applied: ' || 'No rate exists in the GL for the cross currency conversion ');
3306: END IF;
3307: WHEN gl_currency_api.INVALID_CURRENCY THEN
3308: IF PG_DEBUG in ('Y', 'C') THEN
3309: arp_util.debug('Default_disc_and_amt_applied: ' || 'The Receipt/Invoice currency is Invalid ');
3305: arp_util.debug('Default_disc_and_amt_applied: ' || 'No rate exists in the GL for the cross currency conversion ');
3306: END IF;
3307: WHEN gl_currency_api.INVALID_CURRENCY THEN
3308: IF PG_DEBUG in ('Y', 'C') THEN
3309: arp_util.debug('Default_disc_and_amt_applied: ' || 'The Receipt/Invoice currency is Invalid ');
3310: END IF;
3311: raise;
3312: END;
3313:
3319: pass the invoice amount in invoice currency */
3320:
3321: l_applied_in_amount := p_amount_due_remaining;
3322: IF PG_DEBUG in ('Y', 'C') THEN
3323: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_convert_amount_inv = p_cr_unapp_amount, l_applied_in_amount = ' || to_char(l_applied_in_amount));
3324: END IF;
3325: ELSE
3326: /* bug 2174978 : if invoice amount in receipt currency <> receipt's unapplied amount
3327: pass the receipt amount in invoice currency */
3327: pass the receipt amount in invoice currency */
3328:
3329: l_applied_in_amount := l_convert_amount_cr;
3330: IF PG_DEBUG in ('Y', 'C') THEN
3331: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_convert_amount_inv <> p_cr_unapp_amount, l_applied_in_amount :'||to_char(l_applied_in_amount));
3332: END IF;
3333: END IF;
3334:
3335: /* if exchange rate type was ok, but no rate in GL, the value returned is
3406:
3407: IF p_applied_payment_schedule_id > 0 AND
3408: l_grace_days IS NOT NULL THEN
3409: IF PG_DEBUG in ('Y', 'C') THEN
3410: arp_util.debug('Default_disc_and_amt_applied: ' || 'Before calling the discounts routine ..');
3411: END IF;
3412:
3413: arp_calculate_discount.discounts_cover(
3414: -- IN PARAMETERS
3443: p_out_amount_to_apply => l_out_amount_to_apply,
3444: p_out_discount_to_take => l_discount
3445: );
3446: IF PG_DEBUG in ('Y', 'C') THEN
3447: arp_util.debug('Default_disc_and_amt_applied: ' || 'After calling the discounts routine ..');
3448: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_earned_discount = '||l_out_earned_discount);
3449: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_unearned_discount = '||l_out_unearned_discount);
3450: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_discount = '||l_discount);
3451: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3444: p_out_discount_to_take => l_discount
3445: );
3446: IF PG_DEBUG in ('Y', 'C') THEN
3447: arp_util.debug('Default_disc_and_amt_applied: ' || 'After calling the discounts routine ..');
3448: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_earned_discount = '||l_out_earned_discount);
3449: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_unearned_discount = '||l_out_unearned_discount);
3450: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_discount = '||l_discount);
3451: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3452: END IF;
3445: );
3446: IF PG_DEBUG in ('Y', 'C') THEN
3447: arp_util.debug('Default_disc_and_amt_applied: ' || 'After calling the discounts routine ..');
3448: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_earned_discount = '||l_out_earned_discount);
3449: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_unearned_discount = '||l_out_unearned_discount);
3450: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_discount = '||l_discount);
3451: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3452: END IF;
3453: l_earned_disc_pct := ROUND(l_earned_disc_pct,6);
3446: IF PG_DEBUG in ('Y', 'C') THEN
3447: arp_util.debug('Default_disc_and_amt_applied: ' || 'After calling the discounts routine ..');
3448: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_earned_discount = '||l_out_earned_discount);
3449: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_unearned_discount = '||l_out_unearned_discount);
3450: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_discount = '||l_discount);
3451: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3452: END IF;
3453: l_earned_disc_pct := ROUND(l_earned_disc_pct,6);
3454:
3447: arp_util.debug('Default_disc_and_amt_applied: ' || 'After calling the discounts routine ..');
3448: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_earned_discount = '||l_out_earned_discount);
3449: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_out_unearned_discount = '||l_out_unearned_discount);
3450: arp_util.debug('Default_disc_and_amt_applied: ' || 'l_discount = '||l_discount);
3451: arp_util.debug('Default_disc_and_amt_applied: ' || 'p_discount = '||p_discount);
3452: END IF;
3453: l_earned_disc_pct := ROUND(l_earned_disc_pct,6);
3454:
3455: -- Store the maximum allowed discount, to be used later while validating
3452: END IF;
3453: l_earned_disc_pct := ROUND(l_earned_disc_pct,6);
3454:
3455: -- Store the maximum allowed discount, to be used later while validating
3456: p_discount_max_allowed :=arp_util.CurrRound( l_out_earned_discount+
3457: l_out_unearned_discount,
3458: p_trx_currency_code);
3459: p_discount_earned_allowed := l_out_earned_discount;
3460:
3513: END IF;
3514:
3515: END IF;
3516:
3517: p_amount_applied := arp_util.CurrRound(p_amount_applied,
3518: p_trx_currency_code);
3519: p_discount := arp_util.CurrRound(p_discount,
3520: p_trx_currency_code);
3521: IF PG_DEBUG in ('Y', 'C') THEN
3515: END IF;
3516:
3517: p_amount_applied := arp_util.CurrRound(p_amount_applied,
3518: p_trx_currency_code);
3519: p_discount := arp_util.CurrRound(p_discount,
3520: p_trx_currency_code);
3521: IF PG_DEBUG in ('Y', 'C') THEN
3522: arp_util.debug('Default_disc_and_amt_applied ()-');
3523: END IF;
3518: p_trx_currency_code);
3519: p_discount := arp_util.CurrRound(p_discount,
3520: p_trx_currency_code);
3521: IF PG_DEBUG in ('Y', 'C') THEN
3522: arp_util.debug('Default_disc_and_amt_applied ()-');
3523: END IF;
3524: EXCEPTION
3525: WHEN others THEN
3526: IF PG_DEBUG in ('Y', 'C') THEN
3523: END IF;
3524: EXCEPTION
3525: WHEN others THEN
3526: IF PG_DEBUG in ('Y', 'C') THEN
3527: arp_util.debug('Default_disc_and_amt_applied: ' || 'EXCEPTION: Default_discount_and_amount_applied()');
3528: END IF;
3529: raise;
3530: END Default_disc_and_amt_applied;
3531:
3568: return(null);
3569:
3570: WHEN others THEN
3571: IF PG_DEBUG in ('Y', 'C') THEN
3572: arp_util.debug('Get_trx_Line_amount: ' || 'EXCEPTION: Default_Trx_Line_Amount()');
3573: END IF;
3574: raise;
3575: END Get_trx_Line_amount;
3576:
3638: AND site_use.site_use_code IN ('BILL_TO','DRAWEE');
3639:
3640: BEGIN
3641: IF PG_DEBUG in ('Y', 'C') THEN
3642: arp_util.debug('Default_Trx_Info ()+');
3643: END IF;
3644: p_return_status := FND_API.G_RET_STS_SUCCESS;
3645: --this is only for regular application, not for on-account
3646:
3683: ps.gl_date)) gl_date
3684: , ps.term_id
3685: , ps.amount_due_original
3686: , ps.amount_line_items_original
3687: , arp_util.CurrRound(ps.amount_due_remaining,
3688: ps.invoice_currency_code)
3689: , ps.discount_taken_earned
3690: , ps.discount_taken_unearned
3691: , ps.amount_line_items_original
3780: ps.gl_date)) gl_date
3781: , ps.term_id
3782: , ps.amount_due_original
3783: , ps.amount_line_items_original
3784: , arp_util.CurrRound(ps.amount_due_remaining,
3785: ps.invoice_currency_code)
3786: , ps.discount_taken_earned
3787: , ps.discount_taken_unearned
3788: , ps.amount_line_items_original
3899: ot.trx_gl_date)) gl_date,
3900: ot.term_id ,
3901: ot.amount_due_original,
3902: ot.amount_line_items_original ,
3903: arp_util.CurrRound(ot.balance_due_curr_unformatted,
3904: ot.invoice_currency_code) ,
3905: ot.discount_taken_earned,
3906: ot.discount_taken_unearned,
3907: ot.amount_line_items_original,
4009: ot.trx_gl_date)) gl_date,
4010: ot.term_id ,
4011: ot.amount_due_original,
4012: ot.amount_line_items_original ,
4013: arp_util.CurrRound(ot.balance_due_curr_unformatted,
4014: ot.invoice_currency_code) ,
4015: ot.discount_taken_earned,
4016: ot.discount_taken_unearned,
4017: ot.amount_line_items_original,
4130: );
4131: IF l_line_amt_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4132: p_return_status := FND_API.G_RET_STS_ERROR;
4133: END IF;
4134: p_trx_line_amount := arp_util.CurrRound(p_trx_line_amount,
4135: p_trx_currency_code);
4136: END IF;
4137: --bug 6660834 check is not required if called from autoreceipts
4138: IF NVL(p_called_from,'NONE') NOT IN ('AUTORECAPI','AUTORECAPI2') THEN
4181:
4182: END IF;
4183:
4184: IF PG_DEBUG in ('Y', 'C') THEN
4185: arp_util.debug('Default_Trx_Info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
4186: arp_util.debug('Default_Trx_Info: ' || 'p_bill_to_site_use_id : '||to_char(p_bill_to_site_use_id));
4187: arp_util.debug('Default_Trx_Info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4182: END IF;
4183:
4184: IF PG_DEBUG in ('Y', 'C') THEN
4185: arp_util.debug('Default_Trx_Info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
4186: arp_util.debug('Default_Trx_Info: ' || 'p_bill_to_site_use_id : '||to_char(p_bill_to_site_use_id));
4187: arp_util.debug('Default_Trx_Info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4190: arp_util.debug('Default_Trx_Info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
4183:
4184: IF PG_DEBUG in ('Y', 'C') THEN
4185: arp_util.debug('Default_Trx_Info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
4186: arp_util.debug('Default_Trx_Info: ' || 'p_bill_to_site_use_id : '||to_char(p_bill_to_site_use_id));
4187: arp_util.debug('Default_Trx_Info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4190: arp_util.debug('Default_Trx_Info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
4191: arp_util.debug('Default_Trx_Info: ' || 'p_creation_sign : '||p_creation_sign);
4184: IF PG_DEBUG in ('Y', 'C') THEN
4185: arp_util.debug('Default_Trx_Info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
4186: arp_util.debug('Default_Trx_Info: ' || 'p_bill_to_site_use_id : '||to_char(p_bill_to_site_use_id));
4187: arp_util.debug('Default_Trx_Info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4190: arp_util.debug('Default_Trx_Info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
4191: arp_util.debug('Default_Trx_Info: ' || 'p_creation_sign : '||p_creation_sign);
4192: arp_util.debug('Default_Trx_Info ()-');
4185: arp_util.debug('Default_Trx_Info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
4186: arp_util.debug('Default_Trx_Info: ' || 'p_bill_to_site_use_id : '||to_char(p_bill_to_site_use_id));
4187: arp_util.debug('Default_Trx_Info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4190: arp_util.debug('Default_Trx_Info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
4191: arp_util.debug('Default_Trx_Info: ' || 'p_creation_sign : '||p_creation_sign);
4192: arp_util.debug('Default_Trx_Info ()-');
4193: END IF;
4186: arp_util.debug('Default_Trx_Info: ' || 'p_bill_to_site_use_id : '||to_char(p_bill_to_site_use_id));
4187: arp_util.debug('Default_Trx_Info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4190: arp_util.debug('Default_Trx_Info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
4191: arp_util.debug('Default_Trx_Info: ' || 'p_creation_sign : '||p_creation_sign);
4192: arp_util.debug('Default_Trx_Info ()-');
4193: END IF;
4194: EXCEPTION
4187: arp_util.debug('Default_Trx_Info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4190: arp_util.debug('Default_Trx_Info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
4191: arp_util.debug('Default_Trx_Info: ' || 'p_creation_sign : '||p_creation_sign);
4192: arp_util.debug('Default_Trx_Info ()-');
4193: END IF;
4194: EXCEPTION
4195: WHEN no_data_found THEN
4188: arp_util.debug('Default_Trx_Info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag );
4189: arp_util.debug('Default_Trx_Info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
4190: arp_util.debug('Default_Trx_Info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
4191: arp_util.debug('Default_Trx_Info: ' || 'p_creation_sign : '||p_creation_sign);
4192: arp_util.debug('Default_Trx_Info ()-');
4193: END IF;
4194: EXCEPTION
4195: WHEN no_data_found THEN
4196: IF PG_DEBUG in ('Y', 'C') THEN
4193: END IF;
4194: EXCEPTION
4195: WHEN no_data_found THEN
4196: IF PG_DEBUG in ('Y', 'C') THEN
4197: arp_util.debug('Default_Trx_Info : No data found ');
4198: END IF;
4199: IF ar_receipt_api_pub.Original_application_info.customer_trx_id IS NOT NULL THEN
4200:
4201: IF ar_receipt_api_pub.Original_application_info.installment IS NOT NULL THEN
4226: FND_MSG_PUB.ADD;
4227: END IF;
4228: WHEN others THEN
4229: IF PG_DEBUG in ('Y', 'C') THEN
4230: arp_util.debug('EXCEPTION: Default_Trx_Info()');
4231: END IF;
4232: raise;
4233: END Default_Trx_Info;
4234:
4250:
4251: BEGIN
4252: p_return_status := FND_API.G_RET_STS_SUCCESS;
4253: IF PG_DEBUG in ('Y', 'C') THEN
4254: arp_util.debug('Default_Receipt_Info ()+');
4255: END IF;
4256: IF p_cash_receipt_id IS NOT NULL THEN
4257: BEGIN
4258: SELECT cr.pay_from_customer,
4332: FND_MSG_PUB.ADD;
4333: END IF;
4334: WHEN others THEN
4335: IF PG_DEBUG in ('Y', 'C') THEN
4336: arp_util.debug('EXCEPTION: Default_Receipt_Info()');
4337: END IF;
4338: raise;
4339: END;
4340: WHEN others THEN
4338: raise;
4339: END;
4340: WHEN others THEN
4341: IF PG_DEBUG in ('Y', 'C') THEN
4342: arp_util.debug('EXCEPTION: Default_Receipt_Info()');
4343: END IF;
4344: raise;
4345: END;
4346:
4361: END IF;
4362:
4363: END IF;
4364: IF PG_DEBUG in ('Y', 'C') THEN
4365: arp_util.debug('Default_Receipt_Info: ' || ' p_return_status :'||p_return_status);
4366: arp_util.debug('Default_Receipt_Info ()-');
4367: END IF;
4368: EXCEPTION
4369: WHEN no_data_found THEN
4362:
4363: END IF;
4364: IF PG_DEBUG in ('Y', 'C') THEN
4365: arp_util.debug('Default_Receipt_Info: ' || ' p_return_status :'||p_return_status);
4366: arp_util.debug('Default_Receipt_Info ()-');
4367: END IF;
4368: EXCEPTION
4369: WHEN no_data_found THEN
4370: IF ar_receipt_api_pub.Original_application_info.cash_receipt_id IS NOT NULL THEN
4377: FND_MSG_PUB.ADD;
4378: END IF;
4379: WHEN others THEN
4380: IF PG_DEBUG in ('Y', 'C') THEN
4381: arp_util.debug('EXCEPTION: Default_Receipt_Info()');
4382: END IF;
4383: raise;
4384:
4385: END Default_Receipt_Info;
4411: p_return_status OUT NOCOPY VARCHAR2
4412: ) IS
4413: BEGIN
4414: IF PG_DEBUG in ('Y', 'C') THEN
4415: arp_util.debug('Default_customer_trx_id ()+');
4416: END IF;
4417: p_return_status := FND_API.G_RET_STS_SUCCESS;
4418: IF p_customer_trx_id IS NULL THEN
4419: IF p_trx_number IS NOT NULL THEN
4443: END IF;
4444: END IF;
4445: END IF;
4446: IF PG_DEBUG in ('Y', 'C') THEN
4447: arp_util.debug('Default_customer_trx_id ()-');
4448: END IF;
4449: EXCEPTION
4450: WHEN others THEN
4451: IF PG_DEBUG in ('Y', 'C') THEN
4448: END IF;
4449: EXCEPTION
4450: WHEN others THEN
4451: IF PG_DEBUG in ('Y', 'C') THEN
4452: arp_util.debug('EXCEPTION: Default_customer_trx_id()', G_MSG_UERROR);
4453: END IF;
4454: END Default_customer_trx_id;
4455: /* Bug 5284890 */
4456: PROCEDURE Default_group_id( p_customer_trx_id IN NUMBER,
4460: ) IS
4461: l_count Number;
4462: BEGIN
4463: IF PG_DEBUG in ('Y', 'C') THEN
4464: arp_util.debug('Default_group_id ()+');
4465: END IF;
4466: p_return_status := FND_API.G_RET_STS_SUCCESS;
4467:
4468: select count(1)
4481: p_return_status := FND_API.G_RET_STS_ERROR ;
4482: END IF;
4483:
4484: IF PG_DEBUG in ('Y', 'C') THEN
4485: arp_util.debug('Default_group_id ()+');
4486: END IF;
4487: END ;
4488: /* Bug fix 3435834
4489: New procedure created for defaulting customer_trx_line_id */
4499: where customer_trx_id = p_cust_trx_id;
4500: l_cust_trx_line_id Number;
4501: BEGIN
4502: IF PG_DEBUG in ('Y', 'C') THEN
4503: arp_util.debug('Default_customer_trx_line_id ()+');
4504: END IF;
4505: p_return_status := FND_API.G_RET_STS_SUCCESS;
4506:
4507: IF p_customer_trx_line_id IS NOT NULL AND
4632: End Loop;
4633: END IF;
4634: END If;
4635: IF PG_DEBUG in ('Y', 'C') THEN
4636: arp_util.debug('Default_customer_trx_line_id ()-');
4637: END IF;
4638: EXCEPTION
4639: WHEN others THEN
4640: IF PG_DEBUG in ('Y', 'C') THEN
4637: END IF;
4638: EXCEPTION
4639: WHEN others THEN
4640: IF PG_DEBUG in ('Y', 'C') THEN
4641: arp_util.debug('EXCEPTION: Default_customer_trx_line_id()', G_MSG_UERROR);
4642: END IF;
4643: END Default_customer_trx_line_id;
4644:
4645:
4649: p_return_status OUT NOCOPY VARCHAR2
4650: ) IS
4651: BEGIN
4652: IF PG_DEBUG in ('Y', 'C') THEN
4653: arp_util.debug('Default_cash_receipt_id ()+');
4654: END IF;
4655: p_return_status := FND_API.G_RET_STS_SUCCESS;
4656: arp_util.debug('Default_appln_ids:CHECK 2' || 'p_receipt_number :'||to_char(p_receipt_number));
4657: IF p_cash_receipt_id IS NULL
4652: IF PG_DEBUG in ('Y', 'C') THEN
4653: arp_util.debug('Default_cash_receipt_id ()+');
4654: END IF;
4655: p_return_status := FND_API.G_RET_STS_SUCCESS;
4656: arp_util.debug('Default_appln_ids:CHECK 2' || 'p_receipt_number :'||to_char(p_receipt_number));
4657: IF p_cash_receipt_id IS NULL
4658: THEN
4659: BEGIN
4660: SELECT cash_receipt_id
4684: END IF;
4685: END IF;
4686: END IF;
4687: IF PG_DEBUG in ('Y', 'C') THEN
4688: arp_util.debug('Default_cash_receipt_id ()-');
4689: END IF;
4690: EXCEPTION
4691: WHEN others THEN
4692: IF PG_DEBUG in ('Y', 'C') THEN
4689: END IF;
4690: EXCEPTION
4691: WHEN others THEN
4692: IF PG_DEBUG in ('Y', 'C') THEN
4693: arp_util.debug('EXCEPTION: Default_cash_receipt_id()');
4694: END IF;
4695: END Default_cash_receipt_id;
4696:
4697: PROCEDURE Default_appln_ids(
4722: p_return_status_group VARCHAR2(100); /* Bug 5284890 */
4723:
4724: BEGIN
4725: IF PG_DEBUG in ('Y', 'C') THEN
4726: arp_util.debug('Default_appln_ids ()+ ');
4727: END IF;
4728: p_return_status := FND_API.G_RET_STS_SUCCESS;
4729:
4730: -- First get a valid value for the customer_trx_id
4837: p_return_status := FND_API.G_RET_STS_ERROR;
4838: END IF;
4839:
4840: IF PG_DEBUG in ('Y', 'C') THEN
4841: arp_util.debug('Default_appln_ids: ' || '****Defaulted Value for the application ids****');
4842: arp_util.debug('Default_appln_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
4843: arp_util.debug('Default_appln_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
4844: arp_util.debug('Default_appln_ids: ' || 'p_installment :'||to_char(p_installment));
4845: arp_util.debug('Default_appln_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
4838: END IF;
4839:
4840: IF PG_DEBUG in ('Y', 'C') THEN
4841: arp_util.debug('Default_appln_ids: ' || '****Defaulted Value for the application ids****');
4842: arp_util.debug('Default_appln_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
4843: arp_util.debug('Default_appln_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
4844: arp_util.debug('Default_appln_ids: ' || 'p_installment :'||to_char(p_installment));
4845: arp_util.debug('Default_appln_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
4846: arp_util.debug('Default_appln_ids ()- ');
4839:
4840: IF PG_DEBUG in ('Y', 'C') THEN
4841: arp_util.debug('Default_appln_ids: ' || '****Defaulted Value for the application ids****');
4842: arp_util.debug('Default_appln_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
4843: arp_util.debug('Default_appln_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
4844: arp_util.debug('Default_appln_ids: ' || 'p_installment :'||to_char(p_installment));
4845: arp_util.debug('Default_appln_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
4846: arp_util.debug('Default_appln_ids ()- ');
4847: END IF;
4840: IF PG_DEBUG in ('Y', 'C') THEN
4841: arp_util.debug('Default_appln_ids: ' || '****Defaulted Value for the application ids****');
4842: arp_util.debug('Default_appln_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
4843: arp_util.debug('Default_appln_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
4844: arp_util.debug('Default_appln_ids: ' || 'p_installment :'||to_char(p_installment));
4845: arp_util.debug('Default_appln_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
4846: arp_util.debug('Default_appln_ids ()- ');
4847: END IF;
4848: EXCEPTION
4841: arp_util.debug('Default_appln_ids: ' || '****Defaulted Value for the application ids****');
4842: arp_util.debug('Default_appln_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
4843: arp_util.debug('Default_appln_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
4844: arp_util.debug('Default_appln_ids: ' || 'p_installment :'||to_char(p_installment));
4845: arp_util.debug('Default_appln_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
4846: arp_util.debug('Default_appln_ids ()- ');
4847: END IF;
4848: EXCEPTION
4849: WHEN others THEN
4842: arp_util.debug('Default_appln_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
4843: arp_util.debug('Default_appln_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
4844: arp_util.debug('Default_appln_ids: ' || 'p_installment :'||to_char(p_installment));
4845: arp_util.debug('Default_appln_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
4846: arp_util.debug('Default_appln_ids ()- ');
4847: END IF;
4848: EXCEPTION
4849: WHEN others THEN
4850: IF PG_DEBUG in ('Y', 'C') THEN
4847: END IF;
4848: EXCEPTION
4849: WHEN others THEN
4850: IF PG_DEBUG in ('Y', 'C') THEN
4851: arp_util.debug('EXCEPTION: Default_appln_ids()');
4852: END IF;
4853: raise;
4854: END Default_appln_ids;
4855:
4969: l_val_llca_msg_data VARCHAR2(2000);
4970: l_val_llca_msg_count NUMBER;
4971: BEGIN
4972: IF PG_DEBUG in ('Y', 'C') THEN
4973: arp_util.debug('Default_application_info ()+');
4974: arp_util.debug('Default_application_info: ' || 'p_discount = '||p_discount );
4975: END IF;
4976:
4977: p_return_status := FND_API.G_RET_STS_SUCCESS;
4970: l_val_llca_msg_count NUMBER;
4971: BEGIN
4972: IF PG_DEBUG in ('Y', 'C') THEN
4973: arp_util.debug('Default_application_info ()+');
4974: arp_util.debug('Default_application_info: ' || 'p_discount = '||p_discount );
4975: END IF;
4976:
4977: p_return_status := FND_API.G_RET_STS_SUCCESS;
4978: IF NVL(p_called_from,'NONE') IN ('AUTORECAPI','AUTORECAPI2') THEN
4996: --set the status to true to continue further process
4997: l_def_cr_return_status := FND_API.G_RET_STS_SUCCESS;
4998:
4999: IF PG_DEBUG in ('Y', 'C') THEN
5000: arp_util.debug('Setting the values call from AUTORECAPI ');
5001: arp_util.debug('l_cr_gl_date '||l_cr_gl_date);
5002: arp_util.debug('l_cr_customer_id '||l_cr_customer_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
4997: l_def_cr_return_status := FND_API.G_RET_STS_SUCCESS;
4998:
4999: IF PG_DEBUG in ('Y', 'C') THEN
5000: arp_util.debug('Setting the values call from AUTORECAPI ');
5001: arp_util.debug('l_cr_gl_date '||l_cr_gl_date);
5002: arp_util.debug('l_cr_customer_id '||l_cr_customer_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
4998:
4999: IF PG_DEBUG in ('Y', 'C') THEN
5000: arp_util.debug('Setting the values call from AUTORECAPI ');
5001: arp_util.debug('l_cr_gl_date '||l_cr_gl_date);
5002: arp_util.debug('l_cr_customer_id '||l_cr_customer_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
4999: IF PG_DEBUG in ('Y', 'C') THEN
5000: arp_util.debug('Setting the values call from AUTORECAPI ');
5001: arp_util.debug('l_cr_gl_date '||l_cr_gl_date);
5002: arp_util.debug('l_cr_customer_id '||l_cr_customer_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5000: arp_util.debug('Setting the values call from AUTORECAPI ');
5001: arp_util.debug('l_cr_gl_date '||l_cr_gl_date);
5002: arp_util.debug('l_cr_customer_id '||l_cr_customer_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5008: arp_util.debug('p_cr_payment_schedule_id '||p_cr_payment_schedule_id);
5001: arp_util.debug('l_cr_gl_date '||l_cr_gl_date);
5002: arp_util.debug('l_cr_customer_id '||l_cr_customer_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5008: arp_util.debug('p_cr_payment_schedule_id '||p_cr_payment_schedule_id);
5009: arp_util.debug('p_remittance_bank_account_id '||p_remittance_bank_account_id);
5002: arp_util.debug('l_cr_customer_id '||l_cr_customer_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5008: arp_util.debug('p_cr_payment_schedule_id '||p_cr_payment_schedule_id);
5009: arp_util.debug('p_remittance_bank_account_id '||p_remittance_bank_account_id);
5010: arp_util.debug('p_receipt_method_id '||p_receipt_method_id);
5003: arp_util.debug('p_cr_amount '||p_cr_amount);
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5008: arp_util.debug('p_cr_payment_schedule_id '||p_cr_payment_schedule_id);
5009: arp_util.debug('p_remittance_bank_account_id '||p_remittance_bank_account_id);
5010: arp_util.debug('p_receipt_method_id '||p_receipt_method_id);
5011: END IF;
5004: arp_util.debug('l_cr_cust_site_use_id '||l_cr_cust_site_use_id);
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5008: arp_util.debug('p_cr_payment_schedule_id '||p_cr_payment_schedule_id);
5009: arp_util.debug('p_remittance_bank_account_id '||p_remittance_bank_account_id);
5010: arp_util.debug('p_receipt_method_id '||p_receipt_method_id);
5011: END IF;
5012: ELSE
5005: arp_util.debug('p_cr_date '||p_cr_date);
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5008: arp_util.debug('p_cr_payment_schedule_id '||p_cr_payment_schedule_id);
5009: arp_util.debug('p_remittance_bank_account_id '||p_remittance_bank_account_id);
5010: arp_util.debug('p_receipt_method_id '||p_receipt_method_id);
5011: END IF;
5012: ELSE
5013: Default_Receipt_Info(
5006: arp_util.debug('l_cr_currency_code '||l_cr_currency_code);
5007: arp_util.debug('l_cr_exchange_rate '||l_cr_exchange_rate);
5008: arp_util.debug('p_cr_payment_schedule_id '||p_cr_payment_schedule_id);
5009: arp_util.debug('p_remittance_bank_account_id '||p_remittance_bank_account_id);
5010: arp_util.debug('p_receipt_method_id '||p_receipt_method_id);
5011: END IF;
5012: ELSE
5013: Default_Receipt_Info(
5014: p_cash_receipt_id ,
5024: p_remittance_bank_account_id,
5025: p_receipt_method_id,
5026: l_def_cr_return_status );
5027: IF PG_DEBUG in ('Y', 'C') THEN
5028: arp_util.debug('Default_application_info: ' || 'Default_Receipt_Info return status = '||l_def_cr_return_status);
5029: END IF;
5030:
5031: /* Bug 4038708 */
5032: IF(l_cr_customer_id is NULL) THEN
5083: l_rec_charges_remaining,
5084: l_def_trx_return_status );
5085:
5086: IF PG_DEBUG in ('Y', 'C') THEN
5087: arp_util.debug('Default_application_info: ' || 'Default trx info return status = '||l_def_trx_return_status);
5088: END IF;
5089: END IF;
5090:
5091: Default_apply_date(l_cr_date ,
5100: defaulted gl_date and in case it is incorrect, then we get the appropriate
5101: gl_date and use it as default.
5102: */
5103: l_return :=
5104: arp_util.validate_and_default_gl_date(
5105: gl_date => l_gl_date,
5106: trx_date => null,
5107: validation_date1 => null,
5108: validation_date2 => null,
5153: );
5154:
5155: END IF;
5156:
5157: --arp_util.debug('p_apply_gl_date '||p_apply_gl_date);
5158: Default_disc_and_amt_applied(
5159: l_customer_id ,
5160: l_bill_to_site_use_id ,
5161: p_applied_payment_schedule_id ,
5190: l_def_amt_return_status);
5191:
5192:
5193: IF PG_DEBUG in ('Y', 'C') THEN
5194: arp_util.debug('Default_application_info: ' || 'l_calc_discount_on_lines_flag : '||l_calc_discount_on_lines_flag);
5195: arp_util.debug('Default_application_info: ' || 'l_partial_discount_flag : '||l_partial_discount_flag );
5196: arp_util.debug('Default_application_info: ' || 'l_allow_overappln_flag : '||l_allow_overappln_flag);
5197: arp_util.debug('Default_application_info: ' || 'l_natural_appln_only_flag : '||l_natural_appln_only_flag);
5198: arp_util.debug('Default_application_info: ' || 'l_creation_sign : '||l_creation_sign);
5191:
5192:
5193: IF PG_DEBUG in ('Y', 'C') THEN
5194: arp_util.debug('Default_application_info: ' || 'l_calc_discount_on_lines_flag : '||l_calc_discount_on_lines_flag);
5195: arp_util.debug('Default_application_info: ' || 'l_partial_discount_flag : '||l_partial_discount_flag );
5196: arp_util.debug('Default_application_info: ' || 'l_allow_overappln_flag : '||l_allow_overappln_flag);
5197: arp_util.debug('Default_application_info: ' || 'l_natural_appln_only_flag : '||l_natural_appln_only_flag);
5198: arp_util.debug('Default_application_info: ' || 'l_creation_sign : '||l_creation_sign);
5199: arp_util.debug('Default_application_info: ' || 'Default amount return status :'||l_def_amt_return_status );
5192:
5193: IF PG_DEBUG in ('Y', 'C') THEN
5194: arp_util.debug('Default_application_info: ' || 'l_calc_discount_on_lines_flag : '||l_calc_discount_on_lines_flag);
5195: arp_util.debug('Default_application_info: ' || 'l_partial_discount_flag : '||l_partial_discount_flag );
5196: arp_util.debug('Default_application_info: ' || 'l_allow_overappln_flag : '||l_allow_overappln_flag);
5197: arp_util.debug('Default_application_info: ' || 'l_natural_appln_only_flag : '||l_natural_appln_only_flag);
5198: arp_util.debug('Default_application_info: ' || 'l_creation_sign : '||l_creation_sign);
5199: arp_util.debug('Default_application_info: ' || 'Default amount return status :'||l_def_amt_return_status );
5200: END IF;
5193: IF PG_DEBUG in ('Y', 'C') THEN
5194: arp_util.debug('Default_application_info: ' || 'l_calc_discount_on_lines_flag : '||l_calc_discount_on_lines_flag);
5195: arp_util.debug('Default_application_info: ' || 'l_partial_discount_flag : '||l_partial_discount_flag );
5196: arp_util.debug('Default_application_info: ' || 'l_allow_overappln_flag : '||l_allow_overappln_flag);
5197: arp_util.debug('Default_application_info: ' || 'l_natural_appln_only_flag : '||l_natural_appln_only_flag);
5198: arp_util.debug('Default_application_info: ' || 'l_creation_sign : '||l_creation_sign);
5199: arp_util.debug('Default_application_info: ' || 'Default amount return status :'||l_def_amt_return_status );
5200: END IF;
5201:
5194: arp_util.debug('Default_application_info: ' || 'l_calc_discount_on_lines_flag : '||l_calc_discount_on_lines_flag);
5195: arp_util.debug('Default_application_info: ' || 'l_partial_discount_flag : '||l_partial_discount_flag );
5196: arp_util.debug('Default_application_info: ' || 'l_allow_overappln_flag : '||l_allow_overappln_flag);
5197: arp_util.debug('Default_application_info: ' || 'l_natural_appln_only_flag : '||l_natural_appln_only_flag);
5198: arp_util.debug('Default_application_info: ' || 'l_creation_sign : '||l_creation_sign);
5199: arp_util.debug('Default_application_info: ' || 'Default amount return status :'||l_def_amt_return_status );
5200: END IF;
5201:
5202: Default_trans_to_receipt_rate(
5195: arp_util.debug('Default_application_info: ' || 'l_partial_discount_flag : '||l_partial_discount_flag );
5196: arp_util.debug('Default_application_info: ' || 'l_allow_overappln_flag : '||l_allow_overappln_flag);
5197: arp_util.debug('Default_application_info: ' || 'l_natural_appln_only_flag : '||l_natural_appln_only_flag);
5198: arp_util.debug('Default_application_info: ' || 'l_creation_sign : '||l_creation_sign);
5199: arp_util.debug('Default_application_info: ' || 'Default amount return status :'||l_def_amt_return_status );
5200: END IF;
5201:
5202: Default_trans_to_receipt_rate(
5203: l_trx_currency_code ,
5209: l_cr_date,
5210: l_def_rate_return_status
5211: );
5212: IF PG_DEBUG in ('Y', 'C') THEN
5213: arp_util.debug('Default_application_info: ' || 'Default trans_to_receipt_rate status :'||l_def_rate_return_status);
5214: END IF;
5215: Default_amount_applied_from(
5216: p_amount_applied ,
5217: l_trx_currency_code ,
5221: l_def_aaf_return_status,
5222: p_cash_receipt_id -- Added for Bug 13595334
5223: );
5224: IF PG_DEBUG in ('Y', 'C') THEN
5225: arp_util.debug('Default_application_info: ' || 'Default amount applied from return status :'||l_def_aaf_return_status);
5226: END IF;
5227:
5228:
5229: --populate the parameters with the values in the local variables
5263: p_return_status := FND_API.G_RET_STS_ERROR;
5264: END IF;
5265:
5266: IF PG_DEBUG in ('Y', 'C') THEN
5267: arp_util.debug('Default_application_info: ' || '*****************Application Defaults***************');
5268: arp_util.debug('Default_application_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
5269: arp_util.debug('Default_application_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5264: END IF;
5265:
5266: IF PG_DEBUG in ('Y', 'C') THEN
5267: arp_util.debug('Default_application_info: ' || '*****************Application Defaults***************');
5268: arp_util.debug('Default_application_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
5269: arp_util.debug('Default_application_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5265:
5266: IF PG_DEBUG in ('Y', 'C') THEN
5267: arp_util.debug('Default_application_info: ' || '*****************Application Defaults***************');
5268: arp_util.debug('Default_application_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
5269: arp_util.debug('Default_application_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5266: IF PG_DEBUG in ('Y', 'C') THEN
5267: arp_util.debug('Default_application_info: ' || '*****************Application Defaults***************');
5268: arp_util.debug('Default_application_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
5269: arp_util.debug('Default_application_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5267: arp_util.debug('Default_application_info: ' || '*****************Application Defaults***************');
5268: arp_util.debug('Default_application_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
5269: arp_util.debug('Default_application_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5268: arp_util.debug('Default_application_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
5269: arp_util.debug('Default_application_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5269: arp_util.debug('Default_application_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5270: arp_util.debug('Default_application_info: ' || 'p_cr_date : '||to_char(p_cr_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5271: arp_util.debug('Default_application_info: ' || 'p_cr_amount : '||to_char(p_cr_amount));
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5272: arp_util.debug('Default_application_info: ' || 'p_cr_unapp_amount : '||to_char(p_cr_unapp_amount));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5273: arp_util.debug('Default_application_info: ' || 'p_cr_currency_code : '||p_cr_currency_code);
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5274: arp_util.debug('Default_application_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5275: arp_util.debug('Default_application_info: ' || 'p_installment : '||to_char(p_installment));
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5276: arp_util.debug('Default_application_info: ' || 'p_show_closed_invoices : '||p_show_closed_invoices);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5277: arp_util.debug('Default_application_info: ' || 'p_customer_trx_line_id : '||to_char(p_customer_trx_line_id));
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5278: arp_util.debug('Default_application_info: ' || 'p_trx_due_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5279: arp_util.debug('Default_application_info: ' || 'p_trx_currency_code : '||p_trx_currency_code);
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5280: arp_util.debug('Default_application_info: ' || 'p_trx_gl_date : '||to_char(p_trx_due_date,'DD-MON-YYYY'));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5281: arp_util.debug('Default_application_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5282: arp_util.debug('Default_application_info: ' || 'p_calc_discount_on_lines_flag : '||p_calc_discount_on_lines_flag);
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5283: arp_util.debug('Default_application_info: ' || 'p_partial_discount_flag : '||p_partial_discount_flag);
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5284: arp_util.debug('Default_application_info: ' || 'p_allow_overappln_flag : '||p_allow_overappln_flag);
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5285: arp_util.debug('Default_application_info: ' || 'p_natural_appln_only_flag : '||p_natural_appln_only_flag);
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5286: arp_util.debug('Default_application_info: ' || 'p_creation_sign : '||p_creation_sign);
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5287: arp_util.debug('Default_application_info: ' || 'p_cr_payment_schedule_id : '||to_char(p_cr_payment_schedule_id));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5288: arp_util.debug('Default_application_info: ' || 'p_applied_payment_schedule_id : '||to_char(p_applied_payment_schedule_id));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5289: arp_util.debug('Default_application_info: ' || 'p_term_id : '||to_char(p_term_id));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5290: arp_util.debug('Default_application_info: ' || 'p_amount_due_original : '||to_char(p_amount_due_original));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5291: arp_util.debug('Default_application_info: ' || 'p_amount_due_remaining : '||to_char(p_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5292: arp_util.debug('Default_application_info: ' || 'p_trx_line_amount : '||to_char(p_trx_line_amount));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5293: arp_util.debug('Default_application_info: ' || 'p_discount : '||to_char(p_discount));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5294: arp_util.debug('Default_application_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5302: arp_util.debug('Default_application_info: ' || 'p_trans_to_receipt_rate : '||to_char(p_trans_to_receipt_rate));
5295: arp_util.debug('Default_application_info: ' || 'p_discount_max_allowed : '||to_char(p_discount_max_allowed));
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5302: arp_util.debug('Default_application_info: ' || 'p_trans_to_receipt_rate : '||to_char(p_trans_to_receipt_rate));
5303: arp_util.debug('Default_application_info: ' || '**********************************************************');
5296: arp_util.debug('Default_application_info: ' || 'p_discount_earned_allowed : '||to_char(p_discount_earned_allowed));
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5302: arp_util.debug('Default_application_info: ' || 'p_trans_to_receipt_rate : '||to_char(p_trans_to_receipt_rate));
5303: arp_util.debug('Default_application_info: ' || '**********************************************************');
5304: arp_util.debug('Default_application_info ()-');
5297: arp_util.debug('Default_application_info: ' || 'p_discount_earned : '||to_char(p_discount_earned));
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5302: arp_util.debug('Default_application_info: ' || 'p_trans_to_receipt_rate : '||to_char(p_trans_to_receipt_rate));
5303: arp_util.debug('Default_application_info: ' || '**********************************************************');
5304: arp_util.debug('Default_application_info ()-');
5305: END IF;
5298: arp_util.debug('Default_application_info: ' || 'p_discount_unearned : '||to_char(p_discount_unearned));
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5302: arp_util.debug('Default_application_info: ' || 'p_trans_to_receipt_rate : '||to_char(p_trans_to_receipt_rate));
5303: arp_util.debug('Default_application_info: ' || '**********************************************************');
5304: arp_util.debug('Default_application_info ()-');
5305: END IF;
5306: END Default_application_info;
5299: arp_util.debug('Default_application_info: ' || 'p_new_amount_due_remaining : '||to_char(p_new_amount_due_remaining));
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5302: arp_util.debug('Default_application_info: ' || 'p_trans_to_receipt_rate : '||to_char(p_trans_to_receipt_rate));
5303: arp_util.debug('Default_application_info: ' || '**********************************************************');
5304: arp_util.debug('Default_application_info ()-');
5305: END IF;
5306: END Default_application_info;
5307:
5300: arp_util.debug('Default_application_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
5301: arp_util.debug('Default_application_info: ' || 'p_amount_applied_from : '||to_char(p_amount_applied_from));
5302: arp_util.debug('Default_application_info: ' || 'p_trans_to_receipt_rate : '||to_char(p_trans_to_receipt_rate));
5303: arp_util.debug('Default_application_info: ' || '**********************************************************');
5304: arp_util.debug('Default_application_info ()-');
5305: END IF;
5306: END Default_application_info;
5307:
5308: FUNCTION Get_trx_ps_id(p_customer_trx_id IN OUT NOCOPY NUMBER,
5312: ) RETURN NUMBER IS
5313: l_trx_ps_id NUMBER;
5314: BEGIN
5315: IF PG_DEBUG in ('Y', 'C') THEN
5316: arp_util.debug('Get_trx_ps_id ()+');
5317: END IF;
5318: p_return_status := FND_API.G_RET_STS_SUCCESS;
5319:
5320: IF p_called_from IN ('BR_REMITTED',
5432: END IF;
5433:
5434: RETURN(l_trx_ps_id);
5435: IF PG_DEBUG in ('Y', 'C') THEN
5436: arp_util.debug('Get_trx_ps_id ()-');
5437: END IF;
5438: EXCEPTION
5439: WHEN others THEN
5440: IF PG_DEBUG in ('Y', 'C') THEN
5437: END IF;
5438: EXCEPTION
5439: WHEN others THEN
5440: IF PG_DEBUG in ('Y', 'C') THEN
5441: arp_util.debug('EXCEPTION: Get_trx_ps_id()');
5442: END IF;
5443: raise;
5444: END Get_trx_ps_id;
5445:
5453: ) IS
5454:
5455: BEGIN
5456: IF PG_DEBUG in ('Y', 'C') THEN
5457: arp_util.debug('Derive_receivable_appln_id ()+');
5458: END IF;
5459: p_return_status := FND_API.G_RET_STS_SUCCESS;
5460: IF p_cash_receipt_id IS NOT NULL AND
5461: p_applied_payment_schedule_id IS NOT NULL
5472: AND ra.application_type = 'CASH';
5473:
5474: END IF;
5475: IF PG_DEBUG in ('Y', 'C') THEN
5476: arp_util.debug('Derive_receivable_appln_id ()+');
5477: END IF;
5478: EXCEPTION
5479: WHEN no_data_found THEN
5480: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_NOT_APP_TO_INV');
5481: FND_MSG_PUB.Add;
5482: p_return_status := FND_API.G_RET_STS_ERROR;
5483: WHEN others THEN
5484: IF PG_DEBUG in ('Y', 'C') THEN
5485: arp_util.debug('Derive_receivable_appln_id: ' || 'EXCEPTION: Get_receivable_application_id()');
5486: END IF;
5487: raise;
5488: END Derive_receivable_appln_id;
5489:
5509: AND ps.class IN ('CB','CM','DEP','DM','INV','BR');
5510:
5511: BEGIN
5512: IF PG_DEBUG in ('Y', 'C') THEN
5513: arp_util.debug('Get_payment_schedule_info ()+');
5514: END IF;
5515: p_return_status := FND_API.G_RET_STS_SUCCESS;
5516:
5517: IF p_called_from IN ('BR_REMITTED',
5542:
5543: END IF;
5544:
5545: IF PG_DEBUG in ('Y', 'C') THEN
5546: arp_util.debug('Get_payment_schedule_info ()-');
5547: END IF;
5548: END Get_payment_schedule_info;
5549:
5550: PROCEDURE Get_receivable_appln_info(
5577: AND ra.status = 'APP';
5578:
5579: BEGIN
5580: IF PG_DEBUG in ('Y', 'C') THEN
5581: arp_util.debug('Get_receivable_appln_info ()+');
5582: END IF;
5583:
5584: p_return_status := FND_API.G_RET_STS_SUCCESS;
5585:
5608:
5609: END IF;
5610:
5611: IF PG_DEBUG in ('Y', 'C') THEN
5612: arp_util.debug('Get_receivable_appln_info ()-');
5613: END IF;
5614: END Get_receivable_appln_info;
5615:
5616: PROCEDURE Derive_unapp_ids(
5638: l_ra_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
5639: l_cr_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
5640: BEGIN
5641: IF PG_DEBUG in ('Y', 'C') THEN
5642: arp_util.debug('Derive_unapp_ids ()+');
5643: END IF;
5644: p_return_status := FND_API.G_RET_STS_SUCCESS ;
5645:
5646: -- First get a valid value for the customer_trx_id
5782: THEN
5783: p_return_status := FND_API.G_RET_STS_ERROR;
5784: END IF;
5785: IF PG_DEBUG in ('Y', 'C') THEN
5786: arp_util.debug('Derive_unapp_ids: ' || '****Defaulted Value for the unapplication ids****');
5787: arp_util.debug('Derive_unapp_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
5788: arp_util.debug('Derive_unapp_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5783: p_return_status := FND_API.G_RET_STS_ERROR;
5784: END IF;
5785: IF PG_DEBUG in ('Y', 'C') THEN
5786: arp_util.debug('Derive_unapp_ids: ' || '****Defaulted Value for the unapplication ids****');
5787: arp_util.debug('Derive_unapp_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
5788: arp_util.debug('Derive_unapp_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5791: arp_util.debug('Derive_unapp_ids: ' || 'p_receivable_application_id :'||to_char(p_receivable_application_id));
5784: END IF;
5785: IF PG_DEBUG in ('Y', 'C') THEN
5786: arp_util.debug('Derive_unapp_ids: ' || '****Defaulted Value for the unapplication ids****');
5787: arp_util.debug('Derive_unapp_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
5788: arp_util.debug('Derive_unapp_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5791: arp_util.debug('Derive_unapp_ids: ' || 'p_receivable_application_id :'||to_char(p_receivable_application_id));
5792: arp_util.debug('Derive_unapp_ids: ' || 'Return Status :'||p_return_status);
5785: IF PG_DEBUG in ('Y', 'C') THEN
5786: arp_util.debug('Derive_unapp_ids: ' || '****Defaulted Value for the unapplication ids****');
5787: arp_util.debug('Derive_unapp_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
5788: arp_util.debug('Derive_unapp_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5791: arp_util.debug('Derive_unapp_ids: ' || 'p_receivable_application_id :'||to_char(p_receivable_application_id));
5792: arp_util.debug('Derive_unapp_ids: ' || 'Return Status :'||p_return_status);
5793: arp_util.debug('Derive_unapp_ids ()-');
5786: arp_util.debug('Derive_unapp_ids: ' || '****Defaulted Value for the unapplication ids****');
5787: arp_util.debug('Derive_unapp_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
5788: arp_util.debug('Derive_unapp_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5791: arp_util.debug('Derive_unapp_ids: ' || 'p_receivable_application_id :'||to_char(p_receivable_application_id));
5792: arp_util.debug('Derive_unapp_ids: ' || 'Return Status :'||p_return_status);
5793: arp_util.debug('Derive_unapp_ids ()-');
5794: END IF;
5787: arp_util.debug('Derive_unapp_ids: ' || 'p_cash_receipt_id :'||to_char(p_cash_receipt_id));
5788: arp_util.debug('Derive_unapp_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5791: arp_util.debug('Derive_unapp_ids: ' || 'p_receivable_application_id :'||to_char(p_receivable_application_id));
5792: arp_util.debug('Derive_unapp_ids: ' || 'Return Status :'||p_return_status);
5793: arp_util.debug('Derive_unapp_ids ()-');
5794: END IF;
5795: EXCEPTION
5788: arp_util.debug('Derive_unapp_ids: ' || 'p_customer_trx_id :'||to_char(p_customer_trx_id));
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5791: arp_util.debug('Derive_unapp_ids: ' || 'p_receivable_application_id :'||to_char(p_receivable_application_id));
5792: arp_util.debug('Derive_unapp_ids: ' || 'Return Status :'||p_return_status);
5793: arp_util.debug('Derive_unapp_ids ()-');
5794: END IF;
5795: EXCEPTION
5796: WHEN others THEN
5789: arp_util.debug('Derive_unapp_ids: ' || 'p_installment :'||to_char(p_installment));
5790: arp_util.debug('Derive_unapp_ids: ' || 'p_applied_payment_schedule_id :'||to_char(p_applied_payment_schedule_id));
5791: arp_util.debug('Derive_unapp_ids: ' || 'p_receivable_application_id :'||to_char(p_receivable_application_id));
5792: arp_util.debug('Derive_unapp_ids: ' || 'Return Status :'||p_return_status);
5793: arp_util.debug('Derive_unapp_ids ()-');
5794: END IF;
5795: EXCEPTION
5796: WHEN others THEN
5797: IF PG_DEBUG in ('Y', 'C') THEN
5794: END IF;
5795: EXCEPTION
5796: WHEN others THEN
5797: IF PG_DEBUG in ('Y', 'C') THEN
5798: arp_util.debug('EXCEPTION: Derive_unapp_ids()');
5799: END IF;
5800: raise;
5801: END Derive_unapp_ids;
5802:
5812: l_defaulting_rule_used VARCHAR2(100);
5813: l_error_message VARCHAR2(240);
5814: BEGIN
5815: IF PG_DEBUG in ('Y', 'C') THEN
5816: arp_util.debug('Default_reversal_gl_date ()+');
5817: END IF;
5818: l_apply_gl_date := p_apply_gl_date; /* Bug fix 3503167 */
5819:
5820: IF p_receivable_application_id IS NOT NULL THEN
5828: END IF;
5829: /* Bug fix 3503167 : We need to pass the apply_gl_date as the candidate gl_date and
5830: as the validation date */
5831: IF p_reversal_gl_date is null THEN
5832: IF (arp_util.validate_and_default_gl_date(
5833: nvl(l_apply_gl_date,trunc(sysdate)),
5834: NULL,
5835: l_apply_gl_date,
5836: NULL,
5857: END IF;
5858: END IF;
5859: END IF;
5860: IF PG_DEBUG in ('Y', 'C') THEN
5861: arp_util.debug('Default_reversal_gl_date ()-');
5862: END IF;
5863: EXCEPTION
5864: When others THEN
5865: IF PG_DEBUG in ('Y', 'C') THEN
5862: END IF;
5863: EXCEPTION
5864: When others THEN
5865: IF PG_DEBUG in ('Y', 'C') THEN
5866: arp_util.debug('EXCEPTION: Default_reversal_gl_date()');
5867: END IF;
5868: raise;
5869: END Default_reversal_gl_date;
5870:
5880: l_cash_receipt_id NUMBER(15);
5881: l_apply_gl_date DATE;
5882: BEGIN
5883: IF PG_DEBUG in ('Y', 'C') THEN
5884: arp_util.debug('Default_unapp_info ()+');
5885: END IF;
5886: l_apply_gl_date := p_apply_gl_date;
5887: l_cash_receipt_id := p_cash_receipt_id;
5888:
5914: EXCEPTION
5915: WHEN no_data_found THEN
5916: null;
5917: IF PG_DEBUG in ('Y', 'C') THEN
5918: arp_util.debug('Default_unapp_info: ' || 'Could not get the receipt_gl_date. ');
5919: END IF;
5920: END;
5921: END IF;
5922: IF PG_DEBUG in ('Y', 'C') THEN
5919: END IF;
5920: END;
5921: END IF;
5922: IF PG_DEBUG in ('Y', 'C') THEN
5923: arp_util.debug('Default_unapp_info ()-');
5924: END IF;
5925: END Default_unapp_info;
5926:
5927: PROCEDURE Default_rev_catg_code(p_reversal_category_code IN OUT NOCOPY VARCHAR2,
5930: ) IS
5931:
5932: BEGIN
5933: IF PG_DEBUG in ('Y', 'C') THEN
5934: arp_util.debug('Default_rev_catg_code ()+');
5935: END IF;
5936:
5937: p_return_status := FND_API.G_RET_STS_SUCCESS;
5938:
5962: END IF;
5963: END IF;
5964: END IF;
5965: IF PG_DEBUG in ('Y', 'C') THEN
5966: arp_util.debug('Default_rev_catg_code ()-');
5967: END IF;
5968: EXCEPTION
5969: WHEN others THEN
5970: IF PG_DEBUG in ('Y', 'C') THEN
5967: END IF;
5968: EXCEPTION
5969: WHEN others THEN
5970: IF PG_DEBUG in ('Y', 'C') THEN
5971: arp_util.debug('EXCEPTION: Default_rev_catg_code()');
5972: END IF;
5973: raise;
5974: END Default_rev_catg_code;
5975:
5980: ) IS
5981:
5982: BEGIN
5983: IF PG_DEBUG in ('Y', 'C') THEN
5984: arp_util.debug('Default_rev_reason_code ()+');
5985: END IF;
5986:
5987: p_return_status := FND_API.G_RET_STS_SUCCESS;
5988:
6012: END IF;
6013: END IF;
6014: END IF;
6015: IF PG_DEBUG in ('Y', 'C') THEN
6016: arp_util.debug('Default_rev_reason_code ()-');
6017: END IF;
6018: EXCEPTION
6019: WHEN others THEN
6020: IF PG_DEBUG in ('Y', 'C') THEN
6017: END IF;
6018: EXCEPTION
6019: WHEN others THEN
6020: IF PG_DEBUG in ('Y', 'C') THEN
6021: arp_util.debug('EXCEPTION: Default_rev_reason_code()');
6022: END IF;
6023: raise;
6024: END Default_rev_reason_code;
6025:
6036: l_rev_cat_return_status VARCHAR2(1);
6037: l_rev_res_return_status VARCHAR2(1);
6038: BEGIN
6039: IF PG_DEBUG in ('Y', 'C') THEN
6040: arp_util.debug('Derive_reverse_ids ()+ ');
6041: END IF;
6042: p_return_status := FND_API.G_RET_STS_SUCCESS ;
6043:
6044:
6046: Default_cash_receipt_id(p_cash_receipt_id ,
6047: p_receipt_number ,
6048: l_cr_def_return_status);
6049: IF PG_DEBUG in ('Y', 'C') THEN
6050: arp_util.debug('Derive_reverse_ids: ' || 'l_cr_def__return_status :'||l_cr_def_return_status);
6051: END IF;
6052:
6053: --reversal category
6054: Default_rev_catg_code(p_reversal_category_code,
6055: p_reversal_category_name,
6056: l_rev_cat_return_status
6057: );
6058: IF PG_DEBUG in ('Y', 'C') THEN
6059: arp_util.debug('Derive_reverse_ids: ' || 'l_rev_cat_return_status :'||l_rev_cat_return_status);
6060: END IF;
6061:
6062: --reversal reason code
6063: Default_rev_reason_code(p_reversal_reason_code,
6072: p_return_status := FND_API.G_RET_STS_ERROR ;
6073: END IF;
6074:
6075: IF PG_DEBUG in ('Y', 'C') THEN
6076: arp_util.debug('Derive_reverse_ids ()- ');
6077: END IF;
6078: EXCEPTION
6079: When others THEN
6080: IF PG_DEBUG in ('Y', 'C') THEN
6077: END IF;
6078: EXCEPTION
6079: When others THEN
6080: IF PG_DEBUG in ('Y', 'C') THEN
6081: arp_util.debug('EXCEPTION: Derive_reverse_ids()');
6082: END IF;
6083: END Derive_reverse_ids;
6084:
6085: PROCEDURE Default_reverse_info(p_cash_receipt_id IN NUMBER,
6094: l_apply_date DATE;
6095: l_gl_date DATE;
6096: BEGIN
6097: IF PG_DEBUG in ('Y', 'C') THEN
6098: arp_util.debug('Default_reverse_info ()+');
6099: END IF;
6100: /*Get the receipt date and the status */
6101:
6102: SELECT cr.receipt_date, crh.status, cr.type
6123: where cash_receipt_id = p_cash_receipt_id;
6124:
6125: EXCEPTION WHEN OTHERS THEN
6126: IF PG_DEBUG in ('Y', 'C') THEN
6127: arp_util.debug('No application record exists for this receipt.');
6128: arp_util.debug('Default to sysdate to avoid NULL issue in defaulting logic.');
6129: END IF;
6130: l_apply_date := trunc(sysdate);
6131: l_gl_date := trunc(sysdate);
6124:
6125: EXCEPTION WHEN OTHERS THEN
6126: IF PG_DEBUG in ('Y', 'C') THEN
6127: arp_util.debug('No application record exists for this receipt.');
6128: arp_util.debug('Default to sysdate to avoid NULL issue in defaulting logic.');
6129: END IF;
6130: l_apply_date := trunc(sysdate);
6131: l_gl_date := trunc(sysdate);
6132: END;
6152: l_return_status);
6153: END IF;
6154:
6155: IF PG_DEBUG in ('Y', 'C') THEN
6156: arp_util.debug('Default_reverse_info: ' || '**************Defaulted Variables ************');
6157: arp_util.debug('Default_reverse_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6158: arp_util.debug('Default_reverse_info: ' || 'p_reversal_date : '||to_char(p_reversal_date,'DD-MON-YYYY'));
6159: arp_util.debug('Default_reverse_info: ' || 'p_receipt_state : '||p_receipt_state);
6160: arp_util.debug('Default_reverse_info: ' || 'p_receipt_gl_date : '||to_char(p_receipt_gl_date,'DD-MON-YYYY'));
6153: END IF;
6154:
6155: IF PG_DEBUG in ('Y', 'C') THEN
6156: arp_util.debug('Default_reverse_info: ' || '**************Defaulted Variables ************');
6157: arp_util.debug('Default_reverse_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6158: arp_util.debug('Default_reverse_info: ' || 'p_reversal_date : '||to_char(p_reversal_date,'DD-MON-YYYY'));
6159: arp_util.debug('Default_reverse_info: ' || 'p_receipt_state : '||p_receipt_state);
6160: arp_util.debug('Default_reverse_info: ' || 'p_receipt_gl_date : '||to_char(p_receipt_gl_date,'DD-MON-YYYY'));
6161: arp_util.debug('Default_reverse_info ()-');
6154:
6155: IF PG_DEBUG in ('Y', 'C') THEN
6156: arp_util.debug('Default_reverse_info: ' || '**************Defaulted Variables ************');
6157: arp_util.debug('Default_reverse_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6158: arp_util.debug('Default_reverse_info: ' || 'p_reversal_date : '||to_char(p_reversal_date,'DD-MON-YYYY'));
6159: arp_util.debug('Default_reverse_info: ' || 'p_receipt_state : '||p_receipt_state);
6160: arp_util.debug('Default_reverse_info: ' || 'p_receipt_gl_date : '||to_char(p_receipt_gl_date,'DD-MON-YYYY'));
6161: arp_util.debug('Default_reverse_info ()-');
6162: END IF;
6155: IF PG_DEBUG in ('Y', 'C') THEN
6156: arp_util.debug('Default_reverse_info: ' || '**************Defaulted Variables ************');
6157: arp_util.debug('Default_reverse_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6158: arp_util.debug('Default_reverse_info: ' || 'p_reversal_date : '||to_char(p_reversal_date,'DD-MON-YYYY'));
6159: arp_util.debug('Default_reverse_info: ' || 'p_receipt_state : '||p_receipt_state);
6160: arp_util.debug('Default_reverse_info: ' || 'p_receipt_gl_date : '||to_char(p_receipt_gl_date,'DD-MON-YYYY'));
6161: arp_util.debug('Default_reverse_info ()-');
6162: END IF;
6163: EXCEPTION
6156: arp_util.debug('Default_reverse_info: ' || '**************Defaulted Variables ************');
6157: arp_util.debug('Default_reverse_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6158: arp_util.debug('Default_reverse_info: ' || 'p_reversal_date : '||to_char(p_reversal_date,'DD-MON-YYYY'));
6159: arp_util.debug('Default_reverse_info: ' || 'p_receipt_state : '||p_receipt_state);
6160: arp_util.debug('Default_reverse_info: ' || 'p_receipt_gl_date : '||to_char(p_receipt_gl_date,'DD-MON-YYYY'));
6161: arp_util.debug('Default_reverse_info ()-');
6162: END IF;
6163: EXCEPTION
6164: WHEN no_data_found THEN
6157: arp_util.debug('Default_reverse_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6158: arp_util.debug('Default_reverse_info: ' || 'p_reversal_date : '||to_char(p_reversal_date,'DD-MON-YYYY'));
6159: arp_util.debug('Default_reverse_info: ' || 'p_receipt_state : '||p_receipt_state);
6160: arp_util.debug('Default_reverse_info: ' || 'p_receipt_gl_date : '||to_char(p_receipt_gl_date,'DD-MON-YYYY'));
6161: arp_util.debug('Default_reverse_info ()-');
6162: END IF;
6163: EXCEPTION
6164: WHEN no_data_found THEN
6165: --this may happen because of the invalid cash_receipt_id
6165: --this may happen because of the invalid cash_receipt_id
6166: --do not raise any message here, it shall be raised in the
6167: --validation phase.
6168: IF PG_DEBUG in ('Y', 'C') THEN
6169: arp_util.debug('Default_reverse_info: ' || 'Could not default info :Cash Receipt Id is invalid');
6170: END IF;
6171: WHEN others THEN
6172: IF PG_DEBUG in ('Y', 'C') THEN
6173: arp_util.debug('EXCEPTION: Default_reverse_info() ');
6169: arp_util.debug('Default_reverse_info: ' || 'Could not default info :Cash Receipt Id is invalid');
6170: END IF;
6171: WHEN others THEN
6172: IF PG_DEBUG in ('Y', 'C') THEN
6173: arp_util.debug('EXCEPTION: Default_reverse_info() ');
6174: END IF;
6175: raise;
6176: END Default_reverse_info;
6177:
6200: l_remit_bank_acct_use_id NUMBER;
6201: l_receipt_method_id NUMBER;
6202: BEGIN
6203: IF PG_DEBUG in ('Y', 'C') THEN
6204: arp_util.debug('Default_on_ac_app_info ()+');
6205: END IF;
6206: p_return_status := FND_API.G_RET_STS_SUCCESS;
6207:
6208: Default_Receipt_Info(
6220: l_receipt_method_id,
6221: l_receipt_return_status
6222: );
6223: IF PG_DEBUG in ('Y', 'C') THEN
6224: arp_util.debug('Default_on_ac_app_info: ' || 'Receipt defaulting return status :'||l_receipt_return_status);
6225: END IF;
6226: Default_apply_date(l_receipt_date ,
6227: null,
6228: p_apply_date);
6233: NULL,
6234: l_gl_date_return_status);
6235: END IF;
6236: IF PG_DEBUG in ('Y', 'C') THEN
6237: arp_util.debug('Default_on_ac_app_info: ' || 'Defaulting apply gl date return status :'|| l_gl_date_return_status);
6238: END IF;
6239:
6240: --default the amount applied
6241: IF p_amount_applied IS NULL THEN
6241: IF p_amount_applied IS NULL THEN
6242: p_amount_applied := l_cr_unapp_amount;
6243: END IF;
6244: --do the precision
6245: p_amount_applied := arp_util.CurrRound(
6246: p_amount_applied,
6247: l_cr_currency_code
6248: );
6249:
6258:
6259: p_cr_currency_code := l_cr_currency_code;
6260:
6261: IF PG_DEBUG in ('Y', 'C') THEN
6262: arp_util.debug('Default_on_ac_app_info: ' || '***************Default Values *****************');
6263: arp_util.debug('Default_on_ac_app_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6264: arp_util.debug('Default_on_ac_app_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
6265: arp_util.debug('Default_on_ac_app_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
6266: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6259: p_cr_currency_code := l_cr_currency_code;
6260:
6261: IF PG_DEBUG in ('Y', 'C') THEN
6262: arp_util.debug('Default_on_ac_app_info: ' || '***************Default Values *****************');
6263: arp_util.debug('Default_on_ac_app_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6264: arp_util.debug('Default_on_ac_app_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
6265: arp_util.debug('Default_on_ac_app_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
6266: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6267: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
6260:
6261: IF PG_DEBUG in ('Y', 'C') THEN
6262: arp_util.debug('Default_on_ac_app_info: ' || '***************Default Values *****************');
6263: arp_util.debug('Default_on_ac_app_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6264: arp_util.debug('Default_on_ac_app_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
6265: arp_util.debug('Default_on_ac_app_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
6266: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6267: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
6268: arp_util.debug('Default_on_ac_app_info ()-');
6261: IF PG_DEBUG in ('Y', 'C') THEN
6262: arp_util.debug('Default_on_ac_app_info: ' || '***************Default Values *****************');
6263: arp_util.debug('Default_on_ac_app_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6264: arp_util.debug('Default_on_ac_app_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
6265: arp_util.debug('Default_on_ac_app_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
6266: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6267: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
6268: arp_util.debug('Default_on_ac_app_info ()-');
6269: END IF;
6262: arp_util.debug('Default_on_ac_app_info: ' || '***************Default Values *****************');
6263: arp_util.debug('Default_on_ac_app_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6264: arp_util.debug('Default_on_ac_app_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
6265: arp_util.debug('Default_on_ac_app_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
6266: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6267: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
6268: arp_util.debug('Default_on_ac_app_info ()-');
6269: END IF;
6270: EXCEPTION
6263: arp_util.debug('Default_on_ac_app_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6264: arp_util.debug('Default_on_ac_app_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
6265: arp_util.debug('Default_on_ac_app_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
6266: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6267: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
6268: arp_util.debug('Default_on_ac_app_info ()-');
6269: END IF;
6270: EXCEPTION
6271: WHEN others THEN
6264: arp_util.debug('Default_on_ac_app_info: ' || 'p_cr_gl_date : '||to_char(p_cr_gl_date,'DD-MON-YYYY'));
6265: arp_util.debug('Default_on_ac_app_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
6266: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6267: arp_util.debug('Default_on_ac_app_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
6268: arp_util.debug('Default_on_ac_app_info ()-');
6269: END IF;
6270: EXCEPTION
6271: WHEN others THEN
6272: IF PG_DEBUG in ('Y', 'C') THEN
6269: END IF;
6270: EXCEPTION
6271: WHEN others THEN
6272: IF PG_DEBUG in ('Y', 'C') THEN
6273: arp_util.debug('EXCEPTION: Default_on_ac_app_info() ');
6274: END IF;
6275: raise;
6276: END Default_on_ac_app_info;
6277:
6287: l_cash_receipt_id NUMBER;
6288: BEGIN
6289: p_return_status := FND_API.G_RET_STS_SUCCESS;
6290: IF PG_DEBUG in ('Y', 'C') THEN
6291: arp_util.debug('Derive_unapp_on_ac_ids ()+');
6292: END IF;
6293: --derive the cash_receipt_id from the receipt_number
6294: IF p_receipt_number IS NOT NULL THEN
6295: Default_cash_receipt_id(p_cash_receipt_id ,
6359: p_cash_receipt_id := l_cash_receipt_id;
6360: END IF;
6361:
6362: IF PG_DEBUG in ('Y', 'C') THEN
6363: arp_util.debug('Derive_unapp_on_ac_ids ()+');
6364: END IF;
6365: END Derive_unapp_on_ac_ids;
6366:
6367: PROCEDURE Derive_otheraccount_ids(
6380:
6381: BEGIN
6382: p_return_status := FND_API.G_RET_STS_SUCCESS;
6383: IF PG_DEBUG in ('Y', 'C') THEN
6384: arp_util.debug('Derive_otheraccount_ids ()+');
6385: END IF;
6386: --derive the cash_receipt_id from the receipt_number
6387: IF p_receipt_number IS NOT NULL THEN
6388: Default_cash_receipt_id(p_cash_receipt_id ,
6464: AND ra.status = 'UNAPP'
6465: AND nvl(ra.confirmed_flag,'Y') = 'Y';
6466: END IF;
6467: IF PG_DEBUG in ('Y', 'C') THEN
6468: arp_util.debug('Derive_otheraccount_ids: ' || 'Derive_unapp_on_ac_ids ()+');
6469: END IF;
6470: END Derive_otheraccount_ids;
6471:
6472: PROCEDURE Default_unapp_on_ac_act_info(
6483: l_defaulting_rule_used VARCHAR2(100);
6484: l_error_message VARCHAR2(240);
6485: BEGIN
6486: IF PG_DEBUG in ('Y', 'C') THEN
6487: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'Default_unapp_on_acc_act_info ()+');
6488: END IF;
6489: l_apply_gl_date := p_apply_gl_date;
6490:
6491: /* Bug fix 3503167 : We need to pass the apply_gl_date as the candidate gl_date and
6490:
6491: /* Bug fix 3503167 : We need to pass the apply_gl_date as the candidate gl_date and
6492: as the validation date */
6493: IF p_reversal_gl_date is null THEN
6494: IF (arp_util.validate_and_default_gl_date(
6495: nvl(l_apply_gl_date,trunc(sysdate)),
6496: NULL,
6497: l_apply_gl_date,
6498: NULL,
6533: EXCEPTION
6534: WHEN no_data_found THEN
6535: null;
6536: IF PG_DEBUG in ('Y', 'C') THEN
6537: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'Could not get the receipt_gl_date. ');
6538: END IF;
6539: END;
6540: END IF;
6541: IF PG_DEBUG in ('Y', 'C') THEN
6538: END IF;
6539: END;
6540: END IF;
6541: IF PG_DEBUG in ('Y', 'C') THEN
6542: arp_util.debug('Default_unapp_on_ac_act_info: ' || '*****Defaulted Values *********');
6543: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6544: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
6545: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6546: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6539: END;
6540: END IF;
6541: IF PG_DEBUG in ('Y', 'C') THEN
6542: arp_util.debug('Default_unapp_on_ac_act_info: ' || '*****Defaulted Values *********');
6543: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6544: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
6545: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6546: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6547: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'Default_unapp_on_acc_act_info ()-');
6540: END IF;
6541: IF PG_DEBUG in ('Y', 'C') THEN
6542: arp_util.debug('Default_unapp_on_ac_act_info: ' || '*****Defaulted Values *********');
6543: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6544: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
6545: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6546: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6547: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'Default_unapp_on_acc_act_info ()-');
6548: END IF;
6541: IF PG_DEBUG in ('Y', 'C') THEN
6542: arp_util.debug('Default_unapp_on_ac_act_info: ' || '*****Defaulted Values *********');
6543: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6544: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
6545: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6546: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6547: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'Default_unapp_on_acc_act_info ()-');
6548: END IF;
6549:
6542: arp_util.debug('Default_unapp_on_ac_act_info: ' || '*****Defaulted Values *********');
6543: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6544: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
6545: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6546: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6547: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'Default_unapp_on_acc_act_info ()-');
6548: END IF;
6549:
6550: END Default_unapp_on_ac_act_info;
6543: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_cash_receipt_id : '||to_char(p_cash_receipt_id));
6544: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
6545: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
6546: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
6547: arp_util.debug('Default_unapp_on_ac_act_info: ' || 'Default_unapp_on_acc_act_info ()-');
6548: END IF;
6549:
6550: END Default_unapp_on_ac_act_info;
6551:
6563: l_cash_receipt_id NUMBER;
6564: BEGIN
6565: p_return_status := FND_API.G_RET_STS_SUCCESS;
6566: IF PG_DEBUG in ('Y', 'C') THEN
6567: arp_util.debug('Derive_activity_unapp_ids ()+');
6568: END IF;
6569: --derive the cash_receipt_id from the receipt_number
6570: IF p_receipt_number IS NOT NULL THEN
6571: Default_cash_receipt_id(p_cash_receipt_id ,
6671: AND nvl(ra.confirmed_flag,'Y') = 'Y';
6672: END IF;
6673:
6674: IF PG_DEBUG in ('Y', 'C') THEN
6675: arp_util.debug('Derive_activity_unapp_ids ()+');
6676: END IF;
6677: END Derive_activity_unapp_ids;
6678:
6679: PROCEDURE get_doc_seq(p_application_id IN NUMBER,
6695: l_aud_tab_name VARCHAR2(50);
6696: l_msg_flag VARCHAR2(1);
6697: BEGIN
6698: IF PG_DEBUG in ('Y', 'C') THEN
6699: arp_util.debug('get_doc_seq ()+');
6700: arp_util.debug('get_doc_seq: ' || 'SEQ : '||NVL( pg_profile_doc_seq, 'N'));
6701: arp_util.debug('get_doc_seq: ' || 'p_document_name :'||p_document_name);
6702: arp_util.debug('get_doc_seq: ' || 'p_application_id :'||to_char(p_application_id));
6703: arp_util.debug('get_doc_seq: ' || 'p_sob_id :'||to_char(p_sob_id));
6696: l_msg_flag VARCHAR2(1);
6697: BEGIN
6698: IF PG_DEBUG in ('Y', 'C') THEN
6699: arp_util.debug('get_doc_seq ()+');
6700: arp_util.debug('get_doc_seq: ' || 'SEQ : '||NVL( pg_profile_doc_seq, 'N'));
6701: arp_util.debug('get_doc_seq: ' || 'p_document_name :'||p_document_name);
6702: arp_util.debug('get_doc_seq: ' || 'p_application_id :'||to_char(p_application_id));
6703: arp_util.debug('get_doc_seq: ' || 'p_sob_id :'||to_char(p_sob_id));
6704: END IF;
6697: BEGIN
6698: IF PG_DEBUG in ('Y', 'C') THEN
6699: arp_util.debug('get_doc_seq ()+');
6700: arp_util.debug('get_doc_seq: ' || 'SEQ : '||NVL( pg_profile_doc_seq, 'N'));
6701: arp_util.debug('get_doc_seq: ' || 'p_document_name :'||p_document_name);
6702: arp_util.debug('get_doc_seq: ' || 'p_application_id :'||to_char(p_application_id));
6703: arp_util.debug('get_doc_seq: ' || 'p_sob_id :'||to_char(p_sob_id));
6704: END IF;
6705: p_return_status := FND_API.G_RET_STS_SUCCESS;
6698: IF PG_DEBUG in ('Y', 'C') THEN
6699: arp_util.debug('get_doc_seq ()+');
6700: arp_util.debug('get_doc_seq: ' || 'SEQ : '||NVL( pg_profile_doc_seq, 'N'));
6701: arp_util.debug('get_doc_seq: ' || 'p_document_name :'||p_document_name);
6702: arp_util.debug('get_doc_seq: ' || 'p_application_id :'||to_char(p_application_id));
6703: arp_util.debug('get_doc_seq: ' || 'p_sob_id :'||to_char(p_sob_id));
6704: END IF;
6705: p_return_status := FND_API.G_RET_STS_SUCCESS;
6706: IF ( NVL( pg_profile_doc_seq, 'N') <> 'N' )
6699: arp_util.debug('get_doc_seq ()+');
6700: arp_util.debug('get_doc_seq: ' || 'SEQ : '||NVL( pg_profile_doc_seq, 'N'));
6701: arp_util.debug('get_doc_seq: ' || 'p_document_name :'||p_document_name);
6702: arp_util.debug('get_doc_seq: ' || 'p_application_id :'||to_char(p_application_id));
6703: arp_util.debug('get_doc_seq: ' || 'p_sob_id :'||to_char(p_sob_id));
6704: END IF;
6705: p_return_status := FND_API.G_RET_STS_SUCCESS;
6706: IF ( NVL( pg_profile_doc_seq, 'N') <> 'N' )
6707: THEN
6725: l_aud_tab_name,
6726: l_msg_flag,
6727: 'Y',
6728: 'Y');
6729: arp_util.debug('Doc sequence return status :'||to_char(nvl(l_doc_seq_ret_stat,-99)));
6730: IF PG_DEBUG in ('Y', 'C') THEN
6731: arp_util.debug('get_doc_seq: ' || 'l_doc_sequence_name :'||l_doc_sequence_name);
6732: END IF;
6733: arp_util.debug('l_doc_sequence_id :'||to_char(nvl(p_doc_sequence_id,-99)));
6727: 'Y',
6728: 'Y');
6729: arp_util.debug('Doc sequence return status :'||to_char(nvl(l_doc_seq_ret_stat,-99)));
6730: IF PG_DEBUG in ('Y', 'C') THEN
6731: arp_util.debug('get_doc_seq: ' || 'l_doc_sequence_name :'||l_doc_sequence_name);
6732: END IF;
6733: arp_util.debug('l_doc_sequence_id :'||to_char(nvl(p_doc_sequence_id,-99)));
6734:
6735: IF l_doc_seq_ret_stat = -8 THEN
6729: arp_util.debug('Doc sequence return status :'||to_char(nvl(l_doc_seq_ret_stat,-99)));
6730: IF PG_DEBUG in ('Y', 'C') THEN
6731: arp_util.debug('get_doc_seq: ' || 'l_doc_sequence_name :'||l_doc_sequence_name);
6732: END IF;
6733: arp_util.debug('l_doc_sequence_id :'||to_char(nvl(p_doc_sequence_id,-99)));
6734:
6735: IF l_doc_seq_ret_stat = -8 THEN
6736: --this is the case of Always Used
6737: IF PG_DEBUG in ('Y', 'C') THEN
6734:
6735: IF l_doc_seq_ret_stat = -8 THEN
6736: --this is the case of Always Used
6737: IF PG_DEBUG in ('Y', 'C') THEN
6738: arp_util.debug('get_doc_seq: ' || 'The doc sequence does not exist for the current document');
6739: END IF;
6740: p_return_status := FND_API.G_RET_STS_ERROR;
6741: --Error message
6742: FND_MESSAGE.Set_Name( 'AR','AR_RAPI_DOC_SEQ_NOT_EXIST_A');
6743: FND_MSG_PUB.Add;
6744: ELSIF l_doc_seq_ret_stat = -2 THEN
6745: --this is the case of Partially Used
6746: IF PG_DEBUG in ('Y', 'C') THEN
6747: arp_util.debug('get_doc_seq: ' || 'The doc sequence does not exist for the current document');
6748: END IF;
6749: --Warning
6750: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
6751: THEN
6764: /*------------------------------------+
6765: | Automatic Document Numbering case |
6766: +------------------------------------*/
6767: IF PG_DEBUG in ('Y', 'C') THEN
6768: arp_util.debug('get_doc_seq: ' || 'Automatic Document Numbering case ');
6769: END IF;
6770: l_doc_seq_ret_stat :=
6771: fnd_seqnum.get_seq_val (
6772: p_application_id,
6783: FND_MESSAGE.Set_Name('AR', 'AR_RAPI_DOC_SEQ_AUTOMATIC');
6784: FND_MSG_PUB.Add;
6785: END IF;
6786: p_doc_sequence_value := l_doc_sequence_value;
6787: arp_util.debug('l_doc_sequence_value :'||to_char(nvl(p_doc_sequence_value,-99)));
6788: ELSIF (
6789: p_doc_sequence_id IS NOT NULL
6790: AND p_doc_sequence_value IS NOT NULL
6791: )
6832: | Generate an error if document numbering |
6833: | is mandatory. |
6834: +------------------------------------------*/
6835: IF PG_DEBUG in ('Y', 'C') THEN
6836: arp_util.debug('get_doc_seq: ' || 'no_data_found raised');
6837: END IF;
6838: IF (pg_profile_doc_seq = 'A' ) THEN
6839: p_return_status := FND_API.G_RET_STS_ERROR;
6840: FND_MESSAGE.Set_Name( 'FND','UNIQUE-ALWAYS USED');
6845: END IF;
6846:
6847: WHEN OTHERS THEN
6848: IF PG_DEBUG in ('Y', 'C') THEN
6849: arp_util.debug('get_doc_seq: ' || 'Unhandled exception in doc sequence assignment');
6850: END IF;
6851: raise;
6852:
6853: END;
6853: END;
6854:
6855: END IF;
6856: IF PG_DEBUG in ('Y', 'C') THEN
6857: arp_util.debug('get_doc_seq ()+');
6858: END IF;
6859: END get_doc_seq;
6860:
6861: /* modified for tca uptake */
7132: WHERE receipt_method_id = p_receipt_method_id;
7133: EXCEPTION
7134: WHEN no_data_found THEN
7135: IF PG_DEBUG in ('Y', 'C') THEN
7136: arp_util.debug('Default_misc_ids: ' || 'Invalid receipt method id');
7137: END IF;
7138: null;
7139: END;
7140:
7381: FROM ar_distribution_set_lines
7382: WHERE distribution_set_id = p_distribution_set_id;
7383: BEGIN
7384: IF PG_DEBUG in ('Y', 'C') THEN
7385: arp_util.debug('Get_misc_Defaults()+ ');
7386: END IF;
7387: p_return_status := FND_API.G_RET_STS_SUCCESS;
7388: -- default the receipt date if NULL
7389: IF (p_receipt_date IS NULL)
7399: p_gl_date,
7400: NULL,
7401: l_def_gl_dt_return_status);
7402: IF PG_DEBUG in ('Y', 'C') THEN
7403: arp_util.debug('Get_misc_defaults: ' || 'l_default_gl_date_return_status : '||l_def_gl_dt_return_status);
7404: END IF;
7405: END IF;
7406:
7407: IF (p_deposit_date IS NULL)
7420: );
7421:
7422: --Set the precision of the receipt amount as per currency
7423: IF p_amount is NOT NULL THEN
7424: p_amount := arp_util.CurrRound( p_amount,
7425: p_currency_code
7426: );
7427: END IF;
7428:
7654: END IF;
7655: /* End of Bug3315058*/
7656: IF p_tax_amount IS NOT NULL THEN
7657:
7658: l_tax_amount := arp_util.CurrRound( p_tax_amount,
7659: p_currency_code
7660: );
7661: END IF;
7662:
7691: l_bank_acc_val_ret_status <> FND_API.G_RET_STS_SUCCESS THEN /* Bug fix 3315058 */
7692: p_return_status := FND_API.G_RET_STS_ERROR;
7693: END IF;
7694: IF PG_DEBUG in ('Y', 'C') THEN
7695: arp_util.debug('Get_misc_defaults: ' || '************Cash Defaults********************');
7696: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
7697: arp_util.debug('Get_misc_defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7692: p_return_status := FND_API.G_RET_STS_ERROR;
7693: END IF;
7694: IF PG_DEBUG in ('Y', 'C') THEN
7695: arp_util.debug('Get_misc_defaults: ' || '************Cash Defaults********************');
7696: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
7697: arp_util.debug('Get_misc_defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7693: END IF;
7694: IF PG_DEBUG in ('Y', 'C') THEN
7695: arp_util.debug('Get_misc_defaults: ' || '************Cash Defaults********************');
7696: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
7697: arp_util.debug('Get_misc_defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7694: IF PG_DEBUG in ('Y', 'C') THEN
7695: arp_util.debug('Get_misc_defaults: ' || '************Cash Defaults********************');
7696: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
7697: arp_util.debug('Get_misc_defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7695: arp_util.debug('Get_misc_defaults: ' || '************Cash Defaults********************');
7696: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
7697: arp_util.debug('Get_misc_defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7696: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_date : '||to_char(p_receipt_date,'DD-MON-YYYY'));
7697: arp_util.debug('Get_misc_defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7704: arp_util.debug('Get_misc_defaults: ' || 'p_remittance_bank_account_id : '||to_char(p_remittance_bank_account_id));
7697: arp_util.debug('Get_misc_defaults: ' || 'p_gl_date : '||to_char(p_gl_date,'DD-MON-YYYY'));
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7704: arp_util.debug('Get_misc_defaults: ' || 'p_remittance_bank_account_id : '||to_char(p_remittance_bank_account_id));
7705: arp_util.debug('Get_misc_defaults: ' || 'p_state : '||p_state);
7698: arp_util.debug('Get_misc_defaults: ' || 'p_deposit_date : '||to_char(p_deposit_date,'DD-MON-YYYY'));
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7704: arp_util.debug('Get_misc_defaults: ' || 'p_remittance_bank_account_id : '||to_char(p_remittance_bank_account_id));
7705: arp_util.debug('Get_misc_defaults: ' || 'p_state : '||p_state);
7706: arp_util.debug('Get_misc_Defaults ()-');
7699: arp_util.debug('Get_misc_defaults: ' || 'p_currency_code : '||p_currency_code);
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7704: arp_util.debug('Get_misc_defaults: ' || 'p_remittance_bank_account_id : '||to_char(p_remittance_bank_account_id));
7705: arp_util.debug('Get_misc_defaults: ' || 'p_state : '||p_state);
7706: arp_util.debug('Get_misc_Defaults ()-');
7707: END IF;
7700: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_date : '||to_char(p_exchange_date,'DD-MON-YYYY'));
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7704: arp_util.debug('Get_misc_defaults: ' || 'p_remittance_bank_account_id : '||to_char(p_remittance_bank_account_id));
7705: arp_util.debug('Get_misc_defaults: ' || 'p_state : '||p_state);
7706: arp_util.debug('Get_misc_Defaults ()-');
7707: END IF;
7708:
7701: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate_type : '||p_exchange_rate_type);
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7704: arp_util.debug('Get_misc_defaults: ' || 'p_remittance_bank_account_id : '||to_char(p_remittance_bank_account_id));
7705: arp_util.debug('Get_misc_defaults: ' || 'p_state : '||p_state);
7706: arp_util.debug('Get_misc_Defaults ()-');
7707: END IF;
7708:
7709: END Get_misc_defaults;
7702: arp_util.debug('Get_misc_defaults: ' || 'p_exchange_rate : '||to_char(p_exchange_rate));
7703: arp_util.debug('Get_misc_defaults: ' || 'p_receipt_method_id : '||to_char(p_receipt_method_id));
7704: arp_util.debug('Get_misc_defaults: ' || 'p_remittance_bank_account_id : '||to_char(p_remittance_bank_account_id));
7705: arp_util.debug('Get_misc_defaults: ' || 'p_state : '||p_state);
7706: arp_util.debug('Get_misc_Defaults ()-');
7707: END IF;
7708:
7709: END Get_misc_defaults;
7710:
7724: WHERE application_id = 222
7725: and descriptive_flexfield_name = p_desc_flex_name;
7726: BEGIN
7727: IF PG_DEBUG in ('Y', 'C') THEN
7728: arp_util.debug('Validate_Desc_Flexfield ()+');
7729: END IF;
7730: p_return_status := FND_API.G_RET_STS_SUCCESS;
7731:
7732: OPEN desc_flex_exists;
7817: END IF;
7818: END LOOP;
7819:
7820: IF PG_DEBUG in ('Y', 'C') THEN
7821: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute_category : '||p_desc_flex_rec.attribute_category);
7822: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute1 : '||p_desc_flex_rec.attribute1);
7823: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute2 : '||p_desc_flex_rec.attribute2);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7818: END LOOP;
7819:
7820: IF PG_DEBUG in ('Y', 'C') THEN
7821: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute_category : '||p_desc_flex_rec.attribute_category);
7822: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute1 : '||p_desc_flex_rec.attribute1);
7823: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute2 : '||p_desc_flex_rec.attribute2);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7819:
7820: IF PG_DEBUG in ('Y', 'C') THEN
7821: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute_category : '||p_desc_flex_rec.attribute_category);
7822: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute1 : '||p_desc_flex_rec.attribute1);
7823: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute2 : '||p_desc_flex_rec.attribute2);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7820: IF PG_DEBUG in ('Y', 'C') THEN
7821: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute_category : '||p_desc_flex_rec.attribute_category);
7822: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute1 : '||p_desc_flex_rec.attribute1);
7823: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute2 : '||p_desc_flex_rec.attribute2);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7821: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute_category : '||p_desc_flex_rec.attribute_category);
7822: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute1 : '||p_desc_flex_rec.attribute1);
7823: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute2 : '||p_desc_flex_rec.attribute2);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7822: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute1 : '||p_desc_flex_rec.attribute1);
7823: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute2 : '||p_desc_flex_rec.attribute2);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7823: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute2 : '||p_desc_flex_rec.attribute2);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7824: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute3 : '||p_desc_flex_rec.attribute3);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7825: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute4 : '||p_desc_flex_rec.attribute4);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7826: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute5 : '||p_desc_flex_rec.attribute5);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7827: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute6 : '||p_desc_flex_rec.attribute6);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7835: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute14 : '||p_desc_flex_rec.attribute14);
7828: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute7 : '||p_desc_flex_rec.attribute7);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7835: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute14 : '||p_desc_flex_rec.attribute14);
7836: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute15 : '||p_desc_flex_rec.attribute15);
7829: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute8 : '||p_desc_flex_rec.attribute8);
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7835: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute14 : '||p_desc_flex_rec.attribute14);
7836: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute15 : '||p_desc_flex_rec.attribute15);
7837: arp_util.debug('Validate_Desc_Flexfield ()-');
7830: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute9 : '||p_desc_flex_rec.attribute9);
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7835: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute14 : '||p_desc_flex_rec.attribute14);
7836: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute15 : '||p_desc_flex_rec.attribute15);
7837: arp_util.debug('Validate_Desc_Flexfield ()-');
7838: END IF;
7831: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute10 : '||p_desc_flex_rec.attribute10);
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7835: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute14 : '||p_desc_flex_rec.attribute14);
7836: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute15 : '||p_desc_flex_rec.attribute15);
7837: arp_util.debug('Validate_Desc_Flexfield ()-');
7838: END IF;
7839: END Validate_Desc_Flexfield;
7832: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute11 : '||p_desc_flex_rec.attribute11);
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7835: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute14 : '||p_desc_flex_rec.attribute14);
7836: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute15 : '||p_desc_flex_rec.attribute15);
7837: arp_util.debug('Validate_Desc_Flexfield ()-');
7838: END IF;
7839: END Validate_Desc_Flexfield;
7840:
7833: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute12 : '||p_desc_flex_rec.attribute12);
7834: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute13 : '||p_desc_flex_rec.attribute13);
7835: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute14 : '||p_desc_flex_rec.attribute14);
7836: arp_util.debug('Validate_Desc_Flexfield: ' || 'attribute15 : '||p_desc_flex_rec.attribute15);
7837: arp_util.debug('Validate_Desc_Flexfield ()-');
7838: END IF;
7839: END Validate_Desc_Flexfield;
7840:
7841: /* Bug fix 3539008 */
7845: p_return_status IN OUT NOCOPY VARCHAR2
7846: ) IS
7847: BEGIN
7848: IF PG_DEBUG in ('Y', 'C') THEN
7849: arp_util.debug('ar_receipt_lib_pvt.Default_Desc_Flexfield(+)');
7850: END IF;
7851: p_return_status := FND_API.G_RET_STS_SUCCESS;
7852: IF p_cash_receipt_id IS NOT NULL THEN
7853: SELECT attribute_category,
7871: FROM ar_cash_receipts
7872: WHERE cash_receipt_id = p_cash_receipt_id;
7873: END IF;
7874: IF PG_DEBUG in ('Y', 'C') THEN
7875: arp_util.debug('ar_receipt_lib_pvt.Default_Desc_Flexfield(-)');
7876: END IF;
7877:
7878: EXCEPTION WHEN OTHERS THEN
7879: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CASH_RCPT_ID_INVALID');
7888: p_return_status OUT NOCOPY VARCHAR2
7889: ) IS
7890: BEGIN
7891: IF PG_DEBUG in ('Y', 'C') THEN
7892: arp_util.debug('ar_receipt_lib_pvt.Default_prepay_cc_activity(+)');
7893: END IF;
7894:
7895: p_return_status := FND_API.G_RET_STS_SUCCESS;
7896:
7913: END;
7914: END IF;
7915:
7916: IF PG_DEBUG in ('Y', 'C') THEN
7917: arp_util.debug('ar_receipt_lib_pvt.Default_prepay_cc_activity(+)');
7918: END IF;
7919:
7920: END Default_prepay_cc_activity;
7921:
7964:
7965: BEGIN
7966:
7967: IF PG_DEBUG in ('Y', 'C') THEN
7968: arp_util.debug('ar_receipt_lib_pvt.Default_open_receipt(+)');
7969: END IF;
7970:
7971: x_return_status := FND_API.G_RET_STS_SUCCESS ;
7972: x_open_applied_ps_id := NULL;
8127:
8128: x_last_receipt_date := GREATEST(l_receipt_date,l_open_receipt_date);
8129:
8130: IF PG_DEBUG in ('Y', 'C') THEN
8131: arp_util.debug('ar_receipt_lib_pvt.Default_open_receipt(-)');
8132: END IF;
8133: END default_open_receipt;
8134:
8135: PROCEDURE default_unapp_open_receipt(
8143: BEGIN
8144:
8145: x_return_status := FND_API.G_RET_STS_SUCCESS;
8146: IF PG_DEBUG in ('Y', 'C') THEN
8147: arp_util.debug('ar_receipt_lib_pvt.Default_unapp_open_receipt(+)');
8148: END IF;
8149:
8150: SELECT app.applied_rec_app_id,
8151: applied_app.cash_receipt_id,
8158: WHERE app.applied_rec_app_id = applied_app.receivable_application_id
8159: AND app.receivable_application_id = p_receivable_application_id;
8160:
8161: IF PG_DEBUG in ('Y', 'C') THEN
8162: arp_util.debug('ar_receipt_lib_pvt.Default_unapp_open_receipt(-)');
8163: END IF;
8164:
8165: EXCEPTION
8166: WHEN no_data_found THEN
8175: l_legal_entity_id NUMBER;
8176: l_return_status VARCHAR2(1);
8177: BEGIN
8178: IF PG_DEBUG in ('Y', 'C') THEN
8179: arp_util.debug('ar_receipt_lib_pvt.get_legal_entity(+)');
8180: END IF;
8181:
8182: l_legal_entity_id := TO_NUMBER(Get_Id('LEGAL_ENTITY',
8183: p_remit_bank_acct_use_id,
8185: ));
8186: RETURN l_legal_entity_id;
8187:
8188: IF PG_DEBUG in ('Y', 'C') THEN
8189: arp_util.debug('ar_receipt_lib_pvt.get_legal_entity(-)');
8190: END IF;
8191: EXCEPTION
8192: WHEN OTHERS THEN
8193: RETURN NULL;
8231: l_party_site_id hz_parties.party_id%TYPE;
8232: l_pmt_attr_rec iby_disbursement_comp_pub.default_pmt_attrs_rec_type;
8233: BEGIN
8234: IF PG_DEBUG in ('Y', 'C') THEN
8235: arp_util.debug('ar_receipt_lib_pvt.default_refund_attributes(+)');
8236: END IF;
8237: l_trxn_attributes_rec.application_id := 222;
8238:
8239: IF p_cash_receipt_id IS NOT NULL THEN
8329: l_trxn_attributes_rec.payment_amount := p_amount;
8330: l_trxn_attributes_rec.payment_function := 'AR_CUSTOMER_REFUNDS';
8331:
8332: IF PG_DEBUG in ('Y', 'C') THEN
8333: arp_util.debug('Calling get_default_payment_attributes .......: ');
8334: END IF;
8335:
8336: /* Bug 5056865 p_ignore_payee_pref should be passed as 'Y' as discussed in
8337: Related Bug 5115632 */
8348: exception when others then null;
8349: end;
8350:
8351: IF PG_DEBUG in ('Y', 'C') THEN
8352: arp_util.debug('get_default_payment_attributes return status: '||x_return_status);
8353: END IF;
8354:
8355: x_payment_method_code := l_pmt_attr_rec.payment_method.payment_method_code;
8356: x_payment_method_name := l_pmt_attr_rec.payment_method.payment_method_name;
8361: x_delivery_channel_code := l_pmt_attr_rec.delivery_channel.code;
8362: x_delivery_channel_name := l_pmt_attr_rec.delivery_channel.meaning;
8363: x_pay_alone_flag := l_pmt_attr_rec.pay_alone;
8364: IF PG_DEBUG in ('Y', 'C') THEN
8365: arp_util.debug('ar_receipt_lib_pvt.default_refund_attributes(-)');
8366: END IF;
8367: END default_refund_attributes;
8368:
8369:
8383: p_return_status OUT NOCOPY VARCHAR2)
8384: IS
8385: BEGIN
8386: IF PG_DEBUG in ('Y', 'C') THEN
8387: arp_util.debug('Populate_llca_gt ()+ ');
8388: END IF;
8389:
8390: p_return_status := FND_API.G_RET_STS_SUCCESS;
8391:
8399: If p_llca_type = 'S'
8400: Then
8401: If p_llca_trx_lines_tbl.count <> 0 Then
8402: IF PG_DEBUG in ('Y', 'C') THEN
8403: arp_util.debug('Apply_In_Detail: ' || 'Table must be empty for
8404: Summary Level application ');
8405: END IF;
8406: End If;
8407: END IF;
8409: If p_llca_type = 'L'
8410: Then
8411: If p_llca_trx_lines_tbl.count = 0 Then
8412: IF PG_DEBUG in ('Y', 'C') THEN
8413: arp_util.debug('=======================================================');
8414: arp_util.debug(' PL SQL TABLE ( INPUT PARAMETERS ........)+ ');
8415: arp_util.debug('=======================================================');
8416: arp_util.debug('Apply_In_Detail: ' || 'Pl Sql Table is empty ..
8417: All Lines ');
8410: Then
8411: If p_llca_trx_lines_tbl.count = 0 Then
8412: IF PG_DEBUG in ('Y', 'C') THEN
8413: arp_util.debug('=======================================================');
8414: arp_util.debug(' PL SQL TABLE ( INPUT PARAMETERS ........)+ ');
8415: arp_util.debug('=======================================================');
8416: arp_util.debug('Apply_In_Detail: ' || 'Pl Sql Table is empty ..
8417: All Lines ');
8418: END IF;
8411: If p_llca_trx_lines_tbl.count = 0 Then
8412: IF PG_DEBUG in ('Y', 'C') THEN
8413: arp_util.debug('=======================================================');
8414: arp_util.debug(' PL SQL TABLE ( INPUT PARAMETERS ........)+ ');
8415: arp_util.debug('=======================================================');
8416: arp_util.debug('Apply_In_Detail: ' || 'Pl Sql Table is empty ..
8417: All Lines ');
8418: END IF;
8419: Else
8412: IF PG_DEBUG in ('Y', 'C') THEN
8413: arp_util.debug('=======================================================');
8414: arp_util.debug(' PL SQL TABLE ( INPUT PARAMETERS ........)+ ');
8415: arp_util.debug('=======================================================');
8416: arp_util.debug('Apply_In_Detail: ' || 'Pl Sql Table is empty ..
8417: All Lines ');
8418: END IF;
8419: Else
8420: IF PG_DEBUG in ('Y', 'C') THEN
8417: All Lines ');
8418: END IF;
8419: Else
8420: IF PG_DEBUG in ('Y', 'C') THEN
8421: arp_util.debug('No of records in PLSQL Table
8422: =>'||to_char(p_llca_trx_lines_tbl.count));
8423: END IF;
8424:
8425: --bug7311231, Populating the GT table with flexfield information of each line.
8487: p_llca_trx_lines_tbl(i).attribute15
8488: );
8489:
8490: IF PG_DEBUG in ('Y', 'C') THEN
8491: arp_util.debug('=======================================================');
8492: arp_util.debug(' Line .............=>'||to_char(i));
8493: arp_util.debug('p_customer_trx_id =>'||to_char(p_customer_trx_id));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8488: );
8489:
8490: IF PG_DEBUG in ('Y', 'C') THEN
8491: arp_util.debug('=======================================================');
8492: arp_util.debug(' Line .............=>'||to_char(i));
8493: arp_util.debug('p_customer_trx_id =>'||to_char(p_customer_trx_id));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8489:
8490: IF PG_DEBUG in ('Y', 'C') THEN
8491: arp_util.debug('=======================================================');
8492: arp_util.debug(' Line .............=>'||to_char(i));
8493: arp_util.debug('p_customer_trx_id =>'||to_char(p_customer_trx_id));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8490: IF PG_DEBUG in ('Y', 'C') THEN
8491: arp_util.debug('=======================================================');
8492: arp_util.debug(' Line .............=>'||to_char(i));
8493: arp_util.debug('p_customer_trx_id =>'||to_char(p_customer_trx_id));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8491: arp_util.debug('=======================================================');
8492: arp_util.debug(' Line .............=>'||to_char(i));
8493: arp_util.debug('p_customer_trx_id =>'||to_char(p_customer_trx_id));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8492: arp_util.debug(' Line .............=>'||to_char(i));
8493: arp_util.debug('p_customer_trx_id =>'||to_char(p_customer_trx_id));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8493: arp_util.debug('p_customer_trx_id =>'||to_char(p_customer_trx_id));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8494: arp_util.debug('p_customer_trx_line_id =>'||to_char(p_llca_trx_lines_tbl(i).customer_trx_line_id));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8495: arp_util.debug('p_line_number =>'||to_char(p_llca_trx_lines_tbl(i).line_number));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8503: arp_util.debug('p_tax_discount =>'||to_char(p_llca_trx_lines_tbl(i).tax_discount));
8496: arp_util.debug('p_line_amount =>'||to_char(p_llca_trx_lines_tbl(i).line_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8503: arp_util.debug('p_tax_discount =>'||to_char(p_llca_trx_lines_tbl(i).tax_discount));
8504: -- arp_util.debug('p_freight_discount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8497: arp_util.debug('p_tax_amount =>'||to_char(p_llca_trx_lines_tbl(i).tax_amount));
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8503: arp_util.debug('p_tax_discount =>'||to_char(p_llca_trx_lines_tbl(i).tax_discount));
8504: -- arp_util.debug('p_freight_discount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8505: arp_util.debug('=======================================================');
8498: -- arp_util.debug('p_freight_amount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8503: arp_util.debug('p_tax_discount =>'||to_char(p_llca_trx_lines_tbl(i).tax_discount));
8504: -- arp_util.debug('p_freight_discount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8505: arp_util.debug('=======================================================');
8506: END IF;
8499: -- arp_util.debug('p_charges_amount =>'||to_char(p_llca_trx_lines_tbl(i).charges_amount));
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8503: arp_util.debug('p_tax_discount =>'||to_char(p_llca_trx_lines_tbl(i).tax_discount));
8504: -- arp_util.debug('p_freight_discount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8505: arp_util.debug('=======================================================');
8506: END IF;
8507: End Loop;
8500: arp_util.debug('p_amount_applied =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied));
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8503: arp_util.debug('p_tax_discount =>'||to_char(p_llca_trx_lines_tbl(i).tax_discount));
8504: -- arp_util.debug('p_freight_discount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8505: arp_util.debug('=======================================================');
8506: END IF;
8507: End Loop;
8508: End If;
8501: arp_util.debug('p_amount_applied_from =>'||to_char(p_llca_trx_lines_tbl(i).amount_applied_from));
8502: arp_util.debug('p_line_discount =>'||to_char(p_llca_trx_lines_tbl(i).line_discount));
8503: arp_util.debug('p_tax_discount =>'||to_char(p_llca_trx_lines_tbl(i).tax_discount));
8504: -- arp_util.debug('p_freight_discount =>'||to_char(p_llca_trx_lines_tbl(i).freight_amount));
8505: arp_util.debug('=======================================================');
8506: END IF;
8507: End Loop;
8508: End If;
8509: End If;
8507: End Loop;
8508: End If;
8509: End If;
8510: IF PG_DEBUG in ('Y', 'C') THEN
8511: arp_util.debug('Populate_llca_gt ()- ');
8512: END IF;
8513:
8514: EXCEPTION
8515: WHEN others THEN
8513:
8514: EXCEPTION
8515: WHEN others THEN
8516: IF PG_DEBUG in ('Y', 'C') THEN
8517: arp_util.debug('EXCEPTION: (pouplate_llca_gt)');
8518: END IF;
8519: p_return_status := FND_API.G_RET_STS_ERROR;
8520: raise;
8521: End populate_llca_gt;
8527: p_invalid_value IN VARCHAR2
8528: ) IS
8529: Begin
8530: IF PG_DEBUG in ('Y', 'C') THEN
8531: arp_util.debug('Populate_errors_gt ()+ ');
8532: END IF;
8533:
8534: Insert into ar_llca_trx_errors_gt
8535: ( customer_trx_id,
8544: p_invalid_value
8545: );
8546:
8547: IF PG_DEBUG in ('Y', 'C') THEN
8548: arp_util.debug('Populate_errors_gt ()- ');
8549: END IF;
8550:
8551: EXCEPTION
8552: WHEN others THEN
8550:
8551: EXCEPTION
8552: WHEN others THEN
8553: IF PG_DEBUG in ('Y', 'C') THEN
8554: arp_util.debug('EXCEPTION: (pouplate_errors_gt)');
8555: END IF;
8556: raise;
8557: End populate_errors_gt;
8558: