[Home] [Help]
1: PACKAGE BODY AP_QUICK_CREDIT_PKG AS
2: /* $Header: apqkcreb.pls 120.12 2006/04/13 07:48:26 sfeng noship $ */
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;
527: ----------------------------------------------------------------------------
528: l_line_number := AP_INVOICES_PKG.get_max_line_number(P_invoice_id)+1;
529:
530: BEGIN
531: INSERT INTO ap_invoice_lines_all(
532: invoice_id,
533: line_number,
534: line_type_lookup_code,
535: requester_id,
1205: WHERE invoice_id = P_Credited_Invoice_Id;
1206:
1207: CURSOR Invoice_Lines IS
1208: SELECT *
1209: FROM ap_invoice_lines_all
1210: WHERE invoice_id = P_Credited_Invoice_Id
1211: AND line_type_lookup_code <> 'TAX'
1212: AND (NVL(discarded_flag, 'N' ) <> 'Y'
1213: OR NVL(cancelled_flag, 'N' ) <> 'Y')