838: SELECT cim.number_of_items,
839: cim.object1_id1,
840: cim.object1_id2
841: FROM OKC_K_ITEMS CIM,
842: OKC_K_LINES_B MDL,
843: OKC_LINE_STYLES_B MDL_LSE,
844: OKC_K_LINES_B INST
845: WHERE CIM.CLE_ID = MDL.ID
846: AND MDL.CLE_ID = INST.CLE_ID
840: cim.object1_id2
841: FROM OKC_K_ITEMS CIM,
842: OKC_K_LINES_B MDL,
843: OKC_LINE_STYLES_B MDL_LSE,
844: OKC_K_LINES_B INST
845: WHERE CIM.CLE_ID = MDL.ID
846: AND MDL.CLE_ID = INST.CLE_ID
847: AND MDL.LSE_ID = MDL_LSE.ID
848: AND MDL_LSE.LTY_CODE = G_MODEL_LINE_LTY_CODE
1469: SELECT cim.number_of_items,
1470: cim.object1_id1,
1471: cim.object1_id2
1472: FROM OKC_K_ITEMS CIM,
1473: OKC_K_LINES_B MDL,
1474: OKC_K_LINES_B INST
1475: WHERE CIM.CLE_ID = MDL.ID
1476: AND MDL.CLE_ID = INST.CLE_ID
1477: AND MDL.LSE_ID = G_MODEL_LINE_LTY_ID
1470: cim.object1_id1,
1471: cim.object1_id2
1472: FROM OKC_K_ITEMS CIM,
1473: OKC_K_LINES_B MDL,
1474: OKC_K_LINES_B INST
1475: WHERE CIM.CLE_ID = MDL.ID
1476: AND MDL.CLE_ID = INST.CLE_ID
1477: AND MDL.LSE_ID = G_MODEL_LINE_LTY_ID
1478: AND INST.ID = p_inst_line_id;
1514: AND NVL(ACTIVE_END_DATE,(p_khr_start_date+1)) > p_khr_start_date
1515: AND ROWNUM = 1
1516: AND NOT EXISTS
1517: (SELECT CLE.DNZ_CHR_ID
1518: FROM OKC_K_LINES_B CLE,
1519: OKC_LINE_STYLES_B CLS,
1520: OKC_K_ITEMS CIM,
1521: OKX_INSTALL_ITEMS_V CIX,
1522: OKL_K_HEADERS KHR
1534: FROM okc_k_headers_b CHR
1535: WHERE chr.id = p_contract_id
1536: AND EXISTS (SELECT '1'
1537: FROM okc_line_styles_b lse,
1538: okc_k_lines_b cle
1539: WHERE cle.sts_code = 'APPROVED'
1540: AND lse.id = cle.lse_id
1541: AND lse.lty_code = 'USAGE'
1542: AND cle.dnz_chr_id = chr.id);
1946: --cursor to get ib line
1947: Cursor ib_line_csr(p_chrv_id IN Number) is
1948: SELECT cle.id,
1949: cle.cle_id
1950: from okc_k_lines_b cle,
1951: okc_statuses_b sts -- 4698117
1952: where cle.lse_id = G_IB_LINE_LTY_ID
1953: and cle.dnz_chr_id = p_chrv_id
1954: and cle.sts_code = sts.code
1983: l_primary_uom_code mtl_system_items.primary_uom_code%TYPE;
1984: --rkuttiya added for bug #6795295
1985: l_start_date DATE;
1986:
1987: TYPE ib_cle_id_tbl is table of okc_k_lines_b.id%TYPE INDEX BY BINARY_INTEGER;
1988: l_ib_cle_id_tbl ib_cle_id_tbl;
1989:
1990: TYPE inst_cle_id_tbl is table of okc_k_lines_b.cle_id%TYPE INDEX BY BINARY_INTEGER;
1991: l_inst_cle_id_tbl inst_cle_id_tbl;
1986:
1987: TYPE ib_cle_id_tbl is table of okc_k_lines_b.id%TYPE INDEX BY BINARY_INTEGER;
1988: l_ib_cle_id_tbl ib_cle_id_tbl;
1989:
1990: TYPE inst_cle_id_tbl is table of okc_k_lines_b.cle_id%TYPE INDEX BY BINARY_INTEGER;
1991: l_inst_cle_id_tbl inst_cle_id_tbl;
1992:
1993: TYPE ib_inst_rec_type IS RECORD (
1994: ib_cle_id OKC_K_LINES_B.id%TYPE ,
1990: TYPE inst_cle_id_tbl is table of okc_k_lines_b.cle_id%TYPE INDEX BY BINARY_INTEGER;
1991: l_inst_cle_id_tbl inst_cle_id_tbl;
1992:
1993: TYPE ib_inst_rec_type IS RECORD (
1994: ib_cle_id OKC_K_LINES_B.id%TYPE ,
1995: inst_cle_id OKC_K_LINES_B.cle_id %TYPE);
1996:
1997: TYPE ib_inst_tbl_type IS TABLE OF ib_inst_rec_type INDEX BY BINARY_INTEGER;
1998: l_ib_inst_tbl ib_inst_tbl_type;
1991: l_inst_cle_id_tbl inst_cle_id_tbl;
1992:
1993: TYPE ib_inst_rec_type IS RECORD (
1994: ib_cle_id OKC_K_LINES_B.id%TYPE ,
1995: inst_cle_id OKC_K_LINES_B.cle_id %TYPE);
1996:
1997: TYPE ib_inst_tbl_type IS TABLE OF ib_inst_rec_type INDEX BY BINARY_INTEGER;
1998: l_ib_inst_tbl ib_inst_tbl_type;
1999: l_counter NUMBER;
2226: Cursor ib_line_csr(p_fin_ast_cle_id IN Number, p_lty_code IN VARCHAR2) is
2227: SELECT cle.id,
2228: cle.cle_id,
2229: cle.dnz_chr_id
2230: from okc_k_lines_b cle,
2231: okc_line_styles_b lse,
2232: okc_k_lines_b inst_cle,
2233: okc_line_styles_b inst_cle_lse
2234: where lse.id = cle.lse_id
2228: cle.cle_id,
2229: cle.dnz_chr_id
2230: from okc_k_lines_b cle,
2231: okc_line_styles_b lse,
2232: okc_k_lines_b inst_cle,
2233: okc_line_styles_b inst_cle_lse
2234: where lse.id = cle.lse_id
2235: and lse.lty_code = p_lty_code
2236: and cle.cle_id = inst_cle.id
2250: --Bug#2522268
2251: --And sts2.ste_code in ('HOLD','EXPIRED','TERMINATED','CANCELED'));
2252: And sts2.ste_code in ('HOLD','EXPIRED','TERMINATED','CANCELLED'));
2253:
2254: l_ib_cle_id OKC_K_LINES_B.ID%TYPE;
2255: l_inst_cle_id OKC_K_LINES_B.ID%TYPE;
2256: l_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
2257:
2258: l_ib_line_lty_code VARCHAR2(200) := G_IB_LINE_LTY_CODE;
2251: --And sts2.ste_code in ('HOLD','EXPIRED','TERMINATED','CANCELED'));
2252: And sts2.ste_code in ('HOLD','EXPIRED','TERMINATED','CANCELLED'));
2253:
2254: l_ib_cle_id OKC_K_LINES_B.ID%TYPE;
2255: l_inst_cle_id OKC_K_LINES_B.ID%TYPE;
2256: l_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
2257:
2258: l_ib_line_lty_code VARCHAR2(200) := G_IB_LINE_LTY_CODE;
2259: l_ib_line_count NUMBER default 0;
2252: And sts2.ste_code in ('HOLD','EXPIRED','TERMINATED','CANCELLED'));
2253:
2254: l_ib_cle_id OKC_K_LINES_B.ID%TYPE;
2255: l_inst_cle_id OKC_K_LINES_B.ID%TYPE;
2256: l_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
2257:
2258: l_ib_line_lty_code VARCHAR2(200) := G_IB_LINE_LTY_CODE;
2259: l_ib_line_count NUMBER default 0;
2260: l_cimv_tbl cimv_tbl_type;
2443: iti.object_id1_new,
2444: trx.id tas_id,
2445: cleb_ib.id cleb_ib_id
2446: From okc_k_items cim_ib,
2447: okc_k_lines_b cleb_ib,
2448: okc_line_styles_b lseb_ib,
2449: okc_statuses_b stsb,
2450: okl_txl_itm_insts iti,
2451: okl_trx_assets trx,
2829: p_cle_id IN NUMBER) IS
2830: SELECT mtl.serial_number_control_code
2831: FROM mtl_system_items mtl,
2832: okc_k_headers_b chrb,
2833: okc_k_lines_b cleb
2834: WHERE mtl.inventory_item_id = p_inv_item_id
2835: AND mtl.organization_id = chrb.inv_organization_id
2836: AND chrb.id = cleb.dnz_chr_id
2837: AND cleb.id = p_cle_id;
2922: Cursor ib_line_csr(p_chrv_id IN Number,
2923: p_fin_ast_cle_id IN Number) is
2924: SELECT ib_cle.id,
2925: ib_cle.cle_id
2926: from okc_k_lines_b ib_cle,
2927: okc_k_lines_b inst_cle,
2928: okc_statuses_b inst_sts
2929: where ib_cle.lse_id = G_IB_LINE_LTY_ID
2930: and ib_cle.dnz_chr_id = p_chrv_id
2923: p_fin_ast_cle_id IN Number) is
2924: SELECT ib_cle.id,
2925: ib_cle.cle_id
2926: from okc_k_lines_b ib_cle,
2927: okc_k_lines_b inst_cle,
2928: okc_statuses_b inst_sts
2929: where ib_cle.lse_id = G_IB_LINE_LTY_ID
2930: and ib_cle.dnz_chr_id = p_chrv_id
2931: AND inst_sts.code = ib_cle.sts_code
2945: p_fin_ast_cle_id in number) is
2946: select chr.ORIG_SYSTEM_ID1 orig_chr_id,
2947: cle.orig_system_id1 orig_fin_ast_cle_id
2948: from okc_k_headers_b chr,
2949: okc_k_lines_b cle
2950: where chr.id = p_chr_id
2951: and cle.id = p_fin_ast_cle_id
2952: and cle.chr_id = p_chr_id
2953: and cle.dnz_chr_id = p_chr_id;
2960:
2961: SELECT orig_ib_cle.id orig_ib_cle_id,
2962: orig_ib_cle.cle_id orig_inst_cle_id,
2963: orig_ib_cle.orig_system_id1 rbk_ib_cle_id
2964: FROM okc_k_lines_b orig_ib_cle,
2965: okc_k_lines_b orig_inst_cle,
2966: okc_k_lines_b rbk_inst_cle,
2967: okc_statuses_b inst_sts
2968: WHERE orig_inst_cle.dnz_chr_id = p_orig_chr_id
2961: SELECT orig_ib_cle.id orig_ib_cle_id,
2962: orig_ib_cle.cle_id orig_inst_cle_id,
2963: orig_ib_cle.orig_system_id1 rbk_ib_cle_id
2964: FROM okc_k_lines_b orig_ib_cle,
2965: okc_k_lines_b orig_inst_cle,
2966: okc_k_lines_b rbk_inst_cle,
2967: okc_statuses_b inst_sts
2968: WHERE orig_inst_cle.dnz_chr_id = p_orig_chr_id
2969: AND orig_inst_cle.cle_id = p_orig_fin_ast_cle_id
2962: orig_ib_cle.cle_id orig_inst_cle_id,
2963: orig_ib_cle.orig_system_id1 rbk_ib_cle_id
2964: FROM okc_k_lines_b orig_ib_cle,
2965: okc_k_lines_b orig_inst_cle,
2966: okc_k_lines_b rbk_inst_cle,
2967: okc_statuses_b inst_sts
2968: WHERE orig_inst_cle.dnz_chr_id = p_orig_chr_id
2969: AND orig_inst_cle.cle_id = p_orig_fin_ast_cle_id
2970: AND orig_inst_cle.lse_id = G_INST_LINE_LTY_ID
2987: SELECT orig_ib_cle.id ib_cle_id,
2988: orig_ib_cle.cle_id inst_cle_id,
2989: orig_ib_cim.object1_id1 instance_id
2990: FROM okc_k_items orig_ib_cim,
2991: okc_k_lines_b orig_ib_cle,
2992: okc_k_lines_b orig_inst_cle,
2993: okc_statuses_b inst_sts
2994: WHERE orig_inst_cle.dnz_chr_id = p_orig_chr_id
2995: AND orig_inst_cle.cle_id = p_orig_fin_ast_cle_id
2988: orig_ib_cle.cle_id inst_cle_id,
2989: orig_ib_cim.object1_id1 instance_id
2990: FROM okc_k_items orig_ib_cim,
2991: okc_k_lines_b orig_ib_cle,
2992: okc_k_lines_b orig_inst_cle,
2993: okc_statuses_b inst_sts
2994: WHERE orig_inst_cle.dnz_chr_id = p_orig_chr_id
2995: AND orig_inst_cle.cle_id = p_orig_fin_ast_cle_id
2996: AND orig_inst_cle.lse_id = G_INST_LINE_LTY_ID
3003: AND inst_sts.code = orig_ib_cle.sts_code
3004: AND inst_sts.ste_code NOT IN ('HOLD', 'EXPIRED', 'TERMINATED', 'CANCELLED')
3005: AND NOT EXISTS (
3006: SELECT 1
3007: FROM okc_k_lines_b rbk_inst_cle,
3008: okc_statuses_b rbk_inst_sts
3009: WHERE rbk_inst_cle.orig_system_id1 = orig_inst_cle.id
3010: AND rbk_inst_cle.lse_id = G_INST_LINE_LTY_ID
3011: AND rbk_inst_cle.dnz_chr_id = p_rbk_chr_id
3023: rbk_ib_cle.id rbk_ib_cle_id,
3024: rbk_ib_cle.cle_id rbk_inst_cle_id,
3025: TO_NUMBER(ib_cim.object1_id1) instance_id,
3026: ib_cim.id orig_ib_cim_id
3027: FROM okc_k_lines_b orig_ib_cle,
3028: okc_k_lines_b orig_inst_cle,
3029: okc_k_lines_b rbk_inst_cle,
3030: okc_k_lines_b rbk_ib_cle,
3031: okc_statuses_b inst_sts,
3024: rbk_ib_cle.cle_id rbk_inst_cle_id,
3025: TO_NUMBER(ib_cim.object1_id1) instance_id,
3026: ib_cim.id orig_ib_cim_id
3027: FROM okc_k_lines_b orig_ib_cle,
3028: okc_k_lines_b orig_inst_cle,
3029: okc_k_lines_b rbk_inst_cle,
3030: okc_k_lines_b rbk_ib_cle,
3031: okc_statuses_b inst_sts,
3032: okc_k_items ib_cim
3025: TO_NUMBER(ib_cim.object1_id1) instance_id,
3026: ib_cim.id orig_ib_cim_id
3027: FROM okc_k_lines_b orig_ib_cle,
3028: okc_k_lines_b orig_inst_cle,
3029: okc_k_lines_b rbk_inst_cle,
3030: okc_k_lines_b rbk_ib_cle,
3031: okc_statuses_b inst_sts,
3032: okc_k_items ib_cim
3033: WHERE orig_inst_cle.dnz_chr_id = p_orig_chr_id
3026: ib_cim.id orig_ib_cim_id
3027: FROM okc_k_lines_b orig_ib_cle,
3028: okc_k_lines_b orig_inst_cle,
3029: okc_k_lines_b rbk_inst_cle,
3030: okc_k_lines_b rbk_ib_cle,
3031: okc_statuses_b inst_sts,
3032: okc_k_items ib_cim
3033: WHERE orig_inst_cle.dnz_chr_id = p_orig_chr_id
3034: AND orig_inst_cle.cle_id = p_orig_fin_ast_cle_id
3076: p_chr_id IN NUMBER) is
3077: SELECT csi_item.inventory_item_id
3078: FROM csi_item_instances csi_item,
3079: okc_k_items ib_cim,
3080: okc_k_lines_b ib_cle,
3081: okc_k_lines_b inst_cle,
3082: okc_statuses_b inst_sts
3083: WHERE ib_cim.cle_id = ib_cle.id
3084: AND ib_cim.dnz_chr_id = p_chr_id
3077: SELECT csi_item.inventory_item_id
3078: FROM csi_item_instances csi_item,
3079: okc_k_items ib_cim,
3080: okc_k_lines_b ib_cle,
3081: okc_k_lines_b inst_cle,
3082: okc_statuses_b inst_sts
3083: WHERE ib_cim.cle_id = ib_cle.id
3084: AND ib_cim.dnz_chr_id = p_chr_id
3085: AND inst_cle.cle_id = p_fin_ast_cle_id
3097: SELECT cim.number_of_items,
3098: cim.object1_id1,
3099: cim.object1_id2
3100: FROM OKC_K_ITEMS CIM,
3101: OKC_K_LINES_B MDL,
3102: OKC_LINE_STYLES_B MDL_LSE
3103: WHERE CIM.CLE_ID = MDL.ID
3104: AND MDL.CLE_ID = p_fin_ast_cle_id
3105: AND MDL.LSE_ID = MDL_LSE.ID
3119: l_rbk_serialized VARCHAR2(1) DEFAULT OKL_API.G_FALSE;
3120: -- gboomina Bug 5362977 - End
3121:
3122: l_orig_k_id okc_k_headers_b.id%type;
3123: l_orig_fin_ast_cle_id okc_k_lines_b.id%type;
3124: l_instance_id okc_k_items.id%type;
3125: l_instance_cle_id okc_k_items.cle_id%type;
3126:
3127: l_instance_rec CSI_DATASTRUCTURES_PUB.instance_rec;
3151: -- gboomina Bug 5362977 - End
3152:
3153: l_trx_type VARCHAR2(30) := G_TRX_LINE_TYPE_REBOOK;
3154:
3155: ib_line_id okc_k_lines_b.id%type;
3156: ib_line_cle_id okc_k_lines_b.cle_id%type;
3157:
3158: rbk_ib_line_id okc_k_lines_b.id%type;
3159: rbk_ib_line_cle_id okc_k_lines_b.cle_id%type;
3152:
3153: l_trx_type VARCHAR2(30) := G_TRX_LINE_TYPE_REBOOK;
3154:
3155: ib_line_id okc_k_lines_b.id%type;
3156: ib_line_cle_id okc_k_lines_b.cle_id%type;
3157:
3158: rbk_ib_line_id okc_k_lines_b.id%type;
3159: rbk_ib_line_cle_id okc_k_lines_b.cle_id%type;
3160:
3154:
3155: ib_line_id okc_k_lines_b.id%type;
3156: ib_line_cle_id okc_k_lines_b.cle_id%type;
3157:
3158: rbk_ib_line_id okc_k_lines_b.id%type;
3159: rbk_ib_line_cle_id okc_k_lines_b.cle_id%type;
3160:
3161: l_party_tbl party_tbl_type;
3162: l_party_account NUMBER;
3155: ib_line_id okc_k_lines_b.id%type;
3156: ib_line_cle_id okc_k_lines_b.cle_id%type;
3157:
3158: rbk_ib_line_id okc_k_lines_b.id%type;
3159: rbk_ib_line_cle_id okc_k_lines_b.cle_id%type;
3160:
3161: l_party_tbl party_tbl_type;
3162: l_party_account NUMBER;
3163: l_inv_mstr_org_id NUMBER;