[Home] [Help]
1: PACKAGE BODY AP_QUICK_CREDIT_PKG AS
2: /* $Header: apqkcreb.pls 120.14.12020000.2 2013/02/08 11:27:27 sbonala ship $ */
3:
4: TYPE Inv_Line_Tab_Type IS TABLE OF ap_invoice_lines_all%ROWTYPE;
5:
6: /*=============================================================================
7: | FUNCTION - Validating_Rules()
8: |
290: IS
291: l_debug_info VARCHAR2(240);
292: l_curr_calling_sequence VARCHAR2(4000);
293: i BINARY_INTEGER := 0;
294: l_line_number ap_invoice_lines_all.line_number%TYPE;
295: l_period_name gl_period_statuses.period_name%TYPE := '';
296: l_line_source
297: ap_invoice_lines_all.line_source%TYPE := 'QUICK CREDIT';
298:
293: i BINARY_INTEGER := 0;
294: l_line_number ap_invoice_lines_all.line_number%TYPE;
295: l_period_name gl_period_statuses.period_name%TYPE := '';
296: l_line_source
297: ap_invoice_lines_all.line_source%TYPE := 'QUICK CREDIT';
298:
299: l_wfapproval_flag
300: ap_system_parameters_all.approval_workflow_flag%TYPE;
301: l_wfapproval_status ap_invoice_lines_all.wfapproval_status%TYPE;
297: ap_invoice_lines_all.line_source%TYPE := 'QUICK CREDIT';
298:
299: l_wfapproval_flag
300: ap_system_parameters_all.approval_workflow_flag%TYPE;
301: l_wfapproval_status ap_invoice_lines_all.wfapproval_status%TYPE;
302: l_key_value_list GL_CA_UTILITY_PKG.R_KEY_VALUE_ARR;
303:
304: l_Corr_Dist_Tab_Po AP_MATCHING_PKG.corr_dist_tab_type;
305: l_Corr_Dist_Tab_Rcv AP_MATCHING_PKG.corr_dist_tab_type;
541: ----------------------------------------------------------------------------
542: l_line_number := AP_INVOICES_PKG.get_max_line_number(P_invoice_id)+1;
543:
544: BEGIN
545: INSERT INTO ap_invoice_lines_all(
546: invoice_id,
547: line_number,
548: line_type_lookup_code,
549: requester_id,
1234: WHERE invoice_id = P_Credited_Invoice_Id;
1235:
1236: CURSOR Invoice_Lines IS
1237: SELECT *
1238: FROM ap_invoice_lines_all
1239: WHERE invoice_id = P_Credited_Invoice_Id
1240: AND line_type_lookup_code <> 'TAX'
1241: AND (NVL(discarded_flag, 'N' ) <> 'Y'
1242: OR NVL(cancelled_flag, 'N' ) <> 'Y')