[Home] [Help]
24: Sob_Cur as this is not used anywhere.
25: */
26:
27: BEGIN
28: pv_return_code := jai_constants.successful ;
29:
30: v_header_id := pr_old.header_id;
31: v_line_id := pr_old.line_id;
32: v_operating_id :=pr_old.ORG_ID; /*bgowrava for forwrad porting bug#5591347, changed pr_new to pr_old */
63: END IF;
64: /* Added an exception block by Ramananda for bug#4570303 */
65: EXCEPTION
66: WHEN OTHERS THEN
67: Pv_return_code := jai_constants.unexpected_error;
68: Pv_return_message := 'Encountered an error in JAI_OE_OLA_TRIGGER_PKG.ARD_T1 ' || substr(sqlerrm,1,1900);
69: END ARD_T1 ;
70:
71: /*
242: JAI_CMN_TAXES_ALL b
243: WHERE A.Header_ID = p_header_id
244: AND A.line_id = p_line_id
245: AND b.tax_id = A.tax_id
246: AND b.tax_type <> jai_constants.tax_type_tds /* 'TDS'; Ramananda for removal of SQL LITERALs */
247: AND NVL(b.inclusive_tax_flag, 'N') = 'N'; -- Added by Jia Li for inclusive tax on 2008/01/08
248:
249: CURSOR return_tax_amount_Cur (p_header_id NUMBER, p_line_id NUMBER) IS
250: SELECT SUM(A.tax_amount)
250: SELECT SUM(A.tax_amount)
251: FROM JAI_OM_OE_RMA_TAXES a, JAI_CMN_TAXES_ALL b
252: WHERE a.rma_line_id = p_line_id
253: AND b.tax_id = A.tax_id
254: AND b.tax_type <> jai_constants.tax_type_tds /* 'TDS'; Ramananda for removal of SQL LITERALs */
255: AND NVL(b.inclusive_tax_flag, 'N') = 'N'; -- Added by Jia Li for inclusive tax on 2008/01/08
256:
257: CURSOR get_so_lines_count_cur (p_line_id NUMBER) IS
258: SELECT COUNT(1)
541: forwardported the changes done in 115 bug#7523501
542:
543: 12. 20-Nov-2008 CSahoo for bug#7568194, File Version 120.15.12010000.5
544: ISSUE: AFTER SAVING THE RMA IT IS REFERENCED TO AN AR INVOICE BUT AN ERROR OCCURS
545: Fix: Modified the code in the BRIU_T1 procedure. Added jai_constants.UPDATING in the
546: IF condition.
547:
548: 13. 20-May-2009 CSahoo for bug#8485149, File Version 120.15.12010000.7
549: ISSUE: ATO MODEL EXCISE ITEM ATTRIBUTES ARE NOT GETTING CREATED FOR STAR(*) ITEM
629: 17. 03-Oct-2012 mmurtuza for bug 14675557
630: Issue: ASSESSABLE AMOUNT IS SHOWING WRONG VALUE FOR A COPIED ORDER
631: Fix: Fected the assessable value again in copy order code. Also passed the same during tax computation.
632: ----------------------------------------------------------------------------------------------------------------*/
633: pv_return_code := jai_constants.successful ;
634:
635: /*
636: || Code modified by aiyer for the bug #3134082
637: || Initially this validation was below the ware house validation (which now follows next to this piece of validation).
681: v_operating_id := pr_new.ORG_ID;
682: v_source_document_id := pr_new.SOURCE_DOCUMENT_ID ;
683: v_source_document_line_id := pr_new.SOURCE_DOCUMENT_LINE_ID ;
684: v_source_document_type_id := pr_new.SOURCE_DOCUMENT_TYPE_ID ;
685: v_debug := jai_constants.no;
686: l_tax_lines_exist := 'FALSE' ;
687: -- added by Allen Yang for bug 9666476 28-apr-2010, begin
688: -- lv_shippable_flag := pr_new.SHIPPING_INTERFACED_FLAG;
689: lv_shippable_flag := pr_new.SHIPPABLE_FLAG; -- modified by Allen Yang for bug 9691880 07-MAY-2010
692: -- End of Bug #3134082
693:
694: /* added by ssumaith- bug# 3959984*/
695:
696: if ( pv_action = jai_constants.updating and ( (nvl(pr_old.line_number,-9999) <> nvl(pr_new.line_number,-9998)) and pr_new.line_number is not null))
697: OR
698: ( pv_action = jai_constants.updating and ( (nvl(pr_old.shipment_number,-9999) <> nvl(pr_new.shipment_number,-9998)) and pr_new.shipment_number is not null))
699: then
700:
694: /* added by ssumaith- bug# 3959984*/
695:
696: if ( pv_action = jai_constants.updating and ( (nvl(pr_old.line_number,-9999) <> nvl(pr_new.line_number,-9998)) and pr_new.line_number is not null))
697: OR
698: ( pv_action = jai_constants.updating and ( (nvl(pr_old.shipment_number,-9999) <> nvl(pr_new.shipment_number,-9998)) and pr_new.shipment_number is not null))
699: then
700:
701: update JAI_OM_OE_SO_LINES
702: set line_number = pr_new.line_number , shipment_line_number = pr_new.shipment_number
728:
729: IF v_debug = 'Y' THEN
730:
731: BEGIN
732: pv_return_code := jai_constants.successful ;
733:
734: SELECT DECODE(SUBSTR(value,1,INSTR(value,',') -1),
735: NULL,
736: value,
770: /*
771: Added by ssumaith - bug#3671871
772: */
773:
774: IF pv_action = jai_constants.updating AND pr_new.inventory_item_id <> pr_old.inventory_item_id THEN
775: DELETE JAI_OM_OE_SO_LINES
776: WHERE line_id = pr_new.line_id;
777:
778: DELETE JAI_OM_OE_SO_TAXES
1250: 1
1251: FROM
1252: jai_regime_tax_types_v
1253: WHERE
1254: regime_code = jai_constants.vat_regime
1255: AND tax_type = cp_tax_type;
1256:
1257: /*Added by Bgowrava for Bug#6126581 */
1258: cursor cur_get_ddetail_id(p_source_document_id OE_ORDER_LINES_ALL.SOURCE_DOCUMENT_ID%TYPE , p_source_document_line_id OE_ORDER_LINES_ALL.SOURCE_DOCUMENT_LINE_ID%TYPE) is
1373: || Added for bug#5256498, Ends-- bduvarag
1374: */
1375:
1376: BEGIN
1377: pv_return_code := jai_constants.successful ;
1378: v_rma_quantity_uom := pr_new.order_quantity_uom;
1379: OPEN c_sales_order_cur;
1380: FETCH c_sales_order_cur into v_orig_ord_qty, v_service_type_code;
1381: CLOSE c_sales_order_cur;
1621: OPEN c_check_Vat_type_Tax_exists (rec_cur_get_picking_tax_lines.tax_type);
1622: FETCH c_check_Vat_type_Tax_exists INTO lv_check_vat_type_exists;
1623: CLOSE c_check_Vat_type_Tax_exists;
1624:
1625: IF (rec_cur_get_picking_tax_lines.tax_type IN ('Excise', 'Addl. Excise', 'Other Excise', JAI_CONSTANTS.TAX_TYPE_SH_EXC_EDU_CESS,JAI_CONSTANTS.TAX_TYPE_EXC_EDU_CESS)
1626: AND v_excise_flag = 'N') /*bduvarag for bug5989740*/
1627: OR
1628: (rec_cur_get_picking_tax_lines.tax_type IN ('Sales Tax', 'CST') AND v_sales_flag = 'N')
1629: OR
1836: ELSE
1837: -- Details in picking lines not found . Raise an error message
1838: CLOSE cur_get_picking_lines;
1839: /* RAISE_APPLICATION_ERROR (-20001,'No data found in localisation shipping tables, hence copy cannot be done');
1840: */ pv_return_code := jai_constants.expected_error ; pv_return_message := 'No data found in localisation shipping tables,hence copy cannot be done' ; return ;
1841: END IF;
1842: CLOSE cur_get_picking_lines;
1843: END;
1844:
1885: cv_rma_details C_RMA_DETAILS%ROWTYPE;
1886: lv_rma_number OE_ORDER_HEADERS_ALL.ORDER_NUMBER%TYPE;
1887:
1888: BEGIN
1889: pv_return_code := jai_constants.successful ;
1890:
1891: open c_rma_details(pr_new.source_document_id , pr_new.source_document_line_id);
1892: fetch c_rma_details into cv_rma_details;
1893: close c_rma_details;
2167: 1
2168: FROM
2169: jai_regime_tax_types_v
2170: WHERE
2171: regime_code = jai_constants.vat_regime
2172: AND tax_type = cp_tax_type;
2173:
2174: /*Added by Bgowrava for Bug#6126581 */
2175: cursor cur_get_ddetail_id(p_source_document_id OE_ORDER_LINES_ALL.SOURCE_DOCUMENT_ID%TYPE , p_source_document_line_id OE_ORDER_LINES_ALL.SOURCE_DOCUMENT_LINE_ID%TYPE) is
2284: */
2285:
2286:
2287: BEGIN
2288: pv_return_code := jai_constants.successful ;
2289: v_rma_quantity_uom := pr_new.order_quantity_uom;
2290:
2291: OPEN c_sales_order_cur;
2292: FETCH c_sales_order_cur into v_orig_ord_qty, v_service_type_code;
2527: OPEN c_check_Vat_type_Tax_exists (rec_cur_get_picking_tax_lines.tax_type);
2528: FETCH c_check_Vat_type_Tax_exists INTO lv_check_vat_type_exists;
2529: CLOSE c_check_Vat_type_Tax_exists;
2530:
2531: IF (rec_cur_get_picking_tax_lines.tax_type IN ('Excise', 'Addl. Excise', 'Other Excise', JAI_CONSTANTS.TAX_TYPE_SH_EXC_EDU_CESS,JAI_CONSTANTS.TAX_TYPE_EXC_EDU_CESS)
2532: AND v_excise_flag = 'N') /*bduvarag for bug5989740*/
2533: OR
2534: (rec_cur_get_picking_tax_lines.tax_type IN ('Sales Tax', 'CST') AND v_sales_flag = 'N')
2535: OR
2736: ELSE
2737: -- Details in picking lines not found . Raise an error message
2738: CLOSE cur_get_picking_lines;
2739: /* RAISE_APPLICATION_ERROR (-20001,'No data found in localisation shipping tables, hence copy cannot be done');
2740: */ pv_return_code := jai_constants.expected_error ; pv_return_message := 'No data found in localisation shipping tables,hence copy cannot be done' ; return ;
2741: END IF;
2742: CLOSE cur_get_picking_lines;
2743: end;
2744:
2749:
2750: ELSIF v_source_order_category_code = 'RETURN' AND v_line_category_code = 'RETURN' THEN
2751: -- Raise an Error
2752: /* RAISE_APPLICATION_ERROR (-20001,'Copying of Return Order to Return Order is not currently supported with India Localization Taxes');
2753: */ pv_return_code := jai_constants.expected_error ; pv_return_message := 'Copying of Return Order to Return Order is not currently supported with India Localization Taxes' ; return ;
2754: END IF;
2755: END IF;
2756:
2757: /*********************** Tax line computation starts from here ***************************/
2919: rec_get_rma_tax_lines cur_get_JAI_OM_OE_RMA_TAXES%ROWTYPE;
2920: l_exists VARCHAR2(1);
2921:
2922: BEGIN
2923: pv_return_code := jai_constants.successful ;
2924:
2925: FOR rec_get_rma_tax_lines in cur_get_JAI_OM_OE_RMA_TAXES ( p_line_id => v_source_document_line_id )
2926: loop
2927: l_tax_lines_exist := 'TRUE' ;
3239:
3240: l_exists VARCHAR2(1) ;
3241:
3242: BEGIN
3243: pv_return_code := jai_constants.successful ;
3244: FOR rec_cur_get_picking_tax_lines IN cur_get_picking_tax_lines ( p_source_document_id => V_SOURCE_DOCUMENT_ID ,
3245: p_source_document_line_id => V_SOURCE_DOCUMENT_LINE_ID
3246: )
3247: LOOP
3319: ELSIF v_source_order_category_code = 'RETURN' AND v_line_category_code = 'RETURN' THEN
3320: -- Raise an error in case of return to return scenario
3321: -- However the control would not come to this point because this condition is blocked while calculating rma_entry_lines.
3322: /* RAISE_APPLICATION_ERROR (-20001,'Copying of Return Order to Return Order is not currently supported with India Localization Taxes'); */
3323: pv_return_code := jai_constants.expected_error ; pv_return_message := 'Copying of Return Order to Return Order is not currently supported with India Localization Taxes' ; return ;
3324:
3325: ELSE
3326: /************ Else split_from_line_id is Not Null ********************/
3327: IF pr_new.SPLIT_FROM_LINE_ID IS NOT NULL
3895: END IF;
3896:
3897: -- added for bug 11774053 by zhiwei.xin on 13-Sep-2012 begin
3898: IF NVL(pr_new.ordered_quantity, 0) = 0 then
3899: pv_return_code := jai_constants.expected_error ;
3900: pv_return_message := 'Please enter the quantity for the item correctly.' ;
3901: return ;
3902: end if;
3903: -- added for bug 11774053 by zhiwei.xin on 13-Sep-2012 end.
4202: END IF; -- v_debug
4203:
4204: --RAISE_APPLICATION_ERROR(-20002, 'ERROR - TRIGGER JA_IN_OE_ORDER_LINES_AIU_TRG : ' || SQLERRM);
4205: /* Added an exception block by Ramananda for bug#4570303 */
4206: Pv_return_code := jai_constants.unexpected_error;
4207: Pv_return_message := 'Encountered an error in JAI_OE_OLA_TRIGGER_PKG.ARIU_T1 ' || substr(sqlerrm,1,1900);
4208:
4209: END ARIU_T1 ;
4210:
4367: , jai_regime_tax_types_v tax_types
4368: WHERE jsptl.order_line_id = cp_order_line_id
4369: AND jtc.tax_id = jsptl.tax_id
4370: AND jtc.tax_type = tax_types.tax_type
4371: AND tax_types.regime_code = jai_constants.vat_regime;
4372:
4373: CURSOR cur_chk_vat_proc_entry (cp_order_line_id JAI_OM_WSH_LINES_ALL.ORDER_LINE_ID%TYPE)
4374: IS
4375: SELECT 1
4394: , attribute_value
4395: FROM JAI_RGM_ORG_REGNS_V orrg
4396: WHERE orrg.organization_id = cp_organization_id
4397: AND orrg.location_id = NVL(cp_location_id, cp_organization_id)
4398: AND attribute_type_code = jai_constants.rgm_attr_type_code_primary
4399: AND attribute_code = jai_constants.attr_code_regn_no
4400: AND regime_code = jai_constants.vat_regime;
4401:
4402: CURSOR cur_get_order_header_info
4395: FROM JAI_RGM_ORG_REGNS_V orrg
4396: WHERE orrg.organization_id = cp_organization_id
4397: AND orrg.location_id = NVL(cp_location_id, cp_organization_id)
4398: AND attribute_type_code = jai_constants.rgm_attr_type_code_primary
4399: AND attribute_code = jai_constants.attr_code_regn_no
4400: AND regime_code = jai_constants.vat_regime;
4401:
4402: CURSOR cur_get_order_header_info
4403: IS
4396: WHERE orrg.organization_id = cp_organization_id
4397: AND orrg.location_id = NVL(cp_location_id, cp_organization_id)
4398: AND attribute_type_code = jai_constants.rgm_attr_type_code_primary
4399: AND attribute_code = jai_constants.attr_code_regn_no
4400: AND regime_code = jai_constants.vat_regime;
4401:
4402: CURSOR cur_get_order_header_info
4403: IS
4404: SELECT order_type_id
4436: , 'Enter procedure'
4437: );
4438: END IF; --( lv_proc_level >= ln_dbg_level)
4439:
4440: pv_return_code := jai_constants.successful ;
4441: ld_creation_date := sysdate;
4442: ln_created_by := pr_new.Created_By;
4443: ld_last_update_date := pr_new.Last_Update_Date;
4444: ln_last_updated_by := pr_new.Last_Updated_By;
4706: /*
4707: || VAT invoice number should be punched as 'NA' and accounting should happen
4708: || when 'VAT REVERSAL' type of tax exist and 'VAT' type of tax(es) doesn't exist
4709: */
4710: lv_vat_invoice_no := jai_constants.not_applicable ;
4711: lv_vat_inv_gen_status := 'C' ;
4712: END IF ; -- nvl(ln_vat_cnt,0) = 0
4713:
4714: -- If taxes of 'VAT' type (or) taxes of 'VAT REVERSAL' type exists
4771: , NULL -- program_id
4772: , NULL -- program_update_date
4773: , ln_customer_id -- party_id
4774: , pr_new.invoice_to_org_id -- party_site_id
4775: , jai_constants.party_type_customer
4776: , ld_creation_date
4777: , ln_created_by
4778: , ld_last_update_date
4779: , ln_last_update_login
4785: -------------------------------------------------------
4786: /*ELSE
4787: -- check if GST type of tax exists
4788: OPEN cur_chk_gst_exists (cp_order_line_id => ln_order_line_id,
4789: cp_regime_code => jai_constants.cgst_regime) ;
4790: FETCH cur_chk_gst_exists INTO ln_cgst_cnt;
4791: CLOSE cur_chk_gst_exists ;
4792:
4793: OPEN cur_chk_gst_exists (cp_order_line_id => ln_order_line_id,
4790: FETCH cur_chk_gst_exists INTO ln_cgst_cnt;
4791: CLOSE cur_chk_gst_exists ;
4792:
4793: OPEN cur_chk_gst_exists (cp_order_line_id => ln_order_line_id,
4794: cp_regime_code => jai_constants.sgst_regime) ;
4795: FETCH cur_chk_gst_exists INTO ln_sgst_cnt;
4796: CLOSE cur_chk_gst_exists ;
4797:
4798: -- If the cgst has existed
4840: , NULL
4841: , NULL
4842: , ln_customer_id -- party_id
4843: , pr_new.invoice_to_org_id -- party_site_id
4844: , jai_constants.party_type_customer
4845: , ld_creation_date
4846: , ln_created_by
4847: , ld_last_update_date
4848: , ln_last_update_login
4882: END IF; --( lv_proc_level >= ln_dbg_level)
4883:
4884: EXCEPTION
4885: WHEN OTHERS THEN
4886: pv_return_code := jai_constants.expected_error ;
4887: pv_return_message := substr(sqlerrm,1,200) ;
4888: RETURN ;
4889: END ARIU_T2;
4890:
5132: --bug#9067808,end
5133:
5134: --2001/06/14 Jagdish,Gadde
5135: BEGIN
5136: pv_return_code := jai_constants.successful ;
5137: /*
5138: || Code added by aiyer for the bug 4035566
5139: || Call the function jai_cmn_utils_pkg.check_jai_exists to check the current set of books in INR/NON-INR based.
5140: */
5332: line_id = v_line_id;
5333:
5334: cur_rec_get_assessable_value rec_get_assessable_value%ROWTYPE;
5335: BEGIN
5336: pv_return_code := jai_constants.successful ;
5337:
5338:
5339: if v_assessable_value IS NOT NULL THEN -- added by sriram - 1/9/03 - bug # 3123141
5340:
5510: -- END IF; -- end if commented by sriram bug # 2436438 03-JUL-02
5511: /* Added an exception block by Ramananda for bug#4570303 */
5512: EXCEPTION
5513: WHEN OTHERS THEN
5514: Pv_return_code := jai_constants.unexpected_error;
5515: Pv_return_message := 'Encountered an error in JAI_OE_OLA_TRIGGER_PKG.ARU_T1 ' || substr(sqlerrm,1,1900);
5516:
5517: END ARU_T1 ;
5518: --==========================================================================
5693: lv_allow_sales_flag varchar2(1);
5694: ln_excise_duty_per_unit number;
5695: ln_excise_duty_rate number;
5696: BEGIN
5697: pv_return_code := jai_constants.successful ;
5698:
5699: OPEN Get_Count;
5700: FETCH Get_Count INTO v_exist_ship;
5701: CLOSE Get_Count;
5700: FETCH Get_Count INTO v_exist_ship;
5701: CLOSE Get_Count;
5702: /*added for bug#8485149,start*/
5703: If pr_new.item_type_code = 'CONFIG' and pr_new.ato_line_id is not null
5704: AND pv_action = jai_constants.inserting -- Added by Bo Li for bug#9789855 on 30-JUN-2010
5705: THEN
5706: OPEN cur_chk_item_dtls (pr_new.SHIP_from_ORG_ID, pr_new.inventory_item_id);
5707: FETCH cur_chk_item_dtls INTO ln_item_exists;
5708: CLOSE cur_chk_item_dtls;
5741: jai_inv_items_pkg.copy_items(pn_organization_id => pr_new.SHIP_from_ORG_ID,
5742: pn_inventory_item_id => pr_new.inventory_item_id,
5743: pn_source_organization_id => ln_organization_id,
5744: pn_source_inventory_item_id => ln_inventory_item_id,
5745: pn_regime_code => jai_constants.vat_regime);
5746: -- bug#9191274, end
5747: END IF;
5748: END IF;
5749: /*bug#8485149,end*/
5768: 'PO' 'Customer PO India'
5769:
5770: */
5771:
5772: --added jai_constants.UPDATING for bug#7568194
5773: IF pv_action IN (jai_constants.INSERTING, jai_constants.UPDATING) AND pr_new.reference_header_id IS NOT NULL THEN
5774:
5775: OPEN cur_get_delivery_detail_id;
5776: FETCH cur_get_delivery_detail_id INTO l_new_delivery_detail_id;
5769:
5770: */
5771:
5772: --added jai_constants.UPDATING for bug#7568194
5773: IF pv_action IN (jai_constants.INSERTING, jai_constants.UPDATING) AND pr_new.reference_header_id IS NOT NULL THEN
5774:
5775: OPEN cur_get_delivery_detail_id;
5776: FETCH cur_get_delivery_detail_id INTO l_new_delivery_detail_id;
5777:
5903: -- pr_new.attribute15 := NULL;
5904: /* Added an exception block by Ramananda for bug#4570303 */
5905: EXCEPTION
5906: WHEN OTHERS THEN
5907: Pv_return_code := jai_constants.unexpected_error;
5908: Pv_return_message := 'Encountered an error in JAI_OE_OLA_TRIGGER_PKG.BRIU_T1 ' || substr(sqlerrm,1,1900);
5909:
5910: END BRIU_T1 ;
5911: