[Home] [Help]
388:
389: cursor get_result
390: is
391: --select get_natural_account(dist_code_combination_id)
392: select JAI_AP_UTILS_PKG.GET_NATURAL_ACCOUNT_VALUE(dist_code_combination_id,pv_segment_name)
393: from ap_invoice_distributions_all
394: where invoice_id = pn_invoice_id
395: and invoice_distribution_id = pn_invoice_distribution_id;
396:
3375: open c_get_inv_info(p_invoice_id);
3376: fetch c_get_inv_info into ln_legal_entity_id,ln_set_book_id;
3377: close c_get_inv_info;
3378:
3379: lv_segment_name := JAI_AP_UTILS_PKG.GET_NATURAL_ACCOUNT(ln_set_book_id,ln_legal_entity_id);
3380:
3381:
3382: open get_invoice_type(p_invoice_id);
3383: fetch get_invoice_type into lv_invoice_type;
4315: -- fetch get_first_dist_ccid into ln_ccid;
4316: -- close get_first_dist_ccid;
4317: p_get_one_ccid_id(p_invoice_id,ln_ccid);
4318:
4319: lv_natural_account := JAI_AP_UTILS_PKG.GET_NATURAL_ACCOUNT_VALUE(ln_ccid,lv_segment_name);
4320:
4321:
4322:
4323: open c_get_multiple_rate_setup(ln_threshold_hdr_id);
6300: if lv_invoice_to_tds_num is not null and lv_invoice_to_tds_type is not null and NVL(ln_invoice_to_tds_amount,0) <> 0 then
6301:
6302: /* Generate the Invoice for the TDS authority - always in functional currency - INR */
6303:
6304: jai_ap_utils_pkg.insert_ap_inv_interface
6305: (
6306: p_jai_source => lv_this_procedure,
6307: p_invoice_id => ln_invoice_to_tds_id,
6308: p_invoice_num => lv_invoice_to_tds_num,
6336: p_Calc_Tax_During_Import_Flag => 'Y' --Added by Qiong for AP Open Interface
6337: );
6338:
6339: /* Lines Interface */
6340: jai_ap_utils_pkg.insert_ap_inv_lines_interface
6341: (
6342: p_jai_source => lv_this_procedure,
6343: p_invoice_id => ln_invoice_to_tds_id,
6344: p_invoice_line_id => ln_invoice_to_tds_line_id,
6429: fnd_file.put_line(FND_FILE.LOG, ' CALL utils for inserting interface lines');
6430:
6431: /*Bug 9759709 - Liability Account for the Credit Note must be fetched from the Standard Invoice
6432: If it is not present, then it needs to be defaulted from Vendor Site Setup. Passing NULL to
6433: parameter p_accts_pay_ccid in jai_ap_utils_pkg.insert_ap_inv_interface would cause it to default
6434: from setup*/
6435: if (r_ap_invoices_all.accts_pay_code_combination_id is not NULL) then
6436: ln_accts_pay_ccid := r_ap_invoices_all.accts_pay_code_combination_id;
6437: else
6439: end if;
6440:
6441: IF NVL(ln_invoice_to_vendor_amount,0) <> 0 THEN --condition added by bgowrava for bug#4549019
6442: /* Invoices Interface */
6443: jai_ap_utils_pkg.insert_ap_inv_interface
6444: (
6445: p_jai_source => lv_this_procedure,
6446: p_invoice_id => ln_invoice_to_vendor_id,
6447: p_invoice_num => lv_invoice_to_vendor_num,
6479: p_Calc_Tax_During_Import_Flag => 'Y' --Added by Qiong for AP Open Interface
6480: );
6481:
6482: /* Lines Interface */
6483: jai_ap_utils_pkg.insert_ap_inv_lines_interface
6484: (
6485: p_jai_source => lv_this_procedure,
6486: p_invoice_id => ln_invoice_to_vendor_id,
6487: p_invoice_line_id => ln_invoice_to_vendor_line_id,
7380: --fnd_file.put_line(FND_FILE.LOG, ' CALL utils for inserting interface lines');
7381:
7382: /*Bug 9759709 - Liability Account for the Credit Note must be fetched from the Standard Invoice
7383: If it is not present, then it needs to be defaulted from Vendor Site Setup. Passing NULL to
7384: parameter p_accts_pay_ccid in jai_ap_utils_pkg.insert_ap_inv_interface would cause it to default
7385: from setup*/
7386: if (r_ap_invoices_all.accts_pay_code_combination_id is not NULL) then
7387: ln_accts_pay_ccid := r_ap_invoices_all.accts_pay_code_combination_id;
7388: else
7480: if lv_invoice_to_tds_num is not null and lv_invoice_to_tds_type is not null and NVL(ln_invoice_to_tds_amount,0) <> 0 then
7481:
7482:
7483: if(ln_count = 1)then
7484: jai_ap_utils_pkg.insert_ap_inv_interface
7485: (
7486: p_jai_source => lv_this_procedure,
7487: p_invoice_id => ln_invoice_to_tds_id,
7488: p_invoice_num => lv_invoice_to_tds_num,
7518:
7519: ln_tax_amt_for_each := round(ln_invoice_to_tds_amount * ln_tax_amt_tax_type/ln_tax_amt_all,g_inr_currency_rounding);
7520:
7521:
7522: jai_ap_utils_pkg.insert_ap_inv_lines_interface
7523: (
7524: p_jai_source => lv_this_procedure,
7525: p_invoice_id => ln_invoice_to_tds_id,
7526: p_invoice_line_id => ln_invoice_to_tds_line_id,
7562:
7563:
7564: /* Invoices Interface */
7565: if(ln_count = 1)then
7566: jai_ap_utils_pkg.insert_ap_inv_interface
7567: (
7568: p_jai_source => lv_this_procedure,
7569: p_invoice_id => ln_invoice_to_vendor_id,
7570: p_invoice_num => lv_invoice_to_vendor_num,
7611:
7612: ln_amt_for_each := round(ln_invoice_to_vendor_amount * ln_tax_amt_tax_type/ln_tax_amt_all,g_inr_currency_rounding);
7613:
7614:
7615: jai_ap_utils_pkg.insert_ap_inv_lines_interface
7616: (
7617: p_jai_source => lv_this_procedure,
7618: p_invoice_id => ln_invoice_to_vendor_id,
7619: p_invoice_line_id => ln_invoice_to_vendor_line_id,
8019: open c_ap_invoices_all(p_invoice_id);
8020: fetch c_ap_invoices_all into r_ap_invoices_all;
8021: close c_ap_invoices_all;
8022:
8023: lv_batch_name := jai_ap_utils_pkg.get_tds_invoice_batch(p_invoice_id, r_ap_invoices_all.org_id); --Ramananda for bug#4584221 --added org_id parameter for Bug#9149941
8024: /*Comment for bug#15915537 TDS Performance ER on 26-Nov-2012 by Qimeng begin
8025: ln_import_request_id :=
8026: fnd_request.submit_request
8027: (
9236: INTO lv_set_of_book_id
9237: ,lv_legal_entity_id;
9238: CLOSE cur_get_invoice_info;
9239:
9240: lv_natural_account_segment := jai_ap_utils_pkg.get_natural_account(lv_set_of_book_id,lv_legal_entity_id);
9241: lv_natural_account := jai_ap_utils_pkg.GET_NATURAL_ACCOUNT_VALUE(r_CCID
9242: ,lv_natural_account_segment);
9243: --Get slab info by natrual account and threshold_hdr_id
9244: OPEN c_get_tds_thhold_slabs_byNt(p_threshold_hdr_id
9237: ,lv_legal_entity_id;
9238: CLOSE cur_get_invoice_info;
9239:
9240: lv_natural_account_segment := jai_ap_utils_pkg.get_natural_account(lv_set_of_book_id,lv_legal_entity_id);
9241: lv_natural_account := jai_ap_utils_pkg.GET_NATURAL_ACCOUNT_VALUE(r_CCID
9242: ,lv_natural_account_segment);
9243: --Get slab info by natrual account and threshold_hdr_id
9244: OPEN c_get_tds_thhold_slabs_byNt(p_threshold_hdr_id
9245: ,lv_natural_account
10691: --fnd_file.put_line(FND_FILE.LOG, ' CALL utils for inserting interface lines');
10692:
10693: /*Bug 9759709 - Liability Account for the Credit Note must be fetched from the Standard Invoice
10694: If it is not present, then it needs to be defaulted from Vendor Site Setup. Passing NULL to
10695: parameter p_accts_pay_ccid in jai_ap_utils_pkg.insert_ap_inv_interface would cause it to default
10696: from setup*/
10697: if (r_ap_invoices_all.accts_pay_code_combination_id is not NULL) then
10698: ln_accts_pay_ccid := r_ap_invoices_all.accts_pay_code_combination_id;
10699: else
10764:
10765: end if;
10766:
10767:
10768: jai_ap_utils_pkg.insert_ap_inv_interface
10769: (
10770: p_jai_source => lv_this_procedure,
10771: p_invoice_id => ln_invoice_to_tds_id,
10772: p_invoice_num => lv_invoice_to_tds_num,
10803: close get_amt_for_tax_account;
10804:
10805: ln_tax_amt_for_each := round(ln_invoice_to_tds_amount * ln_amt_tax_code/ln_tax_amt_all,g_inr_currency_rounding);
10806:
10807: jai_ap_utils_pkg.insert_ap_inv_lines_interface
10808: (
10809: p_jai_source => lv_this_procedure,
10810: p_invoice_id => ln_invoice_to_tds_id,
10811: p_invoice_line_id => ln_invoice_to_tds_line_id,
10858: IF NVL(ln_invoice_to_vendor_amount,0) <> 0 THEN
10859:
10860: /*Bug 9759709 - Liability Account for the Credit Note must be fetched from the Standard Invoice
10861: If it is not present, then it needs to be defaulted from Vendor Site Setup. Passing NULL to
10862: parameter p_accts_pay_ccid in jai_ap_utils_pkg.insert_ap_inv_interface would cause it to default
10863: from setup*/
10864: /*there will be only one liability Account in one threshold group*/
10865: if (r_ap_invoices_all.accts_pay_code_combination_id is not NULL) then
10866: ln_accts_pay_ccid := r_ap_invoices_all.accts_pay_code_combination_id;
10868: ln_accts_pay_ccid := NULL;
10869: end if;
10870: /* Invoices Interface */
10871: if(ln_count = 1)then
10872: jai_ap_utils_pkg.insert_ap_inv_interface
10873: (
10874: p_jai_source => lv_this_procedure,
10875: p_invoice_id => ln_invoice_to_vendor_id,
10876: p_invoice_num => lv_invoice_to_vendor_num,
10908: /* Lines Interface */
10909: ln_amt_for_each := round(ln_invoice_to_vendor_amount * ln_amt_tax_code/ln_tax_amt_all,g_inr_currency_rounding);
10910:
10911:
10912: jai_ap_utils_pkg.insert_ap_inv_lines_interface
10913: (
10914: p_jai_source => lv_this_procedure,
10915: p_invoice_id => ln_invoice_to_vendor_id,
10916: p_invoice_line_id => ln_invoice_to_vendor_line_id,