130: l_message_name varchar2(32);
131: BEGIN
132:
133: IF PG_DEBUG in ('Y', 'C') THEN
134: arp_util.debug('aapi_message()+' , G_MSG_HIGH);
135: END IF;
136:
137: FND_MESSAGE.SET_NAME (p_application_name, p_message_name);
138:
153:
154: FND_MSG_PUB.ADD ;
155:
156: IF PG_DEBUG in ('Y', 'C') THEN
157: arp_util.debug ('aapi_message()-' , G_MSG_HIGH);
158: END IF;
159:
160: RETURN;
161:
162: EXCEPTION
163:
164: WHEN OTHERS THEN
165: IF PG_DEBUG in ('Y', 'C') THEN
166: arp_util.debug('EXCEPTION: aapi_message()', G_MSG_UERROR);
167: END IF;
168: /*-----------------------------------------------+
169: | Set unexpected error message and status |
170: +-----------------------------------------------*/
210:
211:
212: BEGIN
213: IF PG_DEBUG in ('Y', 'C') THEN
214: arp_util.debug('Init_Context_Rec()+' , G_MSG_HIGH);
215: END IF;
216:
217:
218: /*---------------------------+
238:
239: p_return_status := FND_API.G_RET_STS_SUCCESS;
240:
241: IF PG_DEBUG in ('Y', 'C') THEN
242: arp_util.debug('Init_Context_Rec()-' , G_MSG_HIGH);
243: END IF;
244:
245: EXCEPTION
246: WHEN OTHERS THEN
244:
245: EXCEPTION
246: WHEN OTHERS THEN
247: IF PG_DEBUG in ('Y', 'C') THEN
248: arp_util.debug('EXCEPTION: Init_Context_Rec() ', G_MSG_UERROR);
249: END IF;
250:
251: FND_MSG_PUB.Add_Exc_Msg (
252: G_PKG_NAME,
303:
304: BEGIN
305:
306: IF PG_DEBUG in ('Y', 'C') THEN
307: arp_util.debug('Cache_Gl_Periods()+' , G_MSG_HIGH);
308: END IF;
309:
310: p_return_status := FND_API.G_RET_STS_SUCCESS;
311:
323: G_GLPERIOD_TBL(l_index) := l_temp_rec;
324: END LOOP;
325:
326: IF PG_DEBUG in ('Y', 'C') THEN
327: arp_util.debug ('Cache_Gl_Periods: ' || 'G_GLPERIOD_TBL count = '|| to_char(g_glperiod_tbl.count), G_MSG_HIGH);
328: arp_util.debug ('Cache_Gl_Periods()-' , G_MSG_HIGH);
329: END IF;
330:
331: RETURN;
324: END LOOP;
325:
326: IF PG_DEBUG in ('Y', 'C') THEN
327: arp_util.debug ('Cache_Gl_Periods: ' || 'G_GLPERIOD_TBL count = '|| to_char(g_glperiod_tbl.count), G_MSG_HIGH);
328: arp_util.debug ('Cache_Gl_Periods()-' , G_MSG_HIGH);
329: END IF;
330:
331: RETURN;
332:
332:
333: EXCEPTION
334: WHEN NO_DATA_FOUND THEN
335: IF PG_DEBUG in ('Y', 'C') THEN
336: arp_util.debug('Cache_Gl_Periods: ' || 'No Open/Future Enterable GL periods exist',G_MSG_HIGH);
337: END IF;
338: /*-----------------------------------------------+
339: | Set the message |
340: +-----------------------------------------------*/
347: p_return_status := FND_API.G_RET_STS_ERROR;
348: RETURN;
349: WHEN OTHERS THEN
350: IF PG_DEBUG in ('Y', 'C') THEN
351: arp_util.debug('EXCEPTION: Cache_Gl_Periods()', G_MSG_UERROR);
352: END IF;
353: /*-----------------------------------------------+
354: | Set unexpected error message and status |
355: +-----------------------------------------------*/
399:
400: BEGIN
401:
402: IF PG_DEBUG in ('Y', 'C') THEN
403: arp_util.debug('Cache_Approval_Type()+' , G_MSG_HIGH);
404: END IF;
405:
406: p_return_status := FND_API.G_RET_STS_SUCCESS;
407:
410: G_APPROVAL_TBL(l_index) := l_temp_rec;
411: END LOOP;
412:
413: IF PG_DEBUG in ('Y', 'C') THEN
414: arp_util.debug ('Cache_Approval_Type: ' || 'G_APPROVAL_TBL count = '|| to_char(G_APPROVAL_TBL.count), G_MSG_HIGH);
415: arp_util.debug ('Cache_Approval_Type()-' , G_MSG_HIGH);
416: END IF;
417:
418: RETURN;
411: END LOOP;
412:
413: IF PG_DEBUG in ('Y', 'C') THEN
414: arp_util.debug ('Cache_Approval_Type: ' || 'G_APPROVAL_TBL count = '|| to_char(G_APPROVAL_TBL.count), G_MSG_HIGH);
415: arp_util.debug ('Cache_Approval_Type()-' , G_MSG_HIGH);
416: END IF;
417:
418: RETURN;
419:
419:
420: EXCEPTION
421: WHEN NO_DATA_FOUND THEN
422: IF PG_DEBUG in ('Y', 'C') THEN
423: arp_util.debug('Cache_Approval_Type: ' || 'No Approval Codes exist ', G_MSG_HIGH);
424: END IF;
425: /*-----------------------------------------------+
426: | Set the message |
427: +-----------------------------------------------*/
433: RETURN;
434:
435: WHEN OTHERS THEN
436: IF PG_DEBUG in ('Y', 'C') THEN
437: arp_util.debug('EXCEPTION: Cache_Approval_Type()', G_MSG_UERROR);
438: END IF;
439: /*-----------------------------------------------+
440: | Set unexpected error message and status |
441: +-----------------------------------------------*/
485:
486: BEGIN
487:
488: IF PG_DEBUG in ('Y', 'C') THEN
489: arp_util.debug('Cache_Adjustment_Type()+' , G_MSG_HIGH);
490: END IF;
491:
492: p_return_status := FND_API.G_RET_STS_SUCCESS;
493:
496: G_ADJTYPE_TBL(l_index) := l_temp_rec;
497: END LOOP;
498:
499: IF PG_DEBUG in ('Y', 'C') THEN
500: arp_util.debug ('Cache_Adjustment_Type: ' || 'G_ADJTYPE_TBL count = '|| to_char(G_ADJTYPE_TBL.count), G_MSG_HIGH);
501: arp_util.debug ('Cache_Adjustment_Type()-' , G_MSG_HIGH);
502: END IF;
503:
504: RETURN;
497: END LOOP;
498:
499: IF PG_DEBUG in ('Y', 'C') THEN
500: arp_util.debug ('Cache_Adjustment_Type: ' || 'G_ADJTYPE_TBL count = '|| to_char(G_ADJTYPE_TBL.count), G_MSG_HIGH);
501: arp_util.debug ('Cache_Adjustment_Type()-' , G_MSG_HIGH);
502: END IF;
503:
504: RETURN;
505:
505:
506: EXCEPTION
507: WHEN NO_DATA_FOUND THEN
508: IF PG_DEBUG in ('Y', 'C') THEN
509: arp_util.debug('Cache_Adjustment_Type: ' || 'No Adjustment Type codes', G_MSG_HIGH);
510: END IF;
511: /*-----------------------------------------------+
512: | Set the message |
513: +-----------------------------------------------*/
519: RETURN;
520:
521: WHEN OTHERS THEN
522: IF PG_DEBUG in ('Y', 'C') THEN
523: arp_util.debug('EXCEPTION: Cache_Adjustment_Type()', G_MSG_UERROR);
524: END IF;
525: /*-----------------------------------------------+
526: | Set unexpected error message and status |
527: +-----------------------------------------------*/
571:
572: BEGIN
573:
574: IF PG_DEBUG in ('Y', 'C') THEN
575: arp_util.debug('Cache_Adjustment_Reason()+' , G_MSG_HIGH);
576: END IF;
577:
578: p_return_status := FND_API.G_RET_STS_SUCCESS;
579:
582: G_REASON_TBL(l_index) := l_temp_rec;
583: END LOOP;
584:
585: IF PG_DEBUG in ('Y', 'C') THEN
586: arp_util.debug ('Cache_Adjustment_Reason: ' || 'G_REASON_TBL count = '|| to_char(G_REASON_TBL.count), G_MSG_HIGH);
587: arp_util.debug ('Cache_Adjustment_Reason()-' , G_MSG_HIGH);
588: END IF;
589:
590: RETURN;
583: END LOOP;
584:
585: IF PG_DEBUG in ('Y', 'C') THEN
586: arp_util.debug ('Cache_Adjustment_Reason: ' || 'G_REASON_TBL count = '|| to_char(G_REASON_TBL.count), G_MSG_HIGH);
587: arp_util.debug ('Cache_Adjustment_Reason()-' , G_MSG_HIGH);
588: END IF;
589:
590: RETURN;
591:
591:
592: EXCEPTION
593: WHEN NO_DATA_FOUND THEN
594: IF PG_DEBUG in ('Y', 'C') THEN
595: arp_util.debug('Cache_Adjustment_Reason: ' || 'No Adjustment Reason codes', G_MSG_HIGH);
596: END IF;
597: /*-----------------------------------------------+
598: | Set the message |
599: +-----------------------------------------------*/
605: RETURN;
606:
607: WHEN OTHERS THEN
608: IF PG_DEBUG in ('Y', 'C') THEN
609: arp_util.debug('EXCEPTION: Cache_Adjustment_Reason()', G_MSG_UERROR);
610: END IF;
611: /*-----------------------------------------------+
612: | Set unexpected error message and status |
613: +-----------------------------------------------*/
662:
663: BEGIN
664:
665: IF PG_DEBUG in ('Y', 'C') THEN
666: arp_util.debug('Cache_Receivables_Trx()+' , G_MSG_HIGH);
667: END IF;
668:
669: p_return_status := FND_API.G_RET_STS_SUCCESS;
670:
673: G_RCVTRX_TBL(l_index) := l_temp_rec;
674: END LOOP;
675:
676: IF PG_DEBUG in ('Y', 'C') THEN
677: arp_util.debug ('Cache_Receivables_Trx: ' || 'G_RCVTRX_TBL count = '|| to_char(G_RCVTRX_TBL.count), G_MSG_HIGH);
678: arp_util.debug ('Cache_Receivables_Trx()-' , G_MSG_HIGH);
679: END IF;
680:
681: RETURN;
674: END LOOP;
675:
676: IF PG_DEBUG in ('Y', 'C') THEN
677: arp_util.debug ('Cache_Receivables_Trx: ' || 'G_RCVTRX_TBL count = '|| to_char(G_RCVTRX_TBL.count), G_MSG_HIGH);
678: arp_util.debug ('Cache_Receivables_Trx()-' , G_MSG_HIGH);
679: END IF;
680:
681: RETURN;
682:
682:
683: EXCEPTION
684: WHEN NO_DATA_FOUND THEN
685: IF PG_DEBUG in ('Y', 'C') THEN
686: arp_util.debug('Cache_Receivables_Trx: ' || 'No Adjustment Reason codes', G_MSG_HIGH);
687: END IF;
688: /*-----------------------------------------------+
689: | Set the message |
690: +-----------------------------------------------*/
696: RETURN;
697:
698: WHEN OTHERS THEN
699: IF PG_DEBUG in ('Y', 'C') THEN
700: arp_util.debug('EXCEPTION: Cache_Receivables_Trx()', G_MSG_UERROR);
701: END IF;
702: /*-----------------------------------------------+
703: | Set unexpected error message and status |
704: +-----------------------------------------------*/
748:
749: BEGIN
750:
751: IF PG_DEBUG in ('Y', 'C') THEN
752: arp_util.debug('Cache_Ussgl_Code()+' , G_MSG_HIGH);
753: END IF;
754:
755: p_return_status := FND_API.G_RET_STS_SUCCESS;
756:
768: G_USSGL_TBL(l_index) := l_temp_rec;
769: END LOOP;
770:
771: IF PG_DEBUG in ('Y', 'C') THEN
772: arp_util.debug ('Cache_Ussgl_Code: ' || 'G_USSGL_TBL count = '|| to_char(G_USSGL_TBL.count), G_MSG_HIGH);
773: arp_util.debug ('Cache_Ussgl_Code()-' , G_MSG_HIGH);
774: END IF;
775:
776: RETURN;
769: END LOOP;
770:
771: IF PG_DEBUG in ('Y', 'C') THEN
772: arp_util.debug ('Cache_Ussgl_Code: ' || 'G_USSGL_TBL count = '|| to_char(G_USSGL_TBL.count), G_MSG_HIGH);
773: arp_util.debug ('Cache_Ussgl_Code()-' , G_MSG_HIGH);
774: END IF;
775:
776: RETURN;
777:
777:
778: EXCEPTION
779: WHEN NO_DATA_FOUND THEN
780: IF PG_DEBUG in ('Y', 'C') THEN
781: arp_util.debug('Cache_Ussgl_Code: ' || 'No USSGL codes', G_MSG_HIGH);
782: END IF;
783: /*-----------------------------------------------+
784: | Set the message |
785: +-----------------------------------------------*/
791: RETURN;
792:
793: WHEN OTHERS THEN
794: IF PG_DEBUG in ('Y', 'C') THEN
795: arp_util.debug('EXCEPTION: Cache_Ussgl_Code()', G_MSG_UERROR);
796: END IF;
797: /*-----------------------------------------------+
798: | Set unexpected error message and status |
799: +-----------------------------------------------*/
850:
851: BEGIN
852:
853: IF PG_DEBUG in ('Y', 'C') THEN
854: arp_util.debug('Cache_Code_Combination()+' , G_MSG_HIGH);
855: END IF;
856:
857: p_return_status := FND_API.G_RET_STS_SUCCESS;
858:
865: G_CCID_TBL(l_ccid_rec.code_combination_id).dummy := FND_API.G_TRUE;
866: END LOOP;
867:
868: IF PG_DEBUG in ('Y', 'C') THEN
869: arp_util.debug ('Cache_Code_Combination: ' || 'G_CCID_TBL count = '|| to_char(G_CCID_TBL.count), G_MSG_HIGH);
870: arp_util.debug ('Cache_Code_Combination()-' , G_MSG_HIGH);
871: END IF;
872:
873: RETURN;
866: END LOOP;
867:
868: IF PG_DEBUG in ('Y', 'C') THEN
869: arp_util.debug ('Cache_Code_Combination: ' || 'G_CCID_TBL count = '|| to_char(G_CCID_TBL.count), G_MSG_HIGH);
870: arp_util.debug ('Cache_Code_Combination()-' , G_MSG_HIGH);
871: END IF;
872:
873: RETURN;
874:
874:
875: EXCEPTION
876: WHEN NO_DATA_FOUND THEN
877: IF PG_DEBUG in ('Y', 'C') THEN
878: arp_util.debug('Cache_Code_Combination: ' || 'No USSGL codes', G_MSG_HIGH);
879: END IF;
880: /*-----------------------------------------------+
881: | Set the message |
882: +-----------------------------------------------*/
888: RETURN;
889:
890: WHEN OTHERS THEN
891: IF PG_DEBUG in ('Y', 'C') THEN
892: arp_util.debug('EXCEPTION: Cache_Code_Combination()', G_MSG_UERROR);
893: END IF;
894: /*-----------------------------------------------+
895: | Set unexpected error message and status |
896: +-----------------------------------------------*/
952:
953: BEGIN
954:
955: IF PG_DEBUG in ('Y', 'C') THEN
956: arp_util.debug('Cache_Details()+' , G_MSG_HIGH);
957: END IF;
958:
959: /*--------------------------------------------------+
960: | Check if caching is needed. Caching is needed if|
963:
964: l_tobe_cached_flag := FND_API.G_FALSE ;
965:
966: IF PG_DEBUG in ('Y', 'C') THEN
967: arp_util.debug ('Cache_Details: ' || 'G_Caching done = ' || G_caching_done, G_MSG_HIGH);
968: arp_util.debug ('Cache_Details: ' || 'G_Cache_date = ' || to_char(G_cache_date,'DD-MON-YY'),
969: G_MSG_HIGH);
970: arp_util.debug ('Cache_Details: ' || 'Sysdate = ' || to_char(sysdate,'DD-MON-YY'),G_MSG_HIGH);
971: END IF;
964: l_tobe_cached_flag := FND_API.G_FALSE ;
965:
966: IF PG_DEBUG in ('Y', 'C') THEN
967: arp_util.debug ('Cache_Details: ' || 'G_Caching done = ' || G_caching_done, G_MSG_HIGH);
968: arp_util.debug ('Cache_Details: ' || 'G_Cache_date = ' || to_char(G_cache_date,'DD-MON-YY'),
969: G_MSG_HIGH);
970: arp_util.debug ('Cache_Details: ' || 'Sysdate = ' || to_char(sysdate,'DD-MON-YY'),G_MSG_HIGH);
971: END IF;
972:
966: IF PG_DEBUG in ('Y', 'C') THEN
967: arp_util.debug ('Cache_Details: ' || 'G_Caching done = ' || G_caching_done, G_MSG_HIGH);
968: arp_util.debug ('Cache_Details: ' || 'G_Cache_date = ' || to_char(G_cache_date,'DD-MON-YY'),
969: G_MSG_HIGH);
970: arp_util.debug ('Cache_Details: ' || 'Sysdate = ' || to_char(sysdate,'DD-MON-YY'),G_MSG_HIGH);
971: END IF;
972:
973: IF ( G_caching_done = FND_API.G_FALSE )
974: THEN
983: END IF;
984:
985: l_tobe_cached_flag := FND_API.G_TRUE;
986: IF PG_DEBUG in ('Y', 'C') THEN
987: arp_util.debug ('Cache_Details: ' || 'Caching Flag : '|| l_tobe_cached_flag,G_MSG_HIGH);
988: END IF;
989:
990: IF ( l_tobe_cached_flag = FND_API.G_FALSE )
991: THEN
1084:
1085: G_caching_done := FND_API.G_TRUE ;
1086:
1087: IF PG_DEBUG in ('Y', 'C') THEN
1088: arp_util.debug('Cache_Details ()-' , G_MSG_HIGH);
1089: END IF;
1090:
1091: EXCEPTION
1092: WHEN OTHERS THEN
1090:
1091: EXCEPTION
1092: WHEN OTHERS THEN
1093: IF PG_DEBUG in ('Y', 'C') THEN
1094: arp_util.debug('EXCEPTION: Cache_Details() ', G_MSG_UERROR);
1095: END IF;
1096:
1097: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,'Cache_Details');
1098: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1111: | |
1112: | SCOPE - PRIVATE |
1113: | |
1114: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1115: | arp_util.disable_debug |
1116: | arp_util.enable_debug |
1117: | fnd_api.g_exc_unexpected_error |
1118: | fnd_api.g_ret_sts_error |
1119: | fnd_api.g_ret_sts_error |
1112: | SCOPE - PRIVATE |
1113: | |
1114: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1115: | arp_util.disable_debug |
1116: | arp_util.enable_debug |
1117: | fnd_api.g_exc_unexpected_error |
1118: | fnd_api.g_ret_sts_error |
1119: | fnd_api.g_ret_sts_error |
1120: | fnd_api.g_ret_sts_success |
1151:
1152: BEGIN
1153:
1154: IF PG_DEBUG in ('Y', 'C') THEN
1155: arp_util.debug('Within_approval_limits()+', G_MSG_MEDIUM);
1156: END IF;
1157:
1158: /*------------------------------------------+
1159: | Initialize the return status to SUCCESS |
1181: EXCEPTION
1182: WHEN NO_DATA_FOUND THEN
1183:
1184: IF PG_DEBUG in ('Y', 'C') THEN
1185: arp_util.debug ('Within_approval_limits: ' ||
1186: 'User does not have approval limits for currency ' ||
1187: p_inv_curr_code, G_MSG_HIGH
1188: );
1189: END IF;
1197:
1198: WHEN OTHERS THEN
1199:
1200: IF PG_DEBUG in ('Y', 'C') THEN
1201: arp_util.debug ('EXCEPTION: Within_approval_limits',G_MSG_UERROR);
1202: END IF;
1203:
1204: /*-------------------------------------------------+
1205: | Set unexpected error message, status and return |
1223: IF (( p_adj_amount > l_approval_amount_to ) OR
1224: ( p_adj_amount < l_approval_amount_from ))
1225: THEN
1226: IF PG_DEBUG in ('Y', 'C') THEN
1227: arp_util.debug('Within_approval_limits: ' || 'User ID: ' || l_user_id ||
1228: ' Amount: ' || p_adj_amount ||
1229: ' From: ' || l_approval_amount_from ||
1230: ' To: ' || l_approval_amount_to ||
1231: ' exceeds approval limit', G_MSG_HIGH );
1244:
1245: END IF;
1246:
1247: IF PG_DEBUG in ('Y', 'C') THEN
1248: arp_util.debug('Within_approval_limits()-', G_MSG_HIGH);
1249: END IF;
1250: RETURN ;
1251:
1252: EXCEPTION
1252: EXCEPTION
1253: WHEN OTHERS THEN
1254:
1255: IF PG_DEBUG in ('Y', 'C') THEN
1256: arp_util.debug('EXCEPTION: Within_approval_limits()', G_MSG_UERROR);
1257: END IF;
1258: /*-----------------------------------------------+
1259: | Set unexpected error message and status |
1260: +-----------------------------------------------*/
1276: | |
1277: | SCOPE - PUBLIC |
1278: | |
1279: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1280: | arp_util.disable_debug |
1281: | arp_util.enable_debug |
1282: | fnd_api.g_exc_unexpected_error |
1283: | fnd_api.g_ret_sts_error |
1284: | fnd_api.g_ret_sts_error |
1277: | SCOPE - PUBLIC |
1278: | |
1279: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1280: | arp_util.disable_debug |
1281: | arp_util.enable_debug |
1282: | fnd_api.g_exc_unexpected_error |
1283: | fnd_api.g_ret_sts_error |
1284: | fnd_api.g_ret_sts_error |
1285: | fnd_api.g_ret_sts_success |
1311:
1312: BEGIN
1313:
1314: IF PG_DEBUG in ('Y', 'C') THEN
1315: arp_util.debug('Validate_Type()+', G_MSG_HIGH);
1316: END IF;
1317:
1318: /*------------------------------------------+
1319: | Initialize the return status to ERROR |
1346:
1347: END IF;
1348:
1349: IF PG_DEBUG in ('Y', 'C') THEN
1350: arp_util.debug('Validate_Type()-', G_MSG_MEDIUM);
1351: END IF;
1352:
1353: RETURN ;
1354:
1355: EXCEPTION
1356: WHEN OTHERS THEN
1357:
1358: IF PG_DEBUG in ('Y', 'C') THEN
1359: arp_util.debug('EXCEPTION: Validate_Type()', G_MSG_UERROR );
1360: arp_util.debug('Validate_Type for type = ' ||p_adj_rec.type,G_MSG_HIGH);
1361: END IF;
1362:
1363: /*-----------------------------------------------+
1356: WHEN OTHERS THEN
1357:
1358: IF PG_DEBUG in ('Y', 'C') THEN
1359: arp_util.debug('EXCEPTION: Validate_Type()', G_MSG_UERROR );
1360: arp_util.debug('Validate_Type for type = ' ||p_adj_rec.type,G_MSG_HIGH);
1361: END IF;
1362:
1363: /*-----------------------------------------------+
1364: | Set unexpected error message and status |
1421:
1422: BEGIN
1423:
1424: IF PG_DEBUG in ('Y', 'C') THEN
1425: arp_util.debug('Validate_Payschd()+', G_MSG_MEDIUM);
1426: END IF;
1427:
1428: /*------------------------------------------+
1429: | Initialize the return status to SUCCESS |
1570:
1571: EXCEPTION
1572: WHEN OTHERS THEN
1573: IF PG_DEBUG in ('Y', 'C') THEN
1574: arp_util.debug('Validate_Payschd: ' ||
1575: 'EXCEPTION: Validate_Payschd() for CustTrxLineId = '||
1576: to_char(p_adj_rec.customer_trx_line_id), G_MSG_HIGH);
1577: END IF;
1578:
1625:
1626: END IF;
1627:
1628: IF PG_DEBUG in ('Y', 'C') THEN
1629: arp_util.debug('Validate_Payschd()-', G_MSG_MEDIUM);
1630: END IF;
1631:
1632: RETURN ;
1633:
1636:
1637: WHEN OTHERS THEN
1638:
1639: IF PG_DEBUG in ('Y', 'C') THEN
1640: arp_util.debug('EXCEPTION: Validate_Payschd() ', G_MSG_UERROR);
1641: arp_util.debug('Validate_Payschd: ' || 'Payment Schedule = ' ||
1642: p_adj_rec.payment_schedule_id, G_MSG_HIGH);
1643: END IF;
1644: /*-----------------------------------------------+
1637: WHEN OTHERS THEN
1638:
1639: IF PG_DEBUG in ('Y', 'C') THEN
1640: arp_util.debug('EXCEPTION: Validate_Payschd() ', G_MSG_UERROR);
1641: arp_util.debug('Validate_Payschd: ' || 'Payment Schedule = ' ||
1642: p_adj_rec.payment_schedule_id, G_MSG_HIGH);
1643: END IF;
1644: /*-----------------------------------------------+
1645: | Set unexpected error message and status |
1663: | |
1664: | SCOPE - PUBLIC |
1665: | |
1666: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1667: | arp_util.disable_debug |
1668: | arp_util.enable_debug |
1669: | fnd_api.g_exc_unexpected_error |
1670: | fnd_api.g_ret_sts_error |
1671: | fnd_api.g_ret_sts_error |
1664: | SCOPE - PUBLIC |
1665: | |
1666: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1667: | arp_util.disable_debug |
1668: | arp_util.enable_debug |
1669: | fnd_api.g_exc_unexpected_error |
1670: | fnd_api.g_ret_sts_error |
1671: | fnd_api.g_ret_sts_error |
1672: | fnd_api.g_ret_sts_success |
1705: l_round_amount Number;
1706: BEGIN
1707:
1708: IF PG_DEBUG in ('Y', 'C') THEN
1709: arp_util.debug('Validate_amount()+', G_MSG_MEDIUM);
1710: END IF;
1711:
1712: /*------------------------------------------+
1713: | Initialize the return status to SUCCESS |
1720: where customer_trx_id=p_adj_rec.customer_trx_id;
1721:
1722: l_amount := p_adj_rec.amount;
1723:
1724: l_round_amount := arp_util.currround(l_amount,l_currency_code);
1725:
1726: IF l_amount <> l_round_amount then
1727: --Raise Validateion
1728: aapi_message(
1873:
1874: END IF;
1875:
1876: IF PG_DEBUG in ('Y', 'C') THEN
1877: arp_util.debug('Validate_Amount()-', G_MSG_MEDIUM);
1878: END IF;
1879:
1880: RETURN ;
1881:
1882: EXCEPTION
1883: WHEN OTHERS THEN
1884:
1885: IF PG_DEBUG in ('Y', 'C') THEN
1886: arp_util.debug('EXCEPTION: Validate_Amount() ', G_MSG_UERROR);
1887: END IF;
1888:
1889: /*-----------------------------------------------+
1890: | Set unexpected error message and status |
1907: | |
1908: | SCOPE - PUBLIC |
1909: | |
1910: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1911: | arp_util.disable_debug |
1912: | arp_util.enable_debug |
1913: | fnd_api.g_exc_unexpected_error |
1914: | fnd_api.g_ret_sts_error |
1915: | fnd_api.g_ret_sts_error |
1908: | SCOPE - PUBLIC |
1909: | |
1910: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
1911: | arp_util.disable_debug |
1912: | arp_util.enable_debug |
1913: | fnd_api.g_exc_unexpected_error |
1914: | fnd_api.g_ret_sts_error |
1915: | fnd_api.g_ret_sts_error |
1916: | fnd_api.g_ret_sts_success |
1945: l_found BOOLEAN;
1946: BEGIN
1947:
1948: IF PG_DEBUG in ('Y', 'C') THEN
1949: arp_util.debug('Validate_Rcvtrxccid()+', G_MSG_MEDIUM);
1950: END IF;
1951:
1952: /*------------------------------------------+
1953: | Initialize the return status to ERROR |
2105:
2106: p_return_status := FND_API.G_RET_STS_SUCCESS ;
2107:
2108: IF PG_DEBUG in ('Y', 'C') THEN
2109: arp_util.debug('Validate_Rcvtrxccid()-', G_MSG_MEDIUM);
2110: END IF;
2111:
2112: RETURN ;
2113:
2114: EXCEPTION
2115: WHEN OTHERS THEN
2116:
2117: IF PG_DEBUG in ('Y', 'C') THEN
2118: arp_util.debug('EXCEPTION: Validate_Rcvtrxccid', G_MSG_UERROR);
2119: END IF;
2120: /*-----------------------------------------------+
2121: | Set unexpected error message and status |
2122: +-----------------------------------------------*/
2167:
2168: BEGIN
2169:
2170: IF PG_DEBUG in ('Y', 'C') THEN
2171: arp_util.debug('Validate_dates()+', G_MSG_MEDIUM);
2172: END IF;
2173:
2174: /*------------------------------------------+
2175: | Initialize the return status to ERROR |
2329: ------------------------------------------------------------ */
2330: p_return_status := FND_API.G_RET_STS_SUCCESS;
2331:
2332: IF PG_DEBUG in ('Y', 'C') THEN
2333: arp_util.debug('Validate_dates()-', G_MSG_MEDIUM);
2334: END IF;
2335:
2336: RETURN ;
2337:
2338: EXCEPTION
2339: WHEN OTHERS THEN
2340:
2341: IF PG_DEBUG in ('Y', 'C') THEN
2342: arp_util.debug('EXCEPTION: Validate_dates ', G_MSG_UERROR);
2343: END IF;
2344: /*-----------------------------------------------+
2345: | Set unexpected error message and status |
2346: +-----------------------------------------------*/
2363: | |
2364: | SCOPE - PRIVATE |
2365: | |
2366: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2367: | arp_util.disable_debug |
2368: | arp_util.enable_debug |
2369: | fnd_api.g_exc_unexpected_error |
2370: | fnd_api.g_ret_sts_error |
2371: | fnd_api.g_ret_sts_error |
2364: | SCOPE - PRIVATE |
2365: | |
2366: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2367: | arp_util.disable_debug |
2368: | arp_util.enable_debug |
2369: | fnd_api.g_exc_unexpected_error |
2370: | fnd_api.g_ret_sts_error |
2371: | fnd_api.g_ret_sts_error |
2372: | fnd_api.g_ret_sts_success |
2401:
2402: BEGIN
2403:
2404: IF PG_DEBUG in ('Y', 'C') THEN
2405: arp_util.debug('Validate_doc_seq()+', G_MSG_MEDIUM);
2406: END IF;
2407:
2408: /*------------------------------------------+
2409: | Initialize the return status to SUCCESS |
2511: RETURN ;
2512: END IF;
2513:
2514: IF PG_DEBUG in ('Y', 'C') THEN
2515: arp_util.debug('Validate_doc_seq()-', G_MSG_MEDIUM);
2516: END IF;
2517:
2518: RETURN ;
2519:
2540:
2541: WHEN OTHERS THEN
2542:
2543: IF PG_DEBUG in ('Y', 'C') THEN
2544: arp_util.debug('EXCEPTION: Validate_doc_seq ', G_MSG_UERROR);
2545: END IF;
2546: /*-----------------------------------------------+
2547: | Set unexpected error message and status |
2548: +-----------------------------------------------*/
2563: | |
2564: | SCOPE - PUBLIC |
2565: | |
2566: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2567: | arp_util.disable_debug |
2568: | arp_util.enable_debug |
2569: | fnd_api.g_exc_unexpected_error |
2570: | fnd_api.g_ret_sts_error |
2571: | fnd_api.g_ret_sts_error |
2564: | SCOPE - PUBLIC |
2565: | |
2566: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2567: | arp_util.disable_debug |
2568: | arp_util.enable_debug |
2569: | fnd_api.g_exc_unexpected_error |
2570: | fnd_api.g_ret_sts_error |
2571: | fnd_api.g_ret_sts_error |
2572: | fnd_api.g_ret_sts_success |
2599: l_found BOOLEAN;
2600: BEGIN
2601:
2602: IF PG_DEBUG in ('Y', 'C') THEN
2603: arp_util.debug('Validate_Reason_code()+', G_MSG_MEDIUM);
2604: END IF;
2605:
2606: /*------------------------------------------+
2607: | Initialize the return status to ERROR |
2648:
2649: p_return_status := FND_API.G_RET_STS_SUCCESS ;
2650:
2651: IF PG_DEBUG in ('Y', 'C') THEN
2652: arp_util.debug('Validate_Reason_Code()-', G_MSG_MEDIUM);
2653: END IF;
2654:
2655: RETURN ;
2656:
2657: EXCEPTION
2658: WHEN OTHERS THEN
2659:
2660: IF PG_DEBUG in ('Y', 'C') THEN
2661: arp_util.debug('EXCEPTION: Validate_Reason_code ', G_MSG_UERROR);
2662: END IF;
2663: /*-----------------------------------------------+
2664: | Set unexpected error message and status |
2665: +-----------------------------------------------*/
2707:
2708: BEGIN
2709:
2710: IF PG_DEBUG in ('Y', 'C') THEN
2711: arp_util.debug('Validate_Desc_Flexfield()+', G_MSG_MEDIUM);
2712: END IF;
2713:
2714: /*------------------------------------------+
2715: | Initialize the return status to SUCCESS |
2734: RETURN;
2735:
2736: WHEN OTHERS THEN
2737: IF PG_DEBUG in ('Y', 'C') THEN
2738: arp_util.debug('EXCEPTION: Validate_Desc_Flexfield', G_MSG_UERROR);
2739: END IF;
2740: /*-----------------------------------------------+
2741: | Set unexpected error message and status |
2742: +-----------------------------------------------*/
2778: RETURN ;
2779: END IF;
2780:
2781: IF PG_DEBUG in ('Y', 'C') THEN
2782: arp_util.debug('Validate_Desc_Flexfield()-', G_MSG_MEDIUM);
2783: END IF;
2784:
2785: EXCEPTION
2786: WHEN OTHERS THEN
2784:
2785: EXCEPTION
2786: WHEN OTHERS THEN
2787: IF PG_DEBUG in ('Y', 'C') THEN
2788: arp_util.debug('EXCEPTION: Validate_Desc_Flexfield', G_MSG_UERROR);
2789: END IF;
2790: /*-----------------------------------------------+
2791: | Set unexpected error message and status |
2792: +-----------------------------------------------*/
2807: | |
2808: | SCOPE - PRIVATE |
2809: | |
2810: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2811: | arp_util.disable_debug |
2812: | arp_util.enable_debug |
2813: | fnd_api.g_exc_unexpected_error |
2814: | fnd_api.g_ret_sts_error |
2815: | fnd_api.g_ret_sts_error |
2808: | SCOPE - PRIVATE |
2809: | |
2810: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2811: | arp_util.disable_debug |
2812: | arp_util.enable_debug |
2813: | fnd_api.g_exc_unexpected_error |
2814: | fnd_api.g_ret_sts_error |
2815: | fnd_api.g_ret_sts_error |
2816: | fnd_api.g_ret_sts_success |
2839:
2840: BEGIN
2841:
2842: IF PG_DEBUG in ('Y', 'C') THEN
2843: arp_util.debug('Validate_Created_From()+', G_MSG_MEDIUM);
2844: END IF;
2845:
2846: /*------------------------------------------+
2847: | Initialize the return status to SUCCESS |
2864: END IF;
2865:
2866:
2867: IF PG_DEBUG in ('Y', 'C') THEN
2868: arp_util.debug('Validate_Created_From ()-', G_MSG_MEDIUM);
2869: END IF;
2870:
2871: RETURN ;
2872:
2873: EXCEPTION
2874: WHEN OTHERS THEN
2875:
2876: IF PG_DEBUG in ('Y', 'C') THEN
2877: arp_util.debug('EXCEPTION: Validate_Created_From()', G_MSG_UERROR);
2878: END IF;
2879: /*-----------------------------------------------+
2880: | Set unexpected error message and status |
2881: +-----------------------------------------------*/
2897: | |
2898: | SCOPE - PRIVATE |
2899: | |
2900: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2901: | arp_util.disable_debug |
2902: | arp_util.enable_debug |
2903: | fnd_api.g_exc_unexpected_error |
2904: | fnd_api.g_ret_sts_error |
2905: | fnd_api.g_ret_sts_error |
2898: | SCOPE - PRIVATE |
2899: | |
2900: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
2901: | arp_util.disable_debug |
2902: | arp_util.enable_debug |
2903: | fnd_api.g_exc_unexpected_error |
2904: | fnd_api.g_ret_sts_error |
2905: | fnd_api.g_ret_sts_error |
2906: | fnd_api.g_ret_sts_success |
2931:
2932: BEGIN
2933:
2934: IF PG_DEBUG in ('Y', 'C') THEN
2935: arp_util.debug('Validate_Ussgl_code()+', G_MSG_MEDIUM);
2936: END IF;
2937:
2938: /*------------------------------------------+
2939: | Initialize the return status to ERROR |
2997: END IF ;
2998: END IF ;
2999:
3000: IF PG_DEBUG in ('Y', 'C') THEN
3001: arp_util.debug('Validate_Ussgl_Code()-', G_MSG_MEDIUM);
3002: END IF;
3003:
3004: RETURN ;
3005:
3006: EXCEPTION
3007: WHEN OTHERS THEN
3008:
3009: IF PG_DEBUG in ('Y', 'C') THEN
3010: arp_util.debug('EXCEPTION: Validate_Ussgl_code ', G_MSG_UERROR);
3011: END IF;
3012: /*-----------------------------------------------+
3013: | Set unexpected error message and status |
3014: +-----------------------------------------------*/
3029: | |
3030: | SCOPE - PUBLIC |
3031: | |
3032: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
3033: | arp_util.disable_debug |
3034: | arp_util.enable_debug |
3035: | fnd_api.g_exc_unexpected_error |
3036: | fnd_api.g_ret_sts_error |
3037: | fnd_api.g_ret_sts_error |
3030: | SCOPE - PUBLIC |
3031: | |
3032: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
3033: | arp_util.disable_debug |
3034: | arp_util.enable_debug |
3035: | fnd_api.g_exc_unexpected_error |
3036: | fnd_api.g_ret_sts_error |
3037: | fnd_api.g_ret_sts_error |
3038: | fnd_api.g_ret_sts_success |
3065:
3066: BEGIN
3067:
3068: IF PG_DEBUG in ('Y', 'C') THEN
3069: arp_util.debug('Validate_Associated_Receipt()+', G_MSG_MEDIUM);
3070: END IF;
3071:
3072: /*------------------------------------------+
3073: | Initialize the return status to SUCCESS |
3106:
3107: END IF ;
3108:
3109: IF PG_DEBUG in ('Y', 'C') THEN
3110: arp_util.debug('Validate_Associated_Receipt()-', G_MSG_MEDIUM);
3111: END IF;
3112:
3113: RETURN ;
3114:
3115: EXCEPTION
3116: WHEN OTHERS THEN
3117:
3118: IF PG_DEBUG in ('Y', 'C') THEN
3119: arp_util.debug('EXCEPTION: Validate_Associated_Receipt', G_MSG_UERROR);
3120: arp_util.debug('EXCEPTION: Validate_Associated_Receipt for Receipt Id '
3121: || p_adj_rec.associated_cash_receipt_id, G_MSG_HIGH );
3122: END IF;
3123: /*-----------------------------------------------+
3116: WHEN OTHERS THEN
3117:
3118: IF PG_DEBUG in ('Y', 'C') THEN
3119: arp_util.debug('EXCEPTION: Validate_Associated_Receipt', G_MSG_UERROR);
3120: arp_util.debug('EXCEPTION: Validate_Associated_Receipt for Receipt Id '
3121: || p_adj_rec.associated_cash_receipt_id, G_MSG_HIGH );
3122: END IF;
3123: /*-----------------------------------------------+
3124: | Set unexpected error message and status |