150:
151: EXCEPTION
152: WHEN OTHERS THEN
153: If (SQLCODE <> -20001) Then
154: fnd_message.set_name('SQLAP','AP_DEBUG');
155: fnd_message.set_token('ERROR',SQLERRM);
156: fnd_message.set_token('DEBUG_INFO',debug_info);
157: End if;
158: app_exception.raise_exception;
151: EXCEPTION
152: WHEN OTHERS THEN
153: If (SQLCODE <> -20001) Then
154: fnd_message.set_name('SQLAP','AP_DEBUG');
155: fnd_message.set_token('ERROR',SQLERRM);
156: fnd_message.set_token('DEBUG_INFO',debug_info);
157: End if;
158: app_exception.raise_exception;
159:
152: WHEN OTHERS THEN
153: If (SQLCODE <> -20001) Then
154: fnd_message.set_name('SQLAP','AP_DEBUG');
155: fnd_message.set_token('ERROR',SQLERRM);
156: fnd_message.set_token('DEBUG_INFO',debug_info);
157: End if;
158: app_exception.raise_exception;
159:
160: END Initialize;
848: END IF;
849:
850: EXCEPTION WHEN OTHERS THEN
851: IF (SQLCODE <> -20001) THEN
852: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
853: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
854: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
855: FND_MESSAGE.SET_TOKEN('PARAMETERS',
856: 'P_invoice_id = ' || P_invoice_id
849:
850: EXCEPTION WHEN OTHERS THEN
851: IF (SQLCODE <> -20001) THEN
852: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
853: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
854: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
855: FND_MESSAGE.SET_TOKEN('PARAMETERS',
856: 'P_invoice_id = ' || P_invoice_id
857: ||'P_invoice_line_number = '||P_invoice_line_number);
850: EXCEPTION WHEN OTHERS THEN
851: IF (SQLCODE <> -20001) THEN
852: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
853: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
854: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
855: FND_MESSAGE.SET_TOKEN('PARAMETERS',
856: 'P_invoice_id = ' || P_invoice_id
857: ||'P_invoice_line_number = '||P_invoice_line_number);
858: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
851: IF (SQLCODE <> -20001) THEN
852: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
853: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
854: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
855: FND_MESSAGE.SET_TOKEN('PARAMETERS',
856: 'P_invoice_id = ' || P_invoice_id
857: ||'P_invoice_line_number = '||P_invoice_line_number);
858: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
859:
854: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
855: FND_MESSAGE.SET_TOKEN('PARAMETERS',
856: 'P_invoice_id = ' || P_invoice_id
857: ||'P_invoice_line_number = '||P_invoice_line_number);
858: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
859:
860: If (Invoice_Lines_Cur%ISOPEN) Then
861: Close Invoice_Lines_Cur;
862: End if;
1562:
1563: RETURN(TRUE);
1564:
1565: EXCEPTION WHEN OTHERS THEN
1566: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1567: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1568: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1569: l_curr_calling_sequence);
1570: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1563: RETURN(TRUE);
1564:
1565: EXCEPTION WHEN OTHERS THEN
1566: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1567: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1568: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1569: l_curr_calling_sequence);
1570: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1571: 'P_INVOICE_ID = '||P_INVOICE_ID
1564:
1565: EXCEPTION WHEN OTHERS THEN
1566: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1567: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1568: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1569: l_curr_calling_sequence);
1570: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1571: 'P_INVOICE_ID = '||P_INVOICE_ID
1572: ||', P_INVOICE_LINE_NUMBER = '||P_INVOICE_LINE_NUMBER
1566: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1567: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1568: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1569: l_curr_calling_sequence);
1570: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1571: 'P_INVOICE_ID = '||P_INVOICE_ID
1572: ||', P_INVOICE_LINE_NUMBER = '||P_INVOICE_LINE_NUMBER
1573: ||', P_AMOUNT_TO_RECOUP = '||P_AMOUNT_TO_RECOUP
1574: ||', P_USER_ID = '||P_USER_ID
1573: ||', P_AMOUNT_TO_RECOUP = '||P_AMOUNT_TO_RECOUP
1574: ||', P_USER_ID = '||P_USER_ID
1575: ||', P_LAST_UPDATE_LOGIN = '||P_LAST_UPDATE_LOGIN);
1576:
1577: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1578:
1579: APP_EXCEPTION.RAISE_EXCEPTION;
1580: END Ap_Recoup_Invoice_Line;
1581:
2196: END IF; /* l_match_mode = 'STD-PS' OR l_total_match_quantity > 0 OR ... */
2197:
2198: EXCEPTION WHEN OTHERS THEN
2199: IF (SQLCODE <> -20001) THEN
2200: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2201: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2202: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2203: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2204: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2197:
2198: EXCEPTION WHEN OTHERS THEN
2199: IF (SQLCODE <> -20001) THEN
2200: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2201: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2202: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2203: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2204: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2205: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2198: EXCEPTION WHEN OTHERS THEN
2199: IF (SQLCODE <> -20001) THEN
2200: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2201: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2202: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2203: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2204: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2205: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2206: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2199: IF (SQLCODE <> -20001) THEN
2200: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2201: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2202: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2203: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2204: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2205: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2206: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2207: END IF;
2202: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2203: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2204: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2205: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2206: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2207: END IF;
2208: APP_EXCEPTION.RAISE_EXCEPTION;
2209:
2210: END Match_To_Rcv_Shipment_Line;
2388:
2389:
2390: EXCEPTION WHEN OTHERS THEN
2391: IF (SQLCODE <> -20001) THEN
2392: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2393: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2394: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2395: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2396: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2389:
2390: EXCEPTION WHEN OTHERS THEN
2391: IF (SQLCODE <> -20001) THEN
2392: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2393: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2394: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2395: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2396: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2397: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2390: EXCEPTION WHEN OTHERS THEN
2391: IF (SQLCODE <> -20001) THEN
2392: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2393: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2394: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2395: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2396: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2397: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2398: END IF;
2391: IF (SQLCODE <> -20001) THEN
2392: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2393: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2394: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2395: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2396: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2397: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2398: END IF;
2399: APP_EXCEPTION.RAISE_EXCEPTION;
2393: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2394: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2395: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2396: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2397: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2398: END IF;
2399: APP_EXCEPTION.RAISE_EXCEPTION;
2400:
2401: END;