[Home] [Help]
5507: */
5508: PROCEDURE populate_temp_table(
5509: pn_interface_line_id IN JAI_INTERFACE_LINES_ALL.INTERFACE_LINE_ID%TYPE,
5510: pn_customer_trx_id IN ra_customer_trx_all.customer_trx_id%type,
5511: pn_customer_trx_line_id IN jai_ar_trx_lines.customer_trx_line_id%type,
5512: pv_return_code OUT NOCOPY VARCHAR2,
5513: pv_return_message OUT NOCOPY VARCHAR2)
5514: IS
5515:
5682: FROM fnd_currencies
5683: WHERE currency_code = cp_currency_code;
5684: --added the function for bug#8310220
5685:
5686: CURSOR cur_get_jai_line_rec(pn_c_customer_trx_line_id in jai_ar_trx_lines.customer_trx_line_id%type) IS
5687: select
5688: CUSTOMER_TRX_LINE_ID ,
5689: CUSTOMER_TRX_ID ,
5690: INVENTORY_ITEM_ID ,
5698: LAST_UPDATED_BY ,
5699: LAST_UPDATE_LOGIN ,
5700: VAT_ASSESSABLE_VALUE ,
5701: GST_ASSESSABLE_VALUE
5702: from jai_ar_trx_lines
5703: where customer_trx_line_id = pn_c_customer_trx_line_id;
5704:
5705: get_jai_trx_line cur_get_jai_line_rec%rowtype;
5706:
6627: BEGIN
6628:
6629: SELECT COUNT(lines.customer_trx_id)
6630: INTO ln_external_flag
6631: FROM jai_ar_trx_lines lines,
6632: jai_interface_lines_all intfs
6633: WHERE lines.customer_trx_line_id = intfs.internal_trx_line_id
6634: AND lines.customer_trx_id = pn_customer_trx_id
6635: AND lines.interface_flag = 'Y'
8022: lv_return_code VARCHAR2(100);
8023: lv_return_mess VARCHAR2(2000);
8024: ln_customer_trx_id JAI_AR_TRXS.CUSTOMER_TRX_ID%TYPE;
8025: ln_interface_line_id JAI_INTERFACE_LINES_ALL.INTERFACE_LINE_ID%TYPE;
8026: ln_customer_trx_line_id JAI_AR_TRX_LINES.CUSTOMER_TRX_LINE_ID%TYPE;
8027: lv_taxable_event JAI_INTERFACE_LINES_ALL.TAXABLE_EVENT%TYPE;
8028:
8029: --CURSOR DEFINITION AS BELOW
8030: CURSOR get_interface_line_cur
8253: ln_excise_invoice_no := NULL;
8254: --Added by zhiwei for bug#12564566 begin
8255: ------------------------------------------------
8256: ELSE
8257: UPDATE JAI_AR_TRX_LINES
8258: SET
8259: EXCISE_INVOICE_NO = ln_excise_invoice_no
8260: WHERE CUSTOMER_TRX_ID = ln_customer_trx_id;
8261: ------------------------------------------------
8272:
8273: ln_phase := 90.4;
8274:
8275:
8276: UPDATE JAI_AR_TRX_LINES
8277: SET TAX_AMOUNT = ln_sum_tax_amount,
8278: TOTAL_AMOUNT = LINE_AMOUNT + ln_sum_tax_amount,
8279: INTERFACE_FLAG = 'Y',
8280: INTERFACE_EVENT = GV_TAXABLE_EVENT_EXTERNAL,--Added by zhiwei for Bug#12537533 on 20110510
8288: ELSE
8289:
8290: ln_phase := 90.6;
8291:
8292: UPDATE JAI_AR_TRX_LINES
8293: SET TAX_AMOUNT = ln_sum_tax_amount,
8294: TOTAL_AMOUNT = LINE_AMOUNT + ln_sum_tax_amount,
8295: INTERFACE_FLAG = 'Y',
8296: INTERFACE_EVENT = GV_TAXABLE_EVENT_STANDALONE,--Added by zhiwei for Bug#12537533 on 20110510
8300:
8301: ln_phase := 90.7;
8302: END IF;
8303:
8304: --AFTER UPDATE TAXAMOUNT AND TOTALAMOUNT OF JAI_AR_TRX_LINES ,
8305: --TRIGGER JAI_JAR_TL_ARIUD_T1 WILL BE INVOKED, IF OPEN_INTF_SOURCE = 'OPENINTF' THEN RETURN, SO THE TRIGGER WILL DO NOTHING FOR OPEN INTERFACE
8306: --
8307: --THE PROCEDURE insert_line_t WILL BE FIRED TO POPULATE DATA INTO TABLE JAI_AR_TRX_INS_LINES_T
8308: --DETAILS REFER TO IN JAI_JAR_TL_TRIGGER_PKG.ARU_T1
8354: /*
8355: after process above , RA_CUSTOMER_TRX_LINES_ALL LINES FOR 'TAX' HAVE BEEN POPULATE.
8356: RA_CUST_TRX_GL_DIS_ALL LINES FOR 'TAX' HAVE BEEN POPULATE.
8357: BALANCE HAVE BEEN UPDATED.
8358: TOTAL AMOUNT AND TAX AMOUNT OF JAI_AR_TRX_LINES HAVE BEEN UPDATED.
8359: THE REST LOGIC IS MAINLY INCLUDE INVOICE GENERATION
8360: INSERT REPOSITORY
8361: INCLUSIVE TAX ACCOUNTING
8362: UPDATE INVOICE NO TO TRSANCTIOIN TABLE
8404: lv_return_code VARCHAR2(100);
8405: lv_return_message VARCHAR2(2000);
8406: ln_customer_trx_id JAI_AR_TRXS.CUSTOMER_TRX_ID%TYPE;
8407: ln_interface_line_id JAI_INTERFACE_LINES_ALL.INTERFACE_LINE_ID%TYPE;
8408: ln_customer_trx_line_id JAI_AR_TRX_LINES.CUSTOMER_TRX_LINE_ID%TYPE;
8409: lv_taxable_event JAI_INTERFACE_LINES_ALL.TAXABLE_EVENT%TYPE;
8410:
8411:
8412: ln_phase NUMBER;
10433: ln_proc_level NUMBER := FND_LOG.level_procedure;
10434: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_taxes';
10435:
10436: cursor cur_get_jai_line_rec(
10437: pn_trx_id jai_ar_trx_lines.CUSTOMER_TRX_ID%TYPE,
10438: pn_trx_line_id jai_ar_trx_lines.CUSTOMER_TRX_ID%TYPE
10439: )
10440: is
10441: select
10434: lv_proc_name VARCHAR2 (100) := 'populate_jai_interface_taxes';
10435:
10436: cursor cur_get_jai_line_rec(
10437: pn_trx_id jai_ar_trx_lines.CUSTOMER_TRX_ID%TYPE,
10438: pn_trx_line_id jai_ar_trx_lines.CUSTOMER_TRX_ID%TYPE
10439: )
10440: is
10441: select
10442: CUSTOMER_TRX_LINE_ID ,
10452: LAST_UPDATED_BY ,
10453: LAST_UPDATE_LOGIN ,
10454: VAT_ASSESSABLE_VALUE ,
10455: GST_ASSESSABLE_VALUE
10456: from jai_ar_trx_lines
10457: where customer_trx_id = pn_trx_id
10458: and customer_trx_line_id = pn_trx_line_id;
10459:
10460: get_jai_trx_line cur_get_jai_line_rec%rowtype;
11150: p_source_trx_type => 'AR_TRANSACTION'
11151: );
11152:
11153: --update assessable value
11154: UPDATE jai_ar_trx_lines
11155: SET assessable_value = ln_assessable_value * ln_quantity
11156: , vat_assessable_value = ln_vat_assessable_value
11157: , quantity = ln_quantity
11158: WHERE customer_trx_id = ln_header_id
11807:
11808: --For AP Accounting
11809: --For AR Updating include the follow process
11810: -- 1.calculate balance;
11811: -- 2.update tax amount/totoal amount to jai_ar_trx_lines;
11812: -- 3.insert tax lines to ra_customer_trx_lines_all;
11813: -- 4.insert tax lines to ra_cust_trx_gl_dist_all;
11814: -------------------------------------------------------------------------------
11815: BEGIN