[Home] [Help]
1: PACKAGE BODY jai_general_pkg AS
2: /* $Header: jai_general.plb 120.15.12020000.4 2013/05/24 09:15:00 cholei ship $ */
3:
4: /*----------------------------------------------------------------------------------------------------------------------------
5: CHANGE HISTORY for FILENAME: jai_general_pkg.sql
1: PACKAGE BODY jai_general_pkg AS
2: /* $Header: jai_general.plb 120.15.12020000.4 2013/05/24 09:15:00 cholei ship $ */
3:
4: /*----------------------------------------------------------------------------------------------------------------------------
5: CHANGE HISTORY for FILENAME: jai_general_pkg.sql
6: S.No dd/mm/yyyy Author and Details
7: ------------------------------------------------------------------------------------------------------------------------------
8: 1 16/07/2004 Vijay Shankar for Bug# 3496408, Version:115.0
9: This Package is coded for Common Procedure/Functions that will be used across localization Product.
77:
78: lv_inv_item_flag MTL_SYSTEM_ITEMS.inventory_item_flag%TYPE;
79:
80: lv_expense_flag VARCHAR2(1);
81: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.is_item_an_expense';
82:
83: BEGIN
84:
85: OPEN c_item_flag(p_organization_id, p_item_id);
109: WHERE organization_id = p_organization_id
110: AND fin_active_flag = 'Y';
111:
112: ln_fin_year NUMBER;
113: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_fin_year';
114:
115: BEGIN
116: OPEN c_active_fin_year;
117: FETCH c_active_fin_year INTO ln_fin_year;
135: SELECT excise_duty_range, excise_duty_division
136: FROM JAI_CMN_VENDOR_SITES
137: WHERE vendor_id = p_vendor_id
138: AND vendor_site_id = p_vendor_site_id;
139: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_range_division';
140: BEGIN
141:
142: OPEN c_range_division;
143: FETCH c_range_division INTO p_range_no, p_division_no;
179:
180: FUNCTION get_gl_concatenated_segments(
181: p_code_combination_id IN NUMBER
182: ) RETURN VARCHAR2 IS
183: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_gl_concatenated_segments';
184: lv_concatenated_segments GL_CODE_COMBINATIONS_KFV.concatenated_segments%TYPE;
185: CURSOR c_concatenated_segments(cp_code_combination_id IN NUMBER) IS
186: SELECT concatenated_segments
187: FROM gl_code_combinations_kfv
211: */
212: l_func_curr_det jai_plsql_cache_pkg.func_curr_details;
213: -- End for bug 5243532
214: lv_organization_code ORG_ORGANIZATION_DEFINITIONS.organization_code%TYPE;
215: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_organization_code';
216: BEGIN
217:
218: l_func_curr_det := jai_plsql_cache_pkg.return_sob_curr
219: (p_org_id => p_organization_id );
230:
231: FUNCTION get_rg_register_type(p_item_class IN VARCHAR2) RETURN VARCHAR2 IS
232:
233: lv_register_type VARCHAR2(1);
234: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_rg_register_type';
235: BEGIN
236:
237: /* This procedure should be used only for Receipt Transactions. Because FGIN and FGEX should hit RG1, but incase of RMA Receipt
238: the should hit RG23A Register */
261: WHERE organization_id = p_organization_id
262: AND inventory_item_id = p_inventory_item_id;
263:
264: lv_uom_code MTL_SYSTEM_ITEMS.primary_uom_code%TYPE;
265: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_primary_uom_code';
266:
267: BEGIN
268:
269: OPEN c_get_primary_uom_code;
284: FROM mtl_units_of_measure
285: WHERE unit_of_measure = p_uom;
286:
287: lv_uom_code MTL_UNITS_OF_MEASURE.uom_code%TYPE;
288: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_uom_code';
289:
290: BEGIN
291: OPEN c_uom_code;
292: FETCH c_uom_code INTO lv_uom_code;
309: WHERE organization_id = p_organization_id
310: AND location_id = p_location_id;
311:
312: lv_master_flag JAI_CMN_INVENTORY_ORGS.master_org_flag%TYPE;
313: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_orgn_master_flag';
314: BEGIN
315: OPEN c_master_flag;
316: FETCH c_master_flag INTO lv_master_flag;
317: CLOSE c_master_flag;
327: FUNCTION get_matched_boe_no(
328: p_transaction_id IN NUMBER
329: ) RETURN VARCHAR2 IS
330: lv_boe_no VARCHAR2(150); -- := ''; --rpokkula for File.Sql.35
331: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_matched_boe_no';
332: BEGIN
333:
334: lv_boe_no := ''; --rpokkula for File.Sql.35
335:
356: p_primary_uom_code IN MTL_UNITS_OF_MEASURE.uom_code%TYPE,
357: p_inventory_item_id IN MTL_SYSTEM_ITEMS.inventory_item_id%TYPE
358: ) RETURN NUMBER IS
359: vTransToPrimaryUOMConv NUMBER;
360: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.trxn_to_primary_conv_rate';
361: BEGIN
362:
363: IF p_transaction_uom_code <> p_primary_uom_code THEN
364: INV_CONVERT.inv_um_conversion(
464: lv_register_type VARCHAR2(1);
465: ln_register_id NUMBER;
466: ln_fin_year NUMBER(4);
467: ln_prev_fin_year NUMBER(4);
468: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_last_record_of_rg';
469: BEGIN
470:
471: IF p_fin_year IS NULL THEN
472: ln_fin_year := jai_general_pkg.get_fin_year(p_organization_id);
468: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.get_last_record_of_rg';
469: BEGIN
470:
471: IF p_fin_year IS NULL THEN
472: ln_fin_year := jai_general_pkg.get_fin_year(p_organization_id);
473: ELSE
474: ln_fin_year := p_fin_year;
475: END IF;
476: ln_prev_fin_year := ln_fin_year - 1;
552:
553: ln_rg23a_amount NUMBER;
554: ln_rg23c_amount NUMBER;
555: ln_pla_amount NUMBER;
556: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.update_rg_balances';
557:
558: BEGIN
559:
560: IF p_register = 'A' THEN
963: v_address_id NUMBER;
964: v_assessable_value NUMBER;
965: v_conversion_rate NUMBER;
966: v_price_list_uom_code CHAR(4);
967: lv_object_name CONSTANT VARCHAR2 (61) := 'jai_general_pkg.ja_in_vat_assessable_value';
968:
969: -- Added by Jia for Advanced Pricing on 08-Jun-2009, Begin
970: ----------------------------------------------------------------------------------------------------------
971: -- add for record down the release version by Xiao on 24-Jul-2009
1948: app_exception.raise_exception;
1949:
1950: END ja_in_vat_assessable_value;
1951:
1952: END jai_general_pkg;