620: round ((((x_line_amount - x_included_tax_amount) * aid.amount/p_proration_total)/
621: g_min_acct_unit) * g_min_acct_unit)
622: ) ,
623:
624: ap_invoice_distributions_s.nextval
625: FROM ap_invoice_lines ail,
626: ap_invoice_distributions aid
627: WHERE ail.invoice_id = x_corrected_invoice_id
628: AND ail.line_number = x_corrected_line_number
622: ) ,
623:
624: ap_invoice_distributions_s.nextval
625: FROM ap_invoice_lines ail,
626: ap_invoice_distributions aid
627: WHERE ail.invoice_id = x_corrected_invoice_id
628: AND ail.line_number = x_corrected_line_number
629: AND aid.invoice_id = ail.invoice_id
630: AND aid.invoice_line_number = ail.line_number
636: --Introduced below condition for bug#9010485
637: AND nvl(aid.reversal_flag,'N') = 'N';
638:
639:
640: l_corrected_inv_dist_id ap_invoice_distributions.invoice_distribution_id%TYPE;
641: l_invoice_distribution_id ap_invoice_distributions.invoice_distribution_id%TYPE;
642: l_amount ap_invoice_distributions.amount%TYPE;
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
637: AND nvl(aid.reversal_flag,'N') = 'N';
638:
639:
640: l_corrected_inv_dist_id ap_invoice_distributions.invoice_distribution_id%TYPE;
641: l_invoice_distribution_id ap_invoice_distributions.invoice_distribution_id%TYPE;
642: l_amount ap_invoice_distributions.amount%TYPE;
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
645: l_sum_prorated_amount ap_invoice_distributions.amount%TYPE := 0;
638:
639:
640: l_corrected_inv_dist_id ap_invoice_distributions.invoice_distribution_id%TYPE;
641: l_invoice_distribution_id ap_invoice_distributions.invoice_distribution_id%TYPE;
642: l_amount ap_invoice_distributions.amount%TYPE;
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
645: l_sum_prorated_amount ap_invoice_distributions.amount%TYPE := 0;
646: l_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
639:
640: l_corrected_inv_dist_id ap_invoice_distributions.invoice_distribution_id%TYPE;
641: l_invoice_distribution_id ap_invoice_distributions.invoice_distribution_id%TYPE;
642: l_amount ap_invoice_distributions.amount%TYPE;
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
645: l_sum_prorated_amount ap_invoice_distributions.amount%TYPE := 0;
646: l_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
647: l_sum_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
640: l_corrected_inv_dist_id ap_invoice_distributions.invoice_distribution_id%TYPE;
641: l_invoice_distribution_id ap_invoice_distributions.invoice_distribution_id%TYPE;
642: l_amount ap_invoice_distributions.amount%TYPE;
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
645: l_sum_prorated_amount ap_invoice_distributions.amount%TYPE := 0;
646: l_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
647: l_sum_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
648: i NUMBER;
641: l_invoice_distribution_id ap_invoice_distributions.invoice_distribution_id%TYPE;
642: l_amount ap_invoice_distributions.amount%TYPE;
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
645: l_sum_prorated_amount ap_invoice_distributions.amount%TYPE := 0;
646: l_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
647: l_sum_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
648: i NUMBER;
649: l_debug_info VARCHAR2(100);
642: l_amount ap_invoice_distributions.amount%TYPE;
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
645: l_sum_prorated_amount ap_invoice_distributions.amount%TYPE := 0;
646: l_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
647: l_sum_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
648: i NUMBER;
649: l_debug_info VARCHAR2(100);
650: current_calling_sequence VARCHAR2(2000);
643: l_max_dist_amount ap_invoice_distributions.amount%TYPE := 0;
644: l_rounding_index ap_invoice_distributions.invoice_distribution_id%TYPE;
645: l_sum_prorated_amount ap_invoice_distributions.amount%TYPE := 0;
646: l_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
647: l_sum_base_amount ap_invoice_distributions.base_amount%TYPE := 0;
648: i NUMBER;
649: l_debug_info VARCHAR2(100);
650: current_calling_sequence VARCHAR2(2000);
651: l_api_name VARCHAR2(30);
780: l_debug_info := 'Get the total dist proration total';
781:
782: SELECT sum(aid.amount)
783: INTO l_dist_total
784: FROM ap_invoice_distributions_all aid
785: WHERE aid.invoice_id = x_corrected_invoice_id
786: AND aid.invoice_line_number = x_corrected_line_number
787: --Modified below condition for bug#10410133
788: --from " = 'ITEM' to in ('ITEM','FREIGHT','MISCELLANEOUS')"
1347: X_Calling_Sequence IN VARCHAR2) IS
1348: l_distribution_line_number NUMBER := 1;
1349: l_rounding_amount NUMBER;
1350: l_sum_prorated_amount NUMBER := 0;
1351: l_rounded_index ap_invoice_distributions.invoice_distribution_id%type;
1352: i NUMBER;
1353: l_max_dist_amount NUMBER := 0;
1354: l_max_distribution_id ap_invoice_distributions.invoice_distribution_id%type;
1355: l_debug_info VARCHAR2(100);
1350: l_sum_prorated_amount NUMBER := 0;
1351: l_rounded_index ap_invoice_distributions.invoice_distribution_id%type;
1352: i NUMBER;
1353: l_max_dist_amount NUMBER := 0;
1354: l_max_distribution_id ap_invoice_distributions.invoice_distribution_id%type;
1355: l_debug_info VARCHAR2(100);
1356: current_calling_sequence VARCHAR2(2000);
1357: l_api_name VARCHAR2(30);
1358:
1380: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1381: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1382: END IF;
1383:
1384: INSERT INTO ap_invoice_distributions(
1385: batch_id,
1386: invoice_id,
1387: invoice_line_number,
1388: invoice_distribution_id,
1541: SELECT g_batch_id, --batch_id
1542: x_invoice_id, --invoice_id
1543: x_invoice_line_number, --invoice_line_number
1544: NVL(x_dist_tab(i).invoice_distribution_id,
1545: ap_invoice_distributions_s.nextval), --invoice_distribution_id
1546: l_distribution_line_number, --distribution_line_number
1547: aid.line_type_lookup_code, --line_type_lookup_code
1548: --Modified ail.item_description as description for bug#10200174
1549: ail.description, --description
1703: --ETAX: Invwkb
1704: aid.intended_use, --intended_use
1705: 'N',
1706: aid.pay_awt_group_id --pay_awt_group_id --bug13793337
1707: FROM ap_invoice_distributions aid,
1708: ap_invoice_lines ail,
1709: gl_code_combinations gcc
1710: WHERE ail.invoice_id = x_invoice_id
1711: AND ail.line_number = x_invoice_line_number