299:
300: EXCEPTION
301: WHEN OTHERS THEN
302: IF (SQLCODE <> -20001) THEN
303: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
305: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
306: FND_MESSAGE.SET_TOKEN('PARAMETERS',
307: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
300: EXCEPTION
301: WHEN OTHERS THEN
302: IF (SQLCODE <> -20001) THEN
303: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
305: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
306: FND_MESSAGE.SET_TOKEN('PARAMETERS',
307: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
308: ' P_Error_Code = '||P_Error_Code||
301: WHEN OTHERS THEN
302: IF (SQLCODE <> -20001) THEN
303: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
305: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
306: FND_MESSAGE.SET_TOKEN('PARAMETERS',
307: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
308: ' P_Error_Code = '||P_Error_Code||
309: ' P_Calling_Sequence = '||P_Calling_Sequence);
302: IF (SQLCODE <> -20001) THEN
303: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
305: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
306: FND_MESSAGE.SET_TOKEN('PARAMETERS',
307: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
308: ' P_Error_Code = '||P_Error_Code||
309: ' P_Calling_Sequence = '||P_Calling_Sequence);
310: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
306: FND_MESSAGE.SET_TOKEN('PARAMETERS',
307: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
308: ' P_Error_Code = '||P_Error_Code||
309: ' P_Calling_Sequence = '||P_Calling_Sequence);
310: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
311: END IF;
312:
313: APP_EXCEPTION.RAISE_EXCEPTION;
314:
466:
467: EXCEPTION
468: WHEN OTHERS THEN
469: IF (SQLCODE <> -20001) THEN
470: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
471: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
472: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
473: FND_MESSAGE.SET_TOKEN('PARAMETERS',
474: ' P_Event_Class_Code = '||P_Event_Class_Code||
467: EXCEPTION
468: WHEN OTHERS THEN
469: IF (SQLCODE <> -20001) THEN
470: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
471: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
472: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
473: FND_MESSAGE.SET_TOKEN('PARAMETERS',
474: ' P_Event_Class_Code = '||P_Event_Class_Code||
475: ' P_Calling_Mode ='||P_Calling_Mode||
468: WHEN OTHERS THEN
469: IF (SQLCODE <> -20001) THEN
470: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
471: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
472: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
473: FND_MESSAGE.SET_TOKEN('PARAMETERS',
474: ' P_Event_Class_Code = '||P_Event_Class_Code||
475: ' P_Calling_Mode ='||P_Calling_Mode||
476: ' P_eTax_Already_called_flag ='||P_eTax_Already_called_flag||
469: IF (SQLCODE <> -20001) THEN
470: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
471: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
472: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
473: FND_MESSAGE.SET_TOKEN('PARAMETERS',
474: ' P_Event_Class_Code = '||P_Event_Class_Code||
475: ' P_Calling_Mode ='||P_Calling_Mode||
476: ' P_eTax_Already_called_flag ='||P_eTax_Already_called_flag||
477: ' P_Error_Code = '||P_Error_Code||
475: ' P_Calling_Mode ='||P_Calling_Mode||
476: ' P_eTax_Already_called_flag ='||P_eTax_Already_called_flag||
477: ' P_Error_Code = '||P_Error_Code||
478: ' P_Calling_Sequence = '||P_Calling_Sequence);
479: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
480: END IF;
481:
482: APP_EXCEPTION.RAISE_EXCEPTION;
483:
584:
585: EXCEPTION
586: WHEN OTHERS THEN
587: IF (SQLCODE <> -20001) THEN
588: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
589: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
590: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
591: FND_MESSAGE.SET_TOKEN('PARAMETERS',
592: ' P_Corrected_Invoice_Id = '||P_Corrected_Invoice_Id||
585: EXCEPTION
586: WHEN OTHERS THEN
587: IF (SQLCODE <> -20001) THEN
588: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
589: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
590: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
591: FND_MESSAGE.SET_TOKEN('PARAMETERS',
592: ' P_Corrected_Invoice_Id = '||P_Corrected_Invoice_Id||
593: ' P_Corrected_Line_Number = '||P_Corrected_Line_Number||
586: WHEN OTHERS THEN
587: IF (SQLCODE <> -20001) THEN
588: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
589: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
590: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
591: FND_MESSAGE.SET_TOKEN('PARAMETERS',
592: ' P_Corrected_Invoice_Id = '||P_Corrected_Invoice_Id||
593: ' P_Corrected_Line_Number = '||P_Corrected_Line_Number||
594: ' P_Error_Code = '||P_Error_Code||
587: IF (SQLCODE <> -20001) THEN
588: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
589: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
590: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
591: FND_MESSAGE.SET_TOKEN('PARAMETERS',
592: ' P_Corrected_Invoice_Id = '||P_Corrected_Invoice_Id||
593: ' P_Corrected_Line_Number = '||P_Corrected_Line_Number||
594: ' P_Error_Code = '||P_Error_Code||
595: ' P_Calling_Sequence = '||P_Calling_Sequence);
592: ' P_Corrected_Invoice_Id = '||P_Corrected_Invoice_Id||
593: ' P_Corrected_Line_Number = '||P_Corrected_Line_Number||
594: ' P_Error_Code = '||P_Error_Code||
595: ' P_Calling_Sequence = '||P_Calling_Sequence);
596: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
597: END IF;
598:
599: --bug10140354
600: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
705:
706: EXCEPTION
707: WHEN OTHERS THEN
708: IF (SQLCODE <> -20001) THEN
709: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
710: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
711: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
712: FND_MESSAGE.SET_TOKEN('PARAMETERS',
713: ' P_Prepay_Invoice_Id = '||P_Prepay_Invoice_Id||
706: EXCEPTION
707: WHEN OTHERS THEN
708: IF (SQLCODE <> -20001) THEN
709: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
710: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
711: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
712: FND_MESSAGE.SET_TOKEN('PARAMETERS',
713: ' P_Prepay_Invoice_Id = '||P_Prepay_Invoice_Id||
714: ' P_Prepay_Line_Number = '||P_Prepay_Line_Number||
707: WHEN OTHERS THEN
708: IF (SQLCODE <> -20001) THEN
709: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
710: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
711: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
712: FND_MESSAGE.SET_TOKEN('PARAMETERS',
713: ' P_Prepay_Invoice_Id = '||P_Prepay_Invoice_Id||
714: ' P_Prepay_Line_Number = '||P_Prepay_Line_Number||
715: ' P_Error_Code = '||P_Error_Code||
708: IF (SQLCODE <> -20001) THEN
709: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
710: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
711: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
712: FND_MESSAGE.SET_TOKEN('PARAMETERS',
713: ' P_Prepay_Invoice_Id = '||P_Prepay_Invoice_Id||
714: ' P_Prepay_Line_Number = '||P_Prepay_Line_Number||
715: ' P_Error_Code = '||P_Error_Code||
716: ' P_Calling_Sequence = '||P_Calling_Sequence);
713: ' P_Prepay_Invoice_Id = '||P_Prepay_Invoice_Id||
714: ' P_Prepay_Line_Number = '||P_Prepay_Line_Number||
715: ' P_Error_Code = '||P_Error_Code||
716: ' P_Calling_Sequence = '||P_Calling_Sequence);
717: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
718: END IF;
719:
720: --bug10140354
721: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
822:
823: EXCEPTION
824: WHEN OTHERS THEN
825: IF (SQLCODE <> -20001) THEN
826: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
827: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
828: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
829: FND_MESSAGE.SET_TOKEN('PARAMETERS',
830: ' P_Rcv_Transaction_Id = '||P_Rcv_Transaction_Id||
823: EXCEPTION
824: WHEN OTHERS THEN
825: IF (SQLCODE <> -20001) THEN
826: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
827: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
828: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
829: FND_MESSAGE.SET_TOKEN('PARAMETERS',
830: ' P_Rcv_Transaction_Id = '||P_Rcv_Transaction_Id||
831: ' P_Error_Code = '||P_Error_Code||
824: WHEN OTHERS THEN
825: IF (SQLCODE <> -20001) THEN
826: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
827: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
828: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
829: FND_MESSAGE.SET_TOKEN('PARAMETERS',
830: ' P_Rcv_Transaction_Id = '||P_Rcv_Transaction_Id||
831: ' P_Error_Code = '||P_Error_Code||
832: ' P_Calling_Sequence = '||P_Calling_Sequence);
825: IF (SQLCODE <> -20001) THEN
826: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
827: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
828: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
829: FND_MESSAGE.SET_TOKEN('PARAMETERS',
830: ' P_Rcv_Transaction_Id = '||P_Rcv_Transaction_Id||
831: ' P_Error_Code = '||P_Error_Code||
832: ' P_Calling_Sequence = '||P_Calling_Sequence);
833: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
829: FND_MESSAGE.SET_TOKEN('PARAMETERS',
830: ' P_Rcv_Transaction_Id = '||P_Rcv_Transaction_Id||
831: ' P_Error_Code = '||P_Error_Code||
832: ' P_Calling_Sequence = '||P_Calling_Sequence);
833: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
834: END IF;
835:
836: --bug10140354
837: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
1042:
1043: EXCEPTION
1044: WHEN OTHERS THEN
1045: IF (SQLCODE <> -20001) THEN
1046: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1047: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1048: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1049: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1050: ' P_PO_Line_Location_Id = '||P_PO_Line_Location_Id||
1043: EXCEPTION
1044: WHEN OTHERS THEN
1045: IF (SQLCODE <> -20001) THEN
1046: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1047: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1048: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1049: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1050: ' P_PO_Line_Location_Id = '||P_PO_Line_Location_Id||
1051: ' P_Error_Code = '||P_Error_Code||
1044: WHEN OTHERS THEN
1045: IF (SQLCODE <> -20001) THEN
1046: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1047: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1048: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1049: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1050: ' P_PO_Line_Location_Id = '||P_PO_Line_Location_Id||
1051: ' P_Error_Code = '||P_Error_Code||
1052: ' P_Calling_Sequence = '||P_Calling_Sequence);
1045: IF (SQLCODE <> -20001) THEN
1046: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1047: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1048: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1049: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1050: ' P_PO_Line_Location_Id = '||P_PO_Line_Location_Id||
1051: ' P_Error_Code = '||P_Error_Code||
1052: ' P_Calling_Sequence = '||P_Calling_Sequence);
1053: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1049: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1050: ' P_PO_Line_Location_Id = '||P_PO_Line_Location_Id||
1051: ' P_Error_Code = '||P_Error_Code||
1052: ' P_Calling_Sequence = '||P_Calling_Sequence);
1053: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1054: END IF;
1055:
1056: --bug10140354
1057: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
1124:
1125: EXCEPTION
1126: WHEN OTHERS THEN
1127: IF (SQLCODE <> -20001) THEN
1128: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1129: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1130: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1131: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1132: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
1125: EXCEPTION
1126: WHEN OTHERS THEN
1127: IF (SQLCODE <> -20001) THEN
1128: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1129: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1130: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1131: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1132: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
1133: ' P_Calling_Sequence = '||P_Calling_Sequence);
1126: WHEN OTHERS THEN
1127: IF (SQLCODE <> -20001) THEN
1128: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1129: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1130: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1131: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1132: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
1133: ' P_Calling_Sequence = '||P_Calling_Sequence);
1134: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1127: IF (SQLCODE <> -20001) THEN
1128: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1129: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1130: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1131: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1132: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
1133: ' P_Calling_Sequence = '||P_Calling_Sequence);
1134: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1135: END IF;
1130: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1131: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1132: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
1133: ' P_Calling_Sequence = '||P_Calling_Sequence);
1134: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1135: END IF;
1136:
1137: IF ( prepay_awt_group_id%ISOPEN ) THEN
1138: CLOSE prepay_awt_group_id;
1304: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1305: END IF;
1306: -------------------------------------------------------------------
1307: /* Bug 9777752
1308: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1309: FND_MESSAGE.SET_TOKEN('ERROR', 'Summary Tax Line Deleted by EBTax. This would cause orphan distributions.');
1310: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1311: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1312: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1305: END IF;
1306: -------------------------------------------------------------------
1307: /* Bug 9777752
1308: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1309: FND_MESSAGE.SET_TOKEN('ERROR', 'Summary Tax Line Deleted by EBTax. This would cause orphan distributions.');
1310: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1311: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1312: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1313: ' P_Error_Code = '||P_Error_Code||
1306: -------------------------------------------------------------------
1307: /* Bug 9777752
1308: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1309: FND_MESSAGE.SET_TOKEN('ERROR', 'Summary Tax Line Deleted by EBTax. This would cause orphan distributions.');
1310: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1311: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1312: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1313: ' P_Error_Code = '||P_Error_Code||
1314: ' P_Calling_Sequence = '||P_Calling_Sequence);
1307: /* Bug 9777752
1308: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1309: FND_MESSAGE.SET_TOKEN('ERROR', 'Summary Tax Line Deleted by EBTax. This would cause orphan distributions.');
1310: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1311: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1312: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1313: ' P_Error_Code = '||P_Error_Code||
1314: ' P_Calling_Sequence = '||P_Calling_Sequence);
1315: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1311: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1312: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1313: ' P_Error_Code = '||P_Error_Code||
1314: ' P_Calling_Sequence = '||P_Calling_Sequence);
1315: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1316: */
1317: FND_MESSAGE.SET_NAME( 'SQLAP', 'AP_SUM_TAX_LINE_DEL' ); -- Bug 9777752
1318:
1319: --Bug9395593
1313: ' P_Error_Code = '||P_Error_Code||
1314: ' P_Calling_Sequence = '||P_Calling_Sequence);
1315: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1316: */
1317: FND_MESSAGE.SET_NAME( 'SQLAP', 'AP_SUM_TAX_LINE_DEL' ); -- Bug 9777752
1318:
1319: --Bug9395593
1320:
1321: --bug10140354
1428: NULL;
1429:
1430: WHEN OTHERS THEN
1431: IF (SQLCODE <> -20001) THEN
1432: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1433: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1434: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1435: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1436: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
1429:
1430: WHEN OTHERS THEN
1431: IF (SQLCODE <> -20001) THEN
1432: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1433: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1434: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1435: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1436: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
1437: ' P_Error_Code = '||P_Error_Code||
1430: WHEN OTHERS THEN
1431: IF (SQLCODE <> -20001) THEN
1432: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1433: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1434: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1435: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1436: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
1437: ' P_Error_Code = '||P_Error_Code||
1438: ' P_Calling_Sequence = '||P_Calling_Sequence);
1431: IF (SQLCODE <> -20001) THEN
1432: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1433: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1434: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1435: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1436: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
1437: ' P_Error_Code = '||P_Error_Code||
1438: ' P_Calling_Sequence = '||P_Calling_Sequence);
1439: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1435: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1436: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
1437: ' P_Error_Code = '||P_Error_Code||
1438: ' P_Calling_Sequence = '||P_Calling_Sequence);
1439: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1440: END IF;
1441:
1442: APP_EXCEPTION.RAISE_EXCEPTION;
1443: END;
1496: NULL;
1497:
1498: WHEN OTHERS THEN
1499: IF (SQLCODE <> -20001) THEN
1500: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1501: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1502: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1503: FND_MESSAGE.SET_TOKEN('PARAMETERS',' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id
1504: ||' P_Error_Code = '||P_Error_Code
1497:
1498: WHEN OTHERS THEN
1499: IF (SQLCODE <> -20001) THEN
1500: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1501: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1502: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1503: FND_MESSAGE.SET_TOKEN('PARAMETERS',' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id
1504: ||' P_Error_Code = '||P_Error_Code
1505: ||' P_Calling_Sequence = '||P_Calling_Sequence);
1498: WHEN OTHERS THEN
1499: IF (SQLCODE <> -20001) THEN
1500: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1501: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1502: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1503: FND_MESSAGE.SET_TOKEN('PARAMETERS',' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id
1504: ||' P_Error_Code = '||P_Error_Code
1505: ||' P_Calling_Sequence = '||P_Calling_Sequence);
1506: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1499: IF (SQLCODE <> -20001) THEN
1500: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1501: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1502: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1503: FND_MESSAGE.SET_TOKEN('PARAMETERS',' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id
1504: ||' P_Error_Code = '||P_Error_Code
1505: ||' P_Calling_Sequence = '||P_Calling_Sequence);
1506: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1507: END IF;
1502: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1503: FND_MESSAGE.SET_TOKEN('PARAMETERS',' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id
1504: ||' P_Error_Code = '||P_Error_Code
1505: ||' P_Calling_Sequence = '||P_Calling_Sequence);
1506: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1507: END IF;
1508: APP_EXCEPTION.RAISE_EXCEPTION;
1509: END;
1510: /* End for bug 5943074 */
1551: NULL;
1552:
1553: WHEN OTHERS THEN
1554: IF (SQLCODE <> -20001) THEN
1555: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1556: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1557: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1558: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1559: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1552:
1553: WHEN OTHERS THEN
1554: IF (SQLCODE <> -20001) THEN
1555: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1556: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1557: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1558: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1559: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1560: ' P_Error_Code = '||P_Error_Code||
1553: WHEN OTHERS THEN
1554: IF (SQLCODE <> -20001) THEN
1555: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1556: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1557: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1558: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1559: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1560: ' P_Error_Code = '||P_Error_Code||
1561: ' P_Calling_Sequence = '||P_Calling_Sequence);
1554: IF (SQLCODE <> -20001) THEN
1555: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1556: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1557: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
1558: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1559: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1560: ' P_Error_Code = '||P_Error_Code||
1561: ' P_Calling_Sequence = '||P_Calling_Sequence);
1562: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1558: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1559: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1560: ' P_Error_Code = '||P_Error_Code||
1561: ' P_Calling_Sequence = '||P_Calling_Sequence);
1562: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1563: END IF;
1564:
1565: APP_EXCEPTION.RAISE_EXCEPTION;
1566: END;
1997: NULL;
1998:
1999: WHEN OTHERS THEN
2000: IF (SQLCODE <> -20001) THEN
2001: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2002: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2003: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2004: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2005: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
1998:
1999: WHEN OTHERS THEN
2000: IF (SQLCODE <> -20001) THEN
2001: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2002: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2003: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2004: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2005: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2006: ' P_Error_Code = '||P_Error_Code||
1999: WHEN OTHERS THEN
2000: IF (SQLCODE <> -20001) THEN
2001: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2002: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2003: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2004: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2005: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2006: ' P_Error_Code = '||P_Error_Code||
2007: ' P_Calling_Sequence = '||P_Calling_Sequence);
2000: IF (SQLCODE <> -20001) THEN
2001: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2002: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2003: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2004: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2005: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2006: ' P_Error_Code = '||P_Error_Code||
2007: ' P_Calling_Sequence = '||P_Calling_Sequence);
2008: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2004: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2005: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2006: ' P_Error_Code = '||P_Error_Code||
2007: ' P_Calling_Sequence = '||P_Calling_Sequence);
2008: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2009: END IF;
2010:
2011: APP_EXCEPTION.RAISE_EXCEPTION;
2012: END;
2039: NULL;
2040:
2041: WHEN OTHERS THEN
2042: IF (SQLCODE <> -20001) THEN
2043: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2044: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2045: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2046: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2047: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2040:
2041: WHEN OTHERS THEN
2042: IF (SQLCODE <> -20001) THEN
2043: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2044: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2045: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2046: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2047: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2048: ' P_Error_Code = '||P_Error_Code||
2041: WHEN OTHERS THEN
2042: IF (SQLCODE <> -20001) THEN
2043: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2044: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2045: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2046: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2047: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2048: ' P_Error_Code = '||P_Error_Code||
2049: ' P_Calling_Sequence = '||P_Calling_Sequence);
2042: IF (SQLCODE <> -20001) THEN
2043: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2044: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2045: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2046: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2047: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2048: ' P_Error_Code = '||P_Error_Code||
2049: ' P_Calling_Sequence = '||P_Calling_Sequence);
2050: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2046: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2047: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2048: ' P_Error_Code = '||P_Error_Code||
2049: ' P_Calling_Sequence = '||P_Calling_Sequence);
2050: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2051: END IF;
2052:
2053: APP_EXCEPTION.RAISE_EXCEPTION;
2054: END;
2076: CLOSE c_item_line;
2077: EXCEPTION
2078: WHEN OTHERS THEN
2079: IF (SQLCODE <> -20001) THEN
2080: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2081: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2082: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2083: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2084: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2077: EXCEPTION
2078: WHEN OTHERS THEN
2079: IF (SQLCODE <> -20001) THEN
2080: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2081: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2082: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2083: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2084: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2085: ' P_Error_Code = '||P_Error_Code||
2078: WHEN OTHERS THEN
2079: IF (SQLCODE <> -20001) THEN
2080: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2081: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2082: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2083: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2084: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2085: ' P_Error_Code = '||P_Error_Code||
2086: ' P_Calling_Sequence = '||P_Calling_Sequence);
2079: IF (SQLCODE <> -20001) THEN
2080: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2081: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2082: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2083: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2084: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2085: ' P_Error_Code = '||P_Error_Code||
2086: ' P_Calling_Sequence = '||P_Calling_Sequence);
2087: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2083: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2084: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2085: ' P_Error_Code = '||P_Error_Code||
2086: ' P_Calling_Sequence = '||P_Calling_Sequence);
2087: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2088: END IF;
2089:
2090: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2091: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,sqlerrm);
2156: NULL;
2157:
2158: WHEN OTHERS THEN
2159: IF (SQLCODE <> -20001) THEN
2160: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2161: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2162: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2163: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2164: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2157:
2158: WHEN OTHERS THEN
2159: IF (SQLCODE <> -20001) THEN
2160: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2161: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2162: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2163: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2164: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2165: ' P_Error_Code = '||P_Error_Code||
2158: WHEN OTHERS THEN
2159: IF (SQLCODE <> -20001) THEN
2160: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2161: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2162: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2163: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2164: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2165: ' P_Error_Code = '||P_Error_Code||
2166: ' P_Calling_Sequence = '||P_Calling_Sequence);
2159: IF (SQLCODE <> -20001) THEN
2160: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2161: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2162: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2163: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2164: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2165: ' P_Error_Code = '||P_Error_Code||
2166: ' P_Calling_Sequence = '||P_Calling_Sequence);
2167: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2163: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2164: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
2165: ' P_Error_Code = '||P_Error_Code||
2166: ' P_Calling_Sequence = '||P_Calling_Sequence);
2167: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2168: END IF;
2169:
2170: APP_EXCEPTION.RAISE_EXCEPTION;
2171: END;
2232:
2233: EXCEPTION
2234: WHEN OTHERS THEN
2235: IF (SQLCODE <> -20001) THEN
2236: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2237: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2238: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2239: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2240: ' P_Invoice_Id = ' ||P_Invoice_Header_Rec.Invoice_Id||
2233: EXCEPTION
2234: WHEN OTHERS THEN
2235: IF (SQLCODE <> -20001) THEN
2236: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2237: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2238: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2239: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2240: ' P_Invoice_Id = ' ||P_Invoice_Header_Rec.Invoice_Id||
2241: ' P_Error_Code = ' ||P_Error_Code||
2234: WHEN OTHERS THEN
2235: IF (SQLCODE <> -20001) THEN
2236: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2237: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2238: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2239: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2240: ' P_Invoice_Id = ' ||P_Invoice_Header_Rec.Invoice_Id||
2241: ' P_Error_Code = ' ||P_Error_Code||
2242: ' P_Calling_Sequence = '||P_Calling_Sequence);
2235: IF (SQLCODE <> -20001) THEN
2236: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2237: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2238: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
2239: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2240: ' P_Invoice_Id = ' ||P_Invoice_Header_Rec.Invoice_Id||
2241: ' P_Error_Code = ' ||P_Error_Code||
2242: ' P_Calling_Sequence = '||P_Calling_Sequence);
2243: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2239: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2240: ' P_Invoice_Id = ' ||P_Invoice_Header_Rec.Invoice_Id||
2241: ' P_Error_Code = ' ||P_Error_Code||
2242: ' P_Calling_Sequence = '||P_Calling_Sequence);
2243: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2244: END IF;
2245:
2246: APP_EXCEPTION.RAISE_EXCEPTION;
2247:
4684:
4685: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
4686: APP_EXCEPTION.RAISE_EXCEPTION;
4687: ELSE
4688: P_Error_Code := FND_MESSAGE.GET;
4689: RETURN FALSE;
4690: END IF;
4691:
4692: END IF;
4931: IF l_dist_ccid_rec.recoverable_flag = 'N' AND
4932: NVL(l_dist_code_combination_id, -99) = -99 THEN
4933: --bug 8840245, if online validaiton then raise exception else return false
4934: --Bug9021265
4935: FND_MESSAGE.SET_NAME('SQLAP','AP_NO_NON_REC_ACC');
4936: FND_MESSAGE.SET_TOKEN('ERROR', 'Default Account for tax only line not provided or expense account not defined.');
4937: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
4938: FND_MESSAGE.SET_TOKEN('PARAMETERS',
4939: 'P_Error_Code = '||P_Error_Code||
4932: NVL(l_dist_code_combination_id, -99) = -99 THEN
4933: --bug 8840245, if online validaiton then raise exception else return false
4934: --Bug9021265
4935: FND_MESSAGE.SET_NAME('SQLAP','AP_NO_NON_REC_ACC');
4936: FND_MESSAGE.SET_TOKEN('ERROR', 'Default Account for tax only line not provided or expense account not defined.');
4937: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
4938: FND_MESSAGE.SET_TOKEN('PARAMETERS',
4939: 'P_Error_Code = '||P_Error_Code||
4940: 'P_Calling_Sequence = '||P_Calling_Sequence);
4933: --bug 8840245, if online validaiton then raise exception else return false
4934: --Bug9021265
4935: FND_MESSAGE.SET_NAME('SQLAP','AP_NO_NON_REC_ACC');
4936: FND_MESSAGE.SET_TOKEN('ERROR', 'Default Account for tax only line not provided or expense account not defined.');
4937: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
4938: FND_MESSAGE.SET_TOKEN('PARAMETERS',
4939: 'P_Error_Code = '||P_Error_Code||
4940: 'P_Calling_Sequence = '||P_Calling_Sequence);
4941: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4934: --Bug9021265
4935: FND_MESSAGE.SET_NAME('SQLAP','AP_NO_NON_REC_ACC');
4936: FND_MESSAGE.SET_TOKEN('ERROR', 'Default Account for tax only line not provided or expense account not defined.');
4937: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
4938: FND_MESSAGE.SET_TOKEN('PARAMETERS',
4939: 'P_Error_Code = '||P_Error_Code||
4940: 'P_Calling_Sequence = '||P_Calling_Sequence);
4941: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4942: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
4937: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
4938: FND_MESSAGE.SET_TOKEN('PARAMETERS',
4939: 'P_Error_Code = '||P_Error_Code||
4940: 'P_Calling_Sequence = '||P_Calling_Sequence);
4941: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4942: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
4943: APP_EXCEPTION.RAISE_EXCEPTION;
4944: ELSE
4945: P_Error_Code := FND_MESSAGE.GET;
4941: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
4942: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
4943: APP_EXCEPTION.RAISE_EXCEPTION;
4944: ELSE
4945: P_Error_Code := FND_MESSAGE.GET;
4946: RETURN FALSE;
4947: END IF;
4948: --Bug9021265
4949: END IF;
5709:
5710: EXCEPTION
5711: WHEN OTHERS THEN
5712: IF (SQLCODE <> -20001) THEN
5713: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5714: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5715: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5716: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5717: ' P_Invoice_Id = '||l_inv_self_ins(i).invoice_id||
5710: EXCEPTION
5711: WHEN OTHERS THEN
5712: IF (SQLCODE <> -20001) THEN
5713: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5714: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5715: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5716: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5717: ' P_Invoice_Id = '||l_inv_self_ins(i).invoice_id||
5718: ' P_Error_Code = '||P_Error_Code||
5711: WHEN OTHERS THEN
5712: IF (SQLCODE <> -20001) THEN
5713: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5714: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5715: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5716: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5717: ' P_Invoice_Id = '||l_inv_self_ins(i).invoice_id||
5718: ' P_Error_Code = '||P_Error_Code||
5719: ' P_Calling_Sequence = '||P_Calling_Sequence);
5712: IF (SQLCODE <> -20001) THEN
5713: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5714: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5715: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5716: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5717: ' P_Invoice_Id = '||l_inv_self_ins(i).invoice_id||
5718: ' P_Error_Code = '||P_Error_Code||
5719: ' P_Calling_Sequence = '||P_Calling_Sequence);
5720: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5716: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5717: ' P_Invoice_Id = '||l_inv_self_ins(i).invoice_id||
5718: ' P_Error_Code = '||P_Error_Code||
5719: ' P_Calling_Sequence = '||P_Calling_Sequence);
5720: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5721: END IF;
5722:
5723: IF (G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
5724: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
5780: END IF; */
5781: -------------------------------------------------------------------
5782:
5783: /* Bug 9777752
5784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5785: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5787: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5788: ' P_Error_Code = '||P_Error_Code||
5781: -------------------------------------------------------------------
5782:
5783: /* Bug 9777752
5784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5785: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5787: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5788: ' P_Error_Code = '||P_Error_Code||
5789: ' P_Calling_Sequence = '||P_Calling_Sequence);
5782:
5783: /* Bug 9777752
5784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5785: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5787: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5788: ' P_Error_Code = '||P_Error_Code||
5789: ' P_Calling_Sequence = '||P_Calling_Sequence);
5790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5783: /* Bug 9777752
5784: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5785: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5787: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5788: ' P_Error_Code = '||P_Error_Code||
5789: ' P_Calling_Sequence = '||P_Calling_Sequence);
5790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5791: */
5786: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5787: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5788: ' P_Error_Code = '||P_Error_Code||
5789: ' P_Calling_Sequence = '||P_Calling_Sequence);
5790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5791: */
5792: FND_MESSAGE.SET_NAME( 'SQLAP', 'AP_FRZN_TAX_DIST_DEL' ); -- Bug 9777752
5793:
5794: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
5788: ' P_Error_Code = '||P_Error_Code||
5789: ' P_Calling_Sequence = '||P_Calling_Sequence);
5790: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5791: */
5792: FND_MESSAGE.SET_NAME( 'SQLAP', 'AP_FRZN_TAX_DIST_DEL' ); -- Bug 9777752
5793:
5794: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
5795: APP_EXCEPTION.RAISE_EXCEPTION;
5796: ELSE
5877: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5878: END IF; */
5879: -------------------------------------------------------------------
5880: /* Bug 9777752
5881: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5882: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5883: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5884: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5885: ' P_Error_Code = '||P_Error_Code||
5878: END IF; */
5879: -------------------------------------------------------------------
5880: /* Bug 9777752
5881: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5882: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5883: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5884: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5885: ' P_Error_Code = '||P_Error_Code||
5886: ' P_Calling_Sequence = '||P_Calling_Sequence);
5879: -------------------------------------------------------------------
5880: /* Bug 9777752
5881: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5882: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5883: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5884: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5885: ' P_Error_Code = '||P_Error_Code||
5886: ' P_Calling_Sequence = '||P_Calling_Sequence);
5887: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5880: /* Bug 9777752
5881: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5882: FND_MESSAGE.SET_TOKEN('ERROR', 'Frozen Tax Distribution Deleted by EBTax. This would cause orphan events.');
5883: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5884: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5885: ' P_Error_Code = '||P_Error_Code||
5886: ' P_Calling_Sequence = '||P_Calling_Sequence);
5887: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5888: */
5883: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5884: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5885: ' P_Error_Code = '||P_Error_Code||
5886: ' P_Calling_Sequence = '||P_Calling_Sequence);
5887: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5888: */
5889: FND_MESSAGE.SET_NAME( 'SQLAP', 'AP_FRZN_TAX_DIST_DEL' ); -- Bug 9777752
5890:
5891: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
5885: ' P_Error_Code = '||P_Error_Code||
5886: ' P_Calling_Sequence = '||P_Calling_Sequence);
5887: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5888: */
5889: FND_MESSAGE.SET_NAME( 'SQLAP', 'AP_FRZN_TAX_DIST_DEL' ); -- Bug 9777752
5890:
5891: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
5892: APP_EXCEPTION.RAISE_EXCEPTION;
5893: ELSE
5957:
5958: EXCEPTION
5959: WHEN DUP_VAL_ON_INDEX THEN
5960: IF INSTRB( SQLERRM, 'AP_INVOICE_DISTRIBUTION_U1' ) <> 0 THEN
5961: FND_MESSAGE.SET_NAME('SQLAP', 'AP_ERR_TAX_DIST_SYNC') ;
5962:
5963: IF AP_APPROVAL_PKG.G_VALIDATION_REQUEST_ID IS NULL THEN
5964: APP_EXCEPTION.RAISE_EXCEPTION;
5965: ELSE
5976:
5977: EXCEPTION
5978: WHEN OTHERS THEN
5979: IF (SQLCODE <> -20001) THEN
5980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5983: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5984: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
5977: EXCEPTION
5978: WHEN OTHERS THEN
5979: IF (SQLCODE <> -20001) THEN
5980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5983: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5984: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
5985: ' P_Error_Code = '||P_Error_Code||
5978: WHEN OTHERS THEN
5979: IF (SQLCODE <> -20001) THEN
5980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5983: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5984: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
5985: ' P_Error_Code = '||P_Error_Code||
5986: ' P_Calling_Sequence = '||P_Calling_Sequence);
5979: IF (SQLCODE <> -20001) THEN
5980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
5981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
5982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
5983: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5984: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
5985: ' P_Error_Code = '||P_Error_Code||
5986: ' P_Calling_Sequence = '||P_Calling_Sequence);
5987: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5983: FND_MESSAGE.SET_TOKEN('PARAMETERS',
5984: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
5985: ' P_Error_Code = '||P_Error_Code||
5986: ' P_Calling_Sequence = '||P_Calling_Sequence);
5987: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
5988: END IF;
5989:
5990: IF (insert_tax_dist%ISOPEN ) THEN
5991: CLOSE insert_tax_dist;
6264:
6265: EXCEPTION
6266: WHEN OTHERS THEN
6267: IF (SQLCODE <> -20001) THEN
6268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6272: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6265: EXCEPTION
6266: WHEN OTHERS THEN
6267: IF (SQLCODE <> -20001) THEN
6268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6272: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6273: ' P_Error_Code = '||P_Error_Code||
6266: WHEN OTHERS THEN
6267: IF (SQLCODE <> -20001) THEN
6268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6272: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6273: ' P_Error_Code = '||P_Error_Code||
6274: ' P_Calling_Sequence = '||P_Calling_Sequence);
6267: IF (SQLCODE <> -20001) THEN
6268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6272: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6273: ' P_Error_Code = '||P_Error_Code||
6274: ' P_Calling_Sequence = '||P_Calling_Sequence);
6275: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6272: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6273: ' P_Error_Code = '||P_Error_Code||
6274: ' P_Calling_Sequence = '||P_Calling_Sequence);
6275: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6276: END IF;
6277:
6278: APP_EXCEPTION.RAISE_EXCEPTION;
6279: END Return_Default_Import;
6347:
6348: EXCEPTION
6349: WHEN OTHERS THEN
6350: IF (SQLCODE <> -20001) THEN
6351: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6352: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6353: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6354: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6355: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6348: EXCEPTION
6349: WHEN OTHERS THEN
6350: IF (SQLCODE <> -20001) THEN
6351: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6352: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6353: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6354: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6355: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6356: ' P_Error_Code = '||P_Error_Code||
6349: WHEN OTHERS THEN
6350: IF (SQLCODE <> -20001) THEN
6351: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6352: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6353: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6354: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6355: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6356: ' P_Error_Code = '||P_Error_Code||
6357: ' P_Calling_Sequence = '||P_Calling_Sequence);
6350: IF (SQLCODE <> -20001) THEN
6351: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6352: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6353: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6354: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6355: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6356: ' P_Error_Code = '||P_Error_Code||
6357: ' P_Calling_Sequence = '||P_Calling_Sequence);
6358: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6354: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6355: ' P_Invoice_Id = '||P_Invoice_Header_Rec.Invoice_Id||
6356: ' P_Error_Code = '||P_Error_Code||
6357: ' P_Calling_Sequence = '||P_Calling_Sequence);
6358: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6359: END IF;
6360:
6361: APP_EXCEPTION.RAISE_EXCEPTION;
6362:
6442:
6443: EXCEPTION
6444: WHEN OTHERS THEN
6445: IF (SQLCODE <> -20001) THEN
6446: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6447: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6448: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6449: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6450: ' P_Error_Code = '||P_Error_Code||
6443: EXCEPTION
6444: WHEN OTHERS THEN
6445: IF (SQLCODE <> -20001) THEN
6446: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6447: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6448: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6449: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6450: ' P_Error_Code = '||P_Error_Code||
6451: ' P_Calling_Sequence = '||P_Calling_Sequence);
6444: WHEN OTHERS THEN
6445: IF (SQLCODE <> -20001) THEN
6446: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6447: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6448: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6449: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6450: ' P_Error_Code = '||P_Error_Code||
6451: ' P_Calling_Sequence = '||P_Calling_Sequence);
6452: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6445: IF (SQLCODE <> -20001) THEN
6446: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6447: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6448: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6449: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6450: ' P_Error_Code = '||P_Error_Code||
6451: ' P_Calling_Sequence = '||P_Calling_Sequence);
6452: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6453: END IF;
6448: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6449: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6450: ' P_Error_Code = '||P_Error_Code||
6451: ' P_Calling_Sequence = '||P_Calling_Sequence);
6452: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6453: END IF;
6454:
6455: APP_EXCEPTION.RAISE_EXCEPTION;
6456:
6539:
6540: EXCEPTION
6541: WHEN OTHERS THEN
6542: IF (SQLCODE <> -20001) THEN
6543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6547: ' P_Invoice_Id = '||P_Invoice_Id||
6540: EXCEPTION
6541: WHEN OTHERS THEN
6542: IF (SQLCODE <> -20001) THEN
6543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6547: ' P_Invoice_Id = '||P_Invoice_Id||
6548: ' P_Calling_Sequence = '||P_Calling_Sequence);
6541: WHEN OTHERS THEN
6542: IF (SQLCODE <> -20001) THEN
6543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6547: ' P_Invoice_Id = '||P_Invoice_Id||
6548: ' P_Calling_Sequence = '||P_Calling_Sequence);
6549: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6542: IF (SQLCODE <> -20001) THEN
6543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6547: ' P_Invoice_Id = '||P_Invoice_Id||
6548: ' P_Calling_Sequence = '||P_Calling_Sequence);
6549: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6550: END IF;
6545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6547: ' P_Invoice_Id = '||P_Invoice_Id||
6548: ' P_Calling_Sequence = '||P_Calling_Sequence);
6549: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6550: END IF;
6551:
6552: IF (tax_already_calculated%ISOPEN ) THEN
6553: CLOSE tax_already_calculated;
6629: WHEN NO_DATA_FOUND THEN
6630: RETURN(l_tax_already_calculated_flag);
6631: WHEN OTHERS THEN
6632: IF (SQLCODE <> -20001) THEN
6633: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6634: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6635: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6637: ' P_Invoice_Id = '||P_Invoice_Id||
6630: RETURN(l_tax_already_calculated_flag);
6631: WHEN OTHERS THEN
6632: IF (SQLCODE <> -20001) THEN
6633: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6634: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6635: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6637: ' P_Invoice_Id = '||P_Invoice_Id||
6638: ' P_Calling_Sequence = '||P_Calling_Sequence);
6631: WHEN OTHERS THEN
6632: IF (SQLCODE <> -20001) THEN
6633: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6634: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6635: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6637: ' P_Invoice_Id = '||P_Invoice_Id||
6638: ' P_Calling_Sequence = '||P_Calling_Sequence);
6639: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6632: IF (SQLCODE <> -20001) THEN
6633: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6634: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6635: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6637: ' P_Invoice_Id = '||P_Invoice_Id||
6638: ' P_Calling_Sequence = '||P_Calling_Sequence);
6639: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6640: END IF;
6635: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6637: ' P_Invoice_Id = '||P_Invoice_Id||
6638: ' P_Calling_Sequence = '||P_Calling_Sequence);
6639: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6640: END IF;
6641:
6642: APP_EXCEPTION.RAISE_EXCEPTION;
6643:
6726:
6727: EXCEPTION
6728: WHEN OTHERS THEN
6729: IF (SQLCODE <> -20001) THEN
6730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6733: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6734: ' P_Invoice_Id = '||P_Invoice_Id||
6727: EXCEPTION
6728: WHEN OTHERS THEN
6729: IF (SQLCODE <> -20001) THEN
6730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6733: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6734: ' P_Invoice_Id = '||P_Invoice_Id||
6735: ' P_Calling_Sequence = '||P_Calling_Sequence);
6728: WHEN OTHERS THEN
6729: IF (SQLCODE <> -20001) THEN
6730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6733: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6734: ' P_Invoice_Id = '||P_Invoice_Id||
6735: ' P_Calling_Sequence = '||P_Calling_Sequence);
6736: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6729: IF (SQLCODE <> -20001) THEN
6730: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6731: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6733: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6734: ' P_Invoice_Id = '||P_Invoice_Id||
6735: ' P_Calling_Sequence = '||P_Calling_Sequence);
6736: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6737: END IF;
6732: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
6733: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6734: ' P_Invoice_Id = '||P_Invoice_Id||
6735: ' P_Calling_Sequence = '||P_Calling_Sequence);
6736: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6737: END IF;
6738:
6739: IF (etax_already_distributed%ISOPEN ) THEN
6740: CLOSE etax_already_distributed;
6803:
6804: EXCEPTION
6805: WHEN OTHERS THEN
6806: IF (SQLCODE <> -20001) THEN
6807: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6808: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6809: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
6810: 'AP_ETAX_UTILITY_PKG.Get_Dist_Id_For_Tax_Dist_Id');
6811: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6804: EXCEPTION
6805: WHEN OTHERS THEN
6806: IF (SQLCODE <> -20001) THEN
6807: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6808: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6809: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
6810: 'AP_ETAX_UTILITY_PKG.Get_Dist_Id_For_Tax_Dist_Id');
6811: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6812: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
6805: WHEN OTHERS THEN
6806: IF (SQLCODE <> -20001) THEN
6807: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6808: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6809: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
6810: 'AP_ETAX_UTILITY_PKG.Get_Dist_Id_For_Tax_Dist_Id');
6811: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6812: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
6813: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6807: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
6808: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
6809: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
6810: 'AP_ETAX_UTILITY_PKG.Get_Dist_Id_For_Tax_Dist_Id');
6811: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6812: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
6813: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6814: END IF;
6815:
6809: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
6810: 'AP_ETAX_UTILITY_PKG.Get_Dist_Id_For_Tax_Dist_Id');
6811: FND_MESSAGE.SET_TOKEN('PARAMETERS',
6812: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
6813: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6814: END IF;
6815:
6816: IF (invoice_dist_id%ISOPEN ) THEN
6817: CLOSE invoice_dist_id;
7084:
7085: EXCEPTION
7086: WHEN OTHERS THEN
7087: IF (SQLCODE <> -20001) THEN
7088: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7089: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7090: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7091: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7092: ' P_Invoice_Id = '||P_Invoice_id||
7085: EXCEPTION
7086: WHEN OTHERS THEN
7087: IF (SQLCODE <> -20001) THEN
7088: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7089: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7090: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7091: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7092: ' P_Invoice_Id = '||P_Invoice_id||
7093: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
7086: WHEN OTHERS THEN
7087: IF (SQLCODE <> -20001) THEN
7088: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7089: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7090: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7091: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7092: ' P_Invoice_Id = '||P_Invoice_id||
7093: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
7094: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7087: IF (SQLCODE <> -20001) THEN
7088: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7089: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7090: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7091: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7092: ' P_Invoice_Id = '||P_Invoice_id||
7093: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
7094: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7095: END IF;
7090: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7091: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7092: ' P_Invoice_Id = '||P_Invoice_id||
7093: ' P_Tax_Dist_Id = '||P_Tax_Dist_Id);
7094: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7095: END IF;
7096:
7097: APP_EXCEPTION.RAISE_EXCEPTION;
7098:
7185:
7186: EXCEPTION
7187: WHEN OTHERS THEN
7188: IF (SQLCODE <> -20001) THEN
7189: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7190: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7191: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7192: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7193: ' P_Invoice_Id = '||P_Invoice_id||
7186: EXCEPTION
7187: WHEN OTHERS THEN
7188: IF (SQLCODE <> -20001) THEN
7189: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7190: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7191: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7192: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7193: ' P_Invoice_Id = '||P_Invoice_id||
7194: ' P_Detail_Tax_Line_Id = '||P_Detail_Tax_Line_Id);
7187: WHEN OTHERS THEN
7188: IF (SQLCODE <> -20001) THEN
7189: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7190: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7191: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7192: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7193: ' P_Invoice_Id = '||P_Invoice_id||
7194: ' P_Detail_Tax_Line_Id = '||P_Detail_Tax_Line_Id);
7195: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7188: IF (SQLCODE <> -20001) THEN
7189: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7190: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7191: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7192: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7193: ' P_Invoice_Id = '||P_Invoice_id||
7194: ' P_Detail_Tax_Line_Id = '||P_Detail_Tax_Line_Id);
7195: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7196: END IF;
7191: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
7192: FND_MESSAGE.SET_TOKEN('PARAMETERS',
7193: ' P_Invoice_Id = '||P_Invoice_id||
7194: ' P_Detail_Tax_Line_Id = '||P_Detail_Tax_Line_Id);
7195: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7196: END IF;
7197:
7198: APP_EXCEPTION.RAISE_EXCEPTION;
7199:
7262:
7263: EXCEPTION
7264: WHEN OTHERS THEN
7265: IF (SQLCODE <> -20001) THEN
7266: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7267: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7268: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AP_ETAX_UTILITY_PKG.set_tax_security_context');
7269: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'p_org_id: ' || p_org_id ||
7270: 'p_legal_entity_id: ' || p_legal_entity_id ||
7263: EXCEPTION
7264: WHEN OTHERS THEN
7265: IF (SQLCODE <> -20001) THEN
7266: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7267: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7268: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AP_ETAX_UTILITY_PKG.set_tax_security_context');
7269: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'p_org_id: ' || p_org_id ||
7270: 'p_legal_entity_id: ' || p_legal_entity_id ||
7271: 'p_transaction_date: ' || p_transaction_date ||
7264: WHEN OTHERS THEN
7265: IF (SQLCODE <> -20001) THEN
7266: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7267: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7268: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AP_ETAX_UTILITY_PKG.set_tax_security_context');
7269: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'p_org_id: ' || p_org_id ||
7270: 'p_legal_entity_id: ' || p_legal_entity_id ||
7271: 'p_transaction_date: ' || p_transaction_date ||
7272: 'p_related_doc_date: ' || p_related_doc_date);
7265: IF (SQLCODE <> -20001) THEN
7266: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
7267: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
7268: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', 'AP_ETAX_UTILITY_PKG.set_tax_security_context');
7269: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'p_org_id: ' || p_org_id ||
7270: 'p_legal_entity_id: ' || p_legal_entity_id ||
7271: 'p_transaction_date: ' || p_transaction_date ||
7272: 'p_related_doc_date: ' || p_related_doc_date);
7273: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7269: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'p_org_id: ' || p_org_id ||
7270: 'p_legal_entity_id: ' || p_legal_entity_id ||
7271: 'p_transaction_date: ' || p_transaction_date ||
7272: 'p_related_doc_date: ' || p_related_doc_date);
7273: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
7274: END IF;
7275:
7276: APP_EXCEPTION.RAISE_EXCEPTION;
7277:
8606:
8607: EXCEPTION
8608: WHEN OTHERS THEN
8609: IF (SQLCODE <> -20001) THEN
8610: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8611: fnd_message.set_token('ERROR', SQLERRM);
8612: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8613: fnd_message.set_token('PARAMETERS',
8614: ' p_taxation_country = '||p_taxation_country ||
8607: EXCEPTION
8608: WHEN OTHERS THEN
8609: IF (SQLCODE <> -20001) THEN
8610: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8611: fnd_message.set_token('ERROR', SQLERRM);
8612: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8613: fnd_message.set_token('PARAMETERS',
8614: ' p_taxation_country = '||p_taxation_country ||
8615: ' p_document_sub_type = '||p_document_sub_type ||
8608: WHEN OTHERS THEN
8609: IF (SQLCODE <> -20001) THEN
8610: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8611: fnd_message.set_token('ERROR', SQLERRM);
8612: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8613: fnd_message.set_token('PARAMETERS',
8614: ' p_taxation_country = '||p_taxation_country ||
8615: ' p_document_sub_type = '||p_document_sub_type ||
8616: ' p_tax_related_inv_id = '||p_tax_related_inv_id);
8609: IF (SQLCODE <> -20001) THEN
8610: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8611: fnd_message.set_token('ERROR', SQLERRM);
8612: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8613: fnd_message.set_token('PARAMETERS',
8614: ' p_taxation_country = '||p_taxation_country ||
8615: ' p_document_sub_type = '||p_document_sub_type ||
8616: ' p_tax_related_inv_id = '||p_tax_related_inv_id);
8617: fnd_message.set_token('DEBUG_INFO',l_debug_info);
8613: fnd_message.set_token('PARAMETERS',
8614: ' p_taxation_country = '||p_taxation_country ||
8615: ' p_document_sub_type = '||p_document_sub_type ||
8616: ' p_tax_related_inv_id = '||p_tax_related_inv_id);
8617: fnd_message.set_token('DEBUG_INFO',l_debug_info);
8618: END IF;
8619: app_exception.raise_exception;
8620:
8621:
8817:
8818: EXCEPTION
8819: WHEN OTHERS THEN
8820: IF (SQLCODE <> -20001) THEN
8821: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8822: fnd_message.set_token('ERROR', SQLERRM);
8823: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8824: fnd_message.set_token('PARAMETERS',
8825: ' p_taxation_country = '||p_taxation_country ||
8818: EXCEPTION
8819: WHEN OTHERS THEN
8820: IF (SQLCODE <> -20001) THEN
8821: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8822: fnd_message.set_token('ERROR', SQLERRM);
8823: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8824: fnd_message.set_token('PARAMETERS',
8825: ' p_taxation_country = '||p_taxation_country ||
8826: ' p_trx_bus_category = '||p_trx_bus_category ||
8819: WHEN OTHERS THEN
8820: IF (SQLCODE <> -20001) THEN
8821: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8822: fnd_message.set_token('ERROR', SQLERRM);
8823: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8824: fnd_message.set_token('PARAMETERS',
8825: ' p_taxation_country = '||p_taxation_country ||
8826: ' p_trx_bus_category = '||p_trx_bus_category ||
8827: ' p_prd_fisc_class = '||p_prd_fisc_class ||
8820: IF (SQLCODE <> -20001) THEN
8821: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8822: fnd_message.set_token('ERROR', SQLERRM);
8823: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8824: fnd_message.set_token('PARAMETERS',
8825: ' p_taxation_country = '||p_taxation_country ||
8826: ' p_trx_bus_category = '||p_trx_bus_category ||
8827: ' p_prd_fisc_class = '||p_prd_fisc_class ||
8828: ' p_user_fisc_class = '||p_user_fisc_class ||
8831: ' p_product_category = '||p_product_category ||
8832: ' p_inv_item_id = '||p_inv_item_id ||
8833: ' p_org_id = '||p_org_id );
8834:
8835: fnd_message.set_token('DEBUG_INFO',l_debug_info);
8836: END IF;
8837: app_exception.raise_exception;
8838:
8839: END get_taxable_line_attr_desc;
8981:
8982: EXCEPTION
8983: WHEN OTHERS THEN
8984: IF (SQLCODE <> -20001) THEN
8985: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8986: fnd_message.set_token('ERROR', SQLERRM);
8987: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8988: fnd_message.set_token('PARAMETERS',
8989: ' p_taxation_country = '||p_taxation_country ||
8982: EXCEPTION
8983: WHEN OTHERS THEN
8984: IF (SQLCODE <> -20001) THEN
8985: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8986: fnd_message.set_token('ERROR', SQLERRM);
8987: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8988: fnd_message.set_token('PARAMETERS',
8989: ' p_taxation_country = '||p_taxation_country ||
8990: ' p_tax_regime_code = '||p_tax_regime_code ||
8983: WHEN OTHERS THEN
8984: IF (SQLCODE <> -20001) THEN
8985: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8986: fnd_message.set_token('ERROR', SQLERRM);
8987: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8988: fnd_message.set_token('PARAMETERS',
8989: ' p_taxation_country = '||p_taxation_country ||
8990: ' p_tax_regime_code = '||p_tax_regime_code ||
8991: ' p_tax = '||p_tax ||
8984: IF (SQLCODE <> -20001) THEN
8985: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
8986: fnd_message.set_token('ERROR', SQLERRM);
8987: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
8988: fnd_message.set_token('PARAMETERS',
8989: ' p_taxation_country = '||p_taxation_country ||
8990: ' p_tax_regime_code = '||p_tax_regime_code ||
8991: ' p_tax = '||p_tax ||
8992: ' p_tax_jurisdiction_code = '||p_tax_jurisdiction_code ||
8991: ' p_tax = '||p_tax ||
8992: ' p_tax_jurisdiction_code = '||p_tax_jurisdiction_code ||
8993: ' p_tax_status_code = '||p_tax_status_code );
8994:
8995: fnd_message.set_token('DEBUG_INFO',l_debug_info);
8996: END IF;
8997: app_exception.raise_exception;
8998:
8999: END get_tax_line_attr_desc;
9129:
9130: EXCEPTION
9131: WHEN OTHERS THEN
9132: IF (SQLCODE <> -20001) THEN
9133: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
9134: fnd_message.set_token('ERROR', SQLERRM);
9135: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
9136: fnd_message.set_token('PARAMETERS',
9137: ' p_org_id = '||p_org_id ||
9130: EXCEPTION
9131: WHEN OTHERS THEN
9132: IF (SQLCODE <> -20001) THEN
9133: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
9134: fnd_message.set_token('ERROR', SQLERRM);
9135: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
9136: fnd_message.set_token('PARAMETERS',
9137: ' p_org_id = '||p_org_id ||
9138: ' p_legal_entity_id = '||p_legal_entity_id ||
9131: WHEN OTHERS THEN
9132: IF (SQLCODE <> -20001) THEN
9133: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
9134: fnd_message.set_token('ERROR', SQLERRM);
9135: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
9136: fnd_message.set_token('PARAMETERS',
9137: ' p_org_id = '||p_org_id ||
9138: ' p_legal_entity_id = '||p_legal_entity_id ||
9139: ' p_item_id = '||p_item_id ||
9132: IF (SQLCODE <> -20001) THEN
9133: fnd_message.set_name ('SQLAP', 'AP_DEBUG');
9134: fnd_message.set_token('ERROR', SQLERRM);
9135: fnd_message.set_token('CALLING_SEQUENCE', l_curr_calling_sequence);
9136: fnd_message.set_token('PARAMETERS',
9137: ' p_org_id = '||p_org_id ||
9138: ' p_legal_entity_id = '||p_legal_entity_id ||
9139: ' p_item_id = '||p_item_id ||
9140: ' p_doc_type = '||p_doc_type ||
9139: ' p_item_id = '||p_item_id ||
9140: ' p_doc_type = '||p_doc_type ||
9141: ' p_trx_date = '||p_trx_date );
9142:
9143: fnd_message.set_token('DEBUG_INFO',l_debug_info);
9144: END IF;
9145: app_exception.raise_exception;
9146:
9147: END get_default_tax_det_attribs;
9571:
9572: EXCEPTION
9573: WHEN OTHERS THEN
9574: IF (SQLCODE <> -20001) THEN
9575: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9576: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9577: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9578: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9579: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
9572: EXCEPTION
9573: WHEN OTHERS THEN
9574: IF (SQLCODE <> -20001) THEN
9575: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9576: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9577: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9578: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9579: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
9580: ' P_Calling_Sequence = '||P_Calling_Sequence);
9573: WHEN OTHERS THEN
9574: IF (SQLCODE <> -20001) THEN
9575: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9576: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9577: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9578: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9579: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
9580: ' P_Calling_Sequence = '||P_Calling_Sequence);
9581: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9574: IF (SQLCODE <> -20001) THEN
9575: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9576: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9577: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9578: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9579: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
9580: ' P_Calling_Sequence = '||P_Calling_Sequence);
9581: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9582: END IF;
9577: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9578: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9579: ' P_Invoice_Id = '||P_Invoice_Header_Rec.invoice_id||
9580: ' P_Calling_Sequence = '||P_Calling_Sequence);
9581: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9582: END IF;
9583:
9584: IF ( G_LEVEL_EXCEPTION >= G_CURRENT_RUNTIME_LEVEL) THEN
9585: FND_LOG.STRING(G_LEVEL_EXCEPTION,G_MODULE_NAME||l_api_name,SQLERRM);
9694:
9695: EXCEPTION
9696: WHEN OTHERS THEN
9697: IF (SQLCODE <> -20001) THEN
9698: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9699: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9700: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9701: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9702: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
9695: EXCEPTION
9696: WHEN OTHERS THEN
9697: IF (SQLCODE <> -20001) THEN
9698: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9699: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9700: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9701: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9702: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
9703: ' P_Error_Code = '||P_Error_Code||
9696: WHEN OTHERS THEN
9697: IF (SQLCODE <> -20001) THEN
9698: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9699: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9700: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9701: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9702: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
9703: ' P_Error_Code = '||P_Error_Code||
9704: ' P_Calling_Sequence = '||P_Calling_Sequence);
9697: IF (SQLCODE <> -20001) THEN
9698: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9699: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9700: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9701: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9702: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
9703: ' P_Error_Code = '||P_Error_Code||
9704: ' P_Calling_Sequence = '||P_Calling_Sequence);
9705: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9701: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9702: ' P_Invoice_Type_Lookup_Code = '||P_Invoice_Type_Lookup_Code||
9703: ' P_Error_Code = '||P_Error_Code||
9704: ' P_Calling_Sequence = '||P_Calling_Sequence);
9705: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9706: END IF;
9707:
9708: APP_EXCEPTION.RAISE_EXCEPTION;
9709:
9770:
9771: EXCEPTION
9772: WHEN OTHERS THEN
9773: IF (SQLCODE <> -20001) THEN
9774: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9775: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9776: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9777: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9778: ' P_Invoice_Id = '||P_Invoice_Id||
9771: EXCEPTION
9772: WHEN OTHERS THEN
9773: IF (SQLCODE <> -20001) THEN
9774: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9775: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9776: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9777: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9778: ' P_Invoice_Id = '||P_Invoice_Id||
9779: ' P_Calling_Sequence = '||P_Calling_Sequence);
9772: WHEN OTHERS THEN
9773: IF (SQLCODE <> -20001) THEN
9774: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9775: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9776: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9777: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9778: ' P_Invoice_Id = '||P_Invoice_Id||
9779: ' P_Calling_Sequence = '||P_Calling_Sequence);
9780: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9773: IF (SQLCODE <> -20001) THEN
9774: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9775: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9776: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9777: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9778: ' P_Invoice_Id = '||P_Invoice_Id||
9779: ' P_Calling_Sequence = '||P_Calling_Sequence);
9780: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9781: END IF;
9776: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9777: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9778: ' P_Invoice_Id = '||P_Invoice_Id||
9779: ' P_Calling_Sequence = '||P_Calling_Sequence);
9780: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9781: END IF;
9782:
9783: IF (etax_already_distributed%ISOPEN ) THEN
9784: CLOSE etax_already_distributed;
9948:
9949: EXCEPTION
9950: WHEN OTHERS THEN
9951: IF (SQLCODE <> -20001) THEN
9952: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9953: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9954: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9955: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9956: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
9949: EXCEPTION
9950: WHEN OTHERS THEN
9951: IF (SQLCODE <> -20001) THEN
9952: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9953: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9954: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9955: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9956: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
9957: ' P_Calling_Sequence = '||P_Calling_Sequence);
9950: WHEN OTHERS THEN
9951: IF (SQLCODE <> -20001) THEN
9952: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9953: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9954: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9955: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9956: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
9957: ' P_Calling_Sequence = '||P_Calling_Sequence);
9958: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9951: IF (SQLCODE <> -20001) THEN
9952: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
9953: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
9954: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9955: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9956: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
9957: ' P_Calling_Sequence = '||P_Calling_Sequence);
9958: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9959: END IF;
9954: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
9955: FND_MESSAGE.SET_TOKEN('PARAMETERS',
9956: ' P_Prepay_Distribution_id = '||P_Prepay_Distribution_id||
9957: ' P_Calling_Sequence = '||P_Calling_Sequence);
9958: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
9959: END IF;
9960:
9961: IF ( prepay_pay_awt_group_id%ISOPEN ) THEN
9962: CLOSE prepay_pay_awt_group_id;
10234: RETURN TRUE;
10235: EXCEPTION
10236: WHEN OTHERS THEN
10237: IF (SQLCODE <> -20001) THEN
10238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10242: ' p_invoice_id = '||p_invoice_id||
10235: EXCEPTION
10236: WHEN OTHERS THEN
10237: IF (SQLCODE <> -20001) THEN
10238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10242: ' p_invoice_id = '||p_invoice_id||
10243: ' p_line_number = '||p_line_number);
10236: WHEN OTHERS THEN
10237: IF (SQLCODE <> -20001) THEN
10238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10242: ' p_invoice_id = '||p_invoice_id||
10243: ' p_line_number = '||p_line_number);
10244: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
10237: IF (SQLCODE <> -20001) THEN
10238: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10239: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10242: ' p_invoice_id = '||p_invoice_id||
10243: ' p_line_number = '||p_line_number);
10244: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
10245: p_error_code:=SQLCODE;
10240: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10241: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10242: ' p_invoice_id = '||p_invoice_id||
10243: ' p_line_number = '||p_line_number);
10244: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
10245: p_error_code:=SQLCODE;
10246: RETURN FALSE;
10247: END IF;
10248: END;
10366:
10367: EXCEPTION
10368: WHEN OTHERS THEN
10369: IF (SQLCODE <> -20001) THEN
10370: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10371: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10372: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10373: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10374: ' p_invoice_id = '||p_invoice_id||
10367: EXCEPTION
10368: WHEN OTHERS THEN
10369: IF (SQLCODE <> -20001) THEN
10370: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10371: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10372: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10373: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10374: ' p_invoice_id = '||p_invoice_id||
10375: ' p_line_number = '||p_line_number);
10368: WHEN OTHERS THEN
10369: IF (SQLCODE <> -20001) THEN
10370: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10371: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10372: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10373: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10374: ' p_invoice_id = '||p_invoice_id||
10375: ' p_line_number = '||p_line_number);
10376: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
10369: IF (SQLCODE <> -20001) THEN
10370: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10371: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10372: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10373: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10374: ' p_invoice_id = '||p_invoice_id||
10375: ' p_line_number = '||p_line_number);
10376: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
10377: RETURN FALSE;
10372: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10373: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10374: ' p_invoice_id = '||p_invoice_id||
10375: ' p_line_number = '||p_line_number);
10376: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
10377: RETURN FALSE;
10378: END IF;
10379: END Is_Incl_Tax_Driver_Updatable ;
10380:
10631: END IF ;
10632: EXCEPTION
10633: WHEN OTHERS THEN
10634: IF (SQLCODE <> -20001) THEN
10635: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10636: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10637: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10638: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10639: 'p_invoice_id = ' || p_invoice_id ||
10632: EXCEPTION
10633: WHEN OTHERS THEN
10634: IF (SQLCODE <> -20001) THEN
10635: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10636: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10637: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10638: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10639: 'p_invoice_id = ' || p_invoice_id ||
10640: ', p_default_dist_ccid = ' || p_default_dist_ccid ||
10633: WHEN OTHERS THEN
10634: IF (SQLCODE <> -20001) THEN
10635: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10636: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10637: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10638: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10639: 'p_invoice_id = ' || p_invoice_id ||
10640: ', p_default_dist_ccid = ' || p_default_dist_ccid ||
10641: ', p_match_type = ' || p_match_type ||
10634: IF (SQLCODE <> -20001) THEN
10635: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
10636: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
10637: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
10638: FND_MESSAGE.SET_TOKEN('PARAMETERS',
10639: 'p_invoice_id = ' || p_invoice_id ||
10640: ', p_default_dist_ccid = ' || p_default_dist_ccid ||
10641: ', p_match_type = ' || p_match_type ||
10642: ', p_po_line_location_id = ' || p_po_line_location_id ||
10647: ', p_reference_key1 = ' || p_reference_key1 ||
10648: ', p_reference_key2 = ' || p_reference_key2 ||
10649: ', p_invoice_line_number = ' || p_invoice_line_number ||
10650: ', p_distribution_set_id = ' || p_distribution_set_id );
10651: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
10652: END IF;
10653:
10654: END Get_Default_CCID ;
10655:
11189:
11190: --Bug15914464: End
11191:
11192: IF (l_msg_data is not null) THEN
11193: Fnd_Message.Set_Name(l_msg_application, l_msg_data);
11194:
11195: IF (l_msg_token1 IS NOT NULL) THEN
11196: fnd_message.set_token('PATC_MSG_TOKEN1',l_msg_token1);
11197: ELSE
11192: IF (l_msg_data is not null) THEN
11193: Fnd_Message.Set_Name(l_msg_application, l_msg_data);
11194:
11195: IF (l_msg_token1 IS NOT NULL) THEN
11196: fnd_message.set_token('PATC_MSG_TOKEN1',l_msg_token1);
11197: ELSE
11198: fnd_message.set_token('PATC_MSG_TOKEN1',FND_API.G_MISS_CHAR);
11199: END IF;
11200:
11194:
11195: IF (l_msg_token1 IS NOT NULL) THEN
11196: fnd_message.set_token('PATC_MSG_TOKEN1',l_msg_token1);
11197: ELSE
11198: fnd_message.set_token('PATC_MSG_TOKEN1',FND_API.G_MISS_CHAR);
11199: END IF;
11200:
11201: IF (l_msg_token2 IS NOT NULL) THEN
11202: fnd_message.set_token('PATC_MSG_TOKEN2',l_msg_token2);
11198: fnd_message.set_token('PATC_MSG_TOKEN1',FND_API.G_MISS_CHAR);
11199: END IF;
11200:
11201: IF (l_msg_token2 IS NOT NULL) THEN
11202: fnd_message.set_token('PATC_MSG_TOKEN2',l_msg_token2);
11203: ELSE
11204: fnd_message.set_token('PATC_MSG_TOKEN2',FND_API.G_MISS_CHAR);
11205: END IF;
11206:
11200:
11201: IF (l_msg_token2 IS NOT NULL) THEN
11202: fnd_message.set_token('PATC_MSG_TOKEN2',l_msg_token2);
11203: ELSE
11204: fnd_message.set_token('PATC_MSG_TOKEN2',FND_API.G_MISS_CHAR);
11205: END IF;
11206:
11207: IF (l_msg_token3 IS NOT NULL) THEN
11208: fnd_message.set_token('PATC_MSG_TOKEN3',l_msg_token3);
11204: fnd_message.set_token('PATC_MSG_TOKEN2',FND_API.G_MISS_CHAR);
11205: END IF;
11206:
11207: IF (l_msg_token3 IS NOT NULL) THEN
11208: fnd_message.set_token('PATC_MSG_TOKEN3',l_msg_token3);
11209: ELSE
11210: fnd_message.set_token('PATC_MSG_TOKEN3',FND_API.G_MISS_CHAR);
11211: END IF;
11212: --l_message_text := Fnd_Message.get;
11206:
11207: IF (l_msg_token3 IS NOT NULL) THEN
11208: fnd_message.set_token('PATC_MSG_TOKEN3',l_msg_token3);
11209: ELSE
11210: fnd_message.set_token('PATC_MSG_TOKEN3',FND_API.G_MISS_CHAR);
11211: END IF;
11212: --l_message_text := Fnd_Message.get;
11213:
11214: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11208: fnd_message.set_token('PATC_MSG_TOKEN3',l_msg_token3);
11209: ELSE
11210: fnd_message.set_token('PATC_MSG_TOKEN3',FND_API.G_MISS_CHAR);
11211: END IF;
11212: --l_message_text := Fnd_Message.get;
11213:
11214: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
11215: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'GET_CCID_FROM_PROJECTS' ,'Error in PA VALIDATE TRANSACTION');
11216: END IF;
11451:
11452: EXCEPTION
11453: WHEN OTHERS THEN
11454: IF (SQLCODE <> -20001) THEN
11455: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
11456: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
11457: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
11458: FND_MESSAGE.SET_TOKEN('PARAMETERS',
11459: ' p_invoice_id = '||p_invoice_id||
11452: EXCEPTION
11453: WHEN OTHERS THEN
11454: IF (SQLCODE <> -20001) THEN
11455: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
11456: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
11457: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
11458: FND_MESSAGE.SET_TOKEN('PARAMETERS',
11459: ' p_invoice_id = '||p_invoice_id||
11460: ' p_line_number = '||p_line_number);
11453: WHEN OTHERS THEN
11454: IF (SQLCODE <> -20001) THEN
11455: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
11456: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
11457: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
11458: FND_MESSAGE.SET_TOKEN('PARAMETERS',
11459: ' p_invoice_id = '||p_invoice_id||
11460: ' p_line_number = '||p_line_number);
11461: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
11454: IF (SQLCODE <> -20001) THEN
11455: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
11456: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
11457: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
11458: FND_MESSAGE.SET_TOKEN('PARAMETERS',
11459: ' p_invoice_id = '||p_invoice_id||
11460: ' p_line_number = '||p_line_number);
11461: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
11462: RETURN FALSE;
11457: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_curr_calling_sequence);
11458: FND_MESSAGE.SET_TOKEN('PARAMETERS',
11459: ' p_invoice_id = '||p_invoice_id||
11460: ' p_line_number = '||p_line_number);
11461: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
11462: RETURN FALSE;
11463: END IF;
11464: END IS_LINE_POSTED_ENCUMBERED;
11465: