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;
891: END IF;
892:
893: EXCEPTION WHEN OTHERS THEN
894: IF (SQLCODE <> -20001) THEN
895: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
896: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
897: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
898: FND_MESSAGE.SET_TOKEN('PARAMETERS',
899: 'P_invoice_id = ' || P_invoice_id
892:
893: EXCEPTION WHEN OTHERS THEN
894: IF (SQLCODE <> -20001) THEN
895: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
896: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
897: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
898: FND_MESSAGE.SET_TOKEN('PARAMETERS',
899: 'P_invoice_id = ' || P_invoice_id
900: ||'P_invoice_line_number = '||P_invoice_line_number);
893: EXCEPTION WHEN OTHERS THEN
894: IF (SQLCODE <> -20001) THEN
895: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
896: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
897: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
898: FND_MESSAGE.SET_TOKEN('PARAMETERS',
899: 'P_invoice_id = ' || P_invoice_id
900: ||'P_invoice_line_number = '||P_invoice_line_number);
901: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
894: IF (SQLCODE <> -20001) THEN
895: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
896: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
897: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
898: FND_MESSAGE.SET_TOKEN('PARAMETERS',
899: 'P_invoice_id = ' || P_invoice_id
900: ||'P_invoice_line_number = '||P_invoice_line_number);
901: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
902:
897: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
898: FND_MESSAGE.SET_TOKEN('PARAMETERS',
899: 'P_invoice_id = ' || P_invoice_id
900: ||'P_invoice_line_number = '||P_invoice_line_number);
901: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
902:
903: If (Invoice_Lines_Cur%ISOPEN) Then
904: Close Invoice_Lines_Cur;
905: End if;
1628:
1629: RETURN(TRUE);
1630:
1631: EXCEPTION WHEN OTHERS THEN
1632: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1633: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1634: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1635: l_curr_calling_sequence);
1636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1629: RETURN(TRUE);
1630:
1631: EXCEPTION WHEN OTHERS THEN
1632: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1633: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1634: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1635: l_curr_calling_sequence);
1636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1637: 'P_INVOICE_ID = '||P_INVOICE_ID
1630:
1631: EXCEPTION WHEN OTHERS THEN
1632: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1633: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1634: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1635: l_curr_calling_sequence);
1636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1637: 'P_INVOICE_ID = '||P_INVOICE_ID
1638: ||', P_INVOICE_LINE_NUMBER = '||P_INVOICE_LINE_NUMBER
1632: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1633: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1634: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
1635: l_curr_calling_sequence);
1636: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1637: 'P_INVOICE_ID = '||P_INVOICE_ID
1638: ||', P_INVOICE_LINE_NUMBER = '||P_INVOICE_LINE_NUMBER
1639: ||', P_AMOUNT_TO_RECOUP = '||P_AMOUNT_TO_RECOUP
1640: ||', P_USER_ID = '||P_USER_ID
1639: ||', P_AMOUNT_TO_RECOUP = '||P_AMOUNT_TO_RECOUP
1640: ||', P_USER_ID = '||P_USER_ID
1641: ||', P_LAST_UPDATE_LOGIN = '||P_LAST_UPDATE_LOGIN);
1642:
1643: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1644:
1645: APP_EXCEPTION.RAISE_EXCEPTION;
1646: END Ap_Recoup_Invoice_Line;
1647:
2264: END IF; /* l_match_mode = 'STD-PS' OR l_total_match_quantity > 0 OR ... */
2265:
2266: EXCEPTION WHEN OTHERS THEN
2267: IF (SQLCODE <> -20001) THEN
2268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2272: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2265:
2266: EXCEPTION WHEN OTHERS THEN
2267: IF (SQLCODE <> -20001) THEN
2268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2272: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2273: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2266: EXCEPTION WHEN OTHERS THEN
2267: IF (SQLCODE <> -20001) THEN
2268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2272: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2273: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2274: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2267: IF (SQLCODE <> -20001) THEN
2268: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2269: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2272: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2273: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2274: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2275: END IF;
2270: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2271: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2272: ' X_Invoice_Id = '||TO_CHAR(P_Invoice_id)
2273: ||', X_Invoice_Line_Number = '||TO_CHAR(P_Invoice_Line_Number));
2274: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2275: END IF;
2276: APP_EXCEPTION.RAISE_EXCEPTION;
2277:
2278: END Match_To_Rcv_Shipment_Line;
2460:
2461:
2462: EXCEPTION WHEN OTHERS THEN
2463: IF (SQLCODE <> -20001) THEN
2464: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2465: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2466: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2467: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2468: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2461:
2462: EXCEPTION WHEN OTHERS THEN
2463: IF (SQLCODE <> -20001) THEN
2464: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2465: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2466: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2467: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2468: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2469: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2462: EXCEPTION WHEN OTHERS THEN
2463: IF (SQLCODE <> -20001) THEN
2464: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2465: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2466: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2467: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2468: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2469: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2470: END IF;
2463: IF (SQLCODE <> -20001) THEN
2464: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2465: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2466: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2467: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2468: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2469: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2470: END IF;
2471: APP_EXCEPTION.RAISE_EXCEPTION;
2465: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2466: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2467: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2468: ' p_rcv_shipment_line_id = '||TO_CHAR(p_rcv_shipment_line_id));
2469: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2470: END IF;
2471: APP_EXCEPTION.RAISE_EXCEPTION;
2472:
2473: END;
2614:
2615: -- Bug 14069839. Added modified exception block.
2616: EXCEPTION WHEN OTHERS THEN
2617: IF (SQLCODE <> -20001) THEN
2618: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2619: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2620: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2621: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2622: ' p_line_location_id = '||TO_CHAR(p_line_location_id) ||
2615: -- Bug 14069839. Added modified exception block.
2616: EXCEPTION WHEN OTHERS THEN
2617: IF (SQLCODE <> -20001) THEN
2618: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2619: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2620: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2621: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2622: ' p_line_location_id = '||TO_CHAR(p_line_location_id) ||
2623: ' ,l_po_distribution_id = ' || l_po_distribution_id);
2616: EXCEPTION WHEN OTHERS THEN
2617: IF (SQLCODE <> -20001) THEN
2618: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2619: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2620: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2621: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2622: ' p_line_location_id = '||TO_CHAR(p_line_location_id) ||
2623: ' ,l_po_distribution_id = ' || l_po_distribution_id);
2624: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2617: IF (SQLCODE <> -20001) THEN
2618: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2619: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2620: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2621: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2622: ' p_line_location_id = '||TO_CHAR(p_line_location_id) ||
2623: ' ,l_po_distribution_id = ' || l_po_distribution_id);
2624: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2625: END IF;
2620: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',l_current_calling_sequence);
2621: FND_MESSAGE.SET_TOKEN('PARAMETERS',
2622: ' p_line_location_id = '||TO_CHAR(p_line_location_id) ||
2623: ' ,l_po_distribution_id = ' || l_po_distribution_id);
2624: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2625: END IF;
2626: APP_EXCEPTION.RAISE_EXCEPTION;
2627:
2628: END Is_Proj_Exp_Item_Date_Valid;