[Home] [Help]
89: --v_attribute2 DATE;
90: --v_attribute3 VARCHAR2(150);
91: v_range_no JAI_CMN_VENDOR_SITES.excise_duty_range % TYPE;
92: v_division_no JAI_CMN_VENDOR_SITES.excise_duty_division % TYPE;
93: v_claim_modvat_flag JAI_RCV_LINES.claim_modvat_flag % TYPE;
94: v_func_currency gl_sets_of_books.currency_code % TYPE;
95: v_gl_set_of_books_id gl_sets_of_books.set_of_books_id % TYPE;
96: v_conv_factor NUMBER;
97: v_register_type JAI_CMN_RG_23AC_I_TRXS.register_type % TYPE;
289:
290: cursor c_fetch_receive_quantity(p_shipment_header_id number,
291: p_shipment_line_id number) is
292: select qty_received
293: from JAI_RCV_LINES
294: where shipment_header_id = p_shipment_header_id
295: and shipment_line_id = p_shipment_line_id;
296:
297: cursor c_fetch_transaction_quantity(p_shipment_header_id number,
314: from jai_rcv_interface_trxs
315: where interface_transaction_id = cp_interface_trx_id;
316:
317: r_ja_rcv_interface c_ja_rcv_interface%ROWTYPE;
318: lv_excise_invoice_no JAI_RCV_LINES.excise_invoice_no%TYPE;
319: lv_excise_invoice_date JAI_RCV_LINES.excise_invoice_date%TYPE;
320: lv_online_claim_flag JAI_RCV_LINES.online_claim_flag%TYPE;
321:
322: /* Bug 5243532. Added by Lakshmi Gopalsami
315: where interface_transaction_id = cp_interface_trx_id;
316:
317: r_ja_rcv_interface c_ja_rcv_interface%ROWTYPE;
318: lv_excise_invoice_no JAI_RCV_LINES.excise_invoice_no%TYPE;
319: lv_excise_invoice_date JAI_RCV_LINES.excise_invoice_date%TYPE;
320: lv_online_claim_flag JAI_RCV_LINES.online_claim_flag%TYPE;
321:
322: /* Bug 5243532. Added by Lakshmi Gopalsami
323: * Defined variable for implementing caching logic.
316:
317: r_ja_rcv_interface c_ja_rcv_interface%ROWTYPE;
318: lv_excise_invoice_no JAI_RCV_LINES.excise_invoice_no%TYPE;
319: lv_excise_invoice_date JAI_RCV_LINES.excise_invoice_date%TYPE;
320: lv_online_claim_flag JAI_RCV_LINES.online_claim_flag%TYPE;
321:
322: /* Bug 5243532. Added by Lakshmi Gopalsami
323: * Defined variable for implementing caching logic.
324: */
447: ln_item_cost number;
448:
449: -- rchandan end - 6030615(INTERORG_XFER FP )
450:
451: --------------------------- Procedure For inserting a record in JAI_RCV_LINES ---------
452: PROCEDURE insert_receipt_line IS
453:
454: lv_mfg_trading JAI_RCV_LINES.mfg_trading%type ;
455: BEGIN
450:
451: --------------------------- Procedure For inserting a record in JAI_RCV_LINES ---------
452: PROCEDURE insert_receipt_line IS
453:
454: lv_mfg_trading JAI_RCV_LINES.mfg_trading%type ;
455: BEGIN
456:
457: --Added by GSRI on 21-OCT-01
458: SELECT COUNT(*) INTO v_chk_receipt_lines
455: BEGIN
456:
457: --Added by GSRI on 21-OCT-01
458: SELECT COUNT(*) INTO v_chk_receipt_lines
459: FROM JAI_RCV_LINES
460: WHERE shipment_line_id = p_shipment_line_id AND
461: shipment_header_id = p_shipment_header_id;
462: IF v_chk_receipt_lines = 0 THEN
463: /*DELETE FROM JAI_RCV_LINES
459: FROM JAI_RCV_LINES
460: WHERE shipment_line_id = p_shipment_line_id AND
461: shipment_header_id = p_shipment_header_id;
462: IF v_chk_receipt_lines = 0 THEN
463: /*DELETE FROM JAI_RCV_LINES
464: WHERE shipment_line_id = p_shipment_line_id AND
465: shipment_header_id = p_shipment_header_id;*/
466: --End Addition by GSRI on 21-OCT-01
467:
466: --End Addition by GSRI on 21-OCT-01
467:
468: lv_mfg_trading := NVL(v_manufacturing, 'N')|| NVL(v_trading, 'N') ; -- Removed minus sign (-) for bug#4519697
469:
470: INSERT INTO JAI_RCV_LINES
471: (shipment_line_id,
472: shipment_header_id,
473: receipt_num,
474: qty_received,
512: p_last_update_login);
513: END IF;
514: END insert_receipt_line;
515:
516: --------------------------- Procedure For updating tax amount in JAI_RCV_LINES --------
517: PROCEDURE update_receipt_line IS
518: BEGIN
519: IF v_tax_total <> 0
520: THEN
517: PROCEDURE update_receipt_line IS
518: BEGIN
519: IF v_tax_total <> 0
520: THEN
521: UPDATE JAI_RCV_LINES
522: SET tax_amount = v_tax_total
523: WHERE shipment_line_id = p_shipment_line_id;
524: END IF;
525: END update_receipt_line;
549: IF p_transaction_type = 'RECEIVE'
550: THEN
551: FOR conf_rec IN (SELECT shipment_line_id,
552: qty_received
553: FROM JAI_RCV_LINES
554: WHERE shipment_line_id = p_shipment_line_id)
555: LOOP
556: v_conf := conf_rec.shipment_line_id;
557: IF NVL(conf_rec.qty_received, 0) <> 0
581: THEN
582: v_tax_total := NVL(v_tax_total, 0) + NVL(v_current_tax, 0);
583: END IF;
584: END LOOP;
585: UPDATE JAI_RCV_LINES
586: SET qty_received = NVL(qty_received, 0) + p_qty_received,
587: tax_amount = v_tax_total
588: WHERE shipment_line_id = p_shipment_line_id;
589: END IF;
916:
917: 1. For Bug # 2692052
918: Commented the calls to ja_in_temp_receipt
919: Changed the calls to "TO HANDLE DELIVER RTR RTV"
920: Changed the Insert of JAI_RCV_LINES with 2 columns ( organization_id,transaction_id).
921:
922: 2. For Bug # 2808110
923: Added an Order by Clause in the Fetching
924: of Tax related Information from JAI_PO_TAXES
1117: functionality as a gateway.
1118: - added a new parameter p_chk_form (OUT Variable) to return back a value, if the receipt transaction that is
1119: begin processed is created after navigating through Localization form
1120: - Instead of submitting the concurrents JAINRVCTP is submitted for processing
1121: - JAI_RCV_LINES.tax_modified_flag will be set now from above mentioned package when submitted from JAINPORE
1122: - Added Validation at the end of Procedure to error out if this is an RTV and Cenvat is not yet Claimed
1123:
1124: ** Please refer to Old Version of the Object incase commented code needs to be looked at **
1125:
1123:
1124: ** Please refer to Old Version of the Object incase commented code needs to be looked at **
1125:
1126: 33 09/02/2005 Vijay Shankar for Bug# 4159557, Version:115.8
1127: Modified the code to assign proper value to JAI_RCV_LINES.tax_modified_flag column based on Receipts
1128: tax modification Value returned by Localization Hook given to customers. the hook is called in ja_in_receipt_tax_insert_trg
1129: trigger and returned value is passed as parameter to this procedure which is used for tax_modified_flag value
1130: determination
1131:
1156: through a DFF : invoice no, invoice_date, Claim Cenvat On Receipt etc.
1157: This DFF is provided at two places, header and line.
1158: Information from the header DFF is captured into the rcv_shipment_headers table.
1159: Information from the lines DFF is captured into the rcv_transactions table.
1160: This information is retrieved into our base tables JAI_RCV_TRANSACTIONS and JAI_RCV_LINES.
1161: At this time, a facility has been provided for the user to default the information
1162: given at the header level DFF to all the lines only if these columns are null at the
1163: line level. Else the information in the line level DFF is sustained.
1164: For this NVL conditions have been added where this information gets defaulted.
1573: and po_header_id = rsl.po_header_id -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh.
1574: )
1575: and rsl.shipment_line_id in
1576: (select jrl.shipment_line_id
1577: from JAI_RCV_LINES jrl
1578: -- Vijay Shankar for Bug#4346453. RCV DFF Elim. Enh. WHERE jrl.excise_invoice_no = p_attribute1
1579: -- AND jrl.excise_invoice_date = p_attribute2
1580: WHERE jrl.excise_invoice_no = lv_excise_invoice_no
1581: AND jrl.excise_invoice_date = lv_excise_invoice_date
2109: CLOSE c_jai_cmn_lines;
2110:
2111: v_loc_quantity := r_jai_cmn_lines.quantity;
2112:
2113: update JAI_RCV_LINES
2114: set excise_invoice_no = r_jai_cmn_lines.excise_inv_number,
2115: excise_invoice_date=r_jai_cmn_lines.excise_inv_Date
2116: where shipment_line_id = p_shipment_line_id;
2117:
2180: CLOSE c_jai_mtl_Trxs;
2181:
2182: v_loc_quantity := ln_trx_qty;
2183:
2184: update jai_rcv_lines
2185: set excise_invoice_no = r_jai_mtl_trxs.excise_invoice_no ,
2186: excise_invoice_Date = r_jai_mtl_trxs.creation_Date
2187: where shipment_line_id = p_shipment_line_id;
2188:
2992:
2993:
2994: IF p_transaction_type = 'MATCH' THEN
2995:
2996: UPDATE JAI_RCV_LINES
2997: SET -- tax_modified_flag = 'N', /* Vijay Shankar for Bug#3940588 RECEIPTS DEPLUG*/
2998: line_location_id = p_line_location_id,
2999: tax_amount = NVL(tax_amount, 0) + v_tax_total,
3000: last_update_date = p_last_update_date,