129: G_OKC_NO_PROCEDURE_VAR_S CONSTANT VARCHAR2(30) := 'OKC_XPRT_NO_PROCEDURE_VAR_S';
130: G_OKC_INVALID_PROCEDURE_VAR CONSTANT VARCHAR2(30) := 'OKC_XPRT_INV_PROCEDURE_VAR';
131: G_OKC_INVALID_PROCEDURE_VAR_S CONSTANT VARCHAR2(30) := 'OKC_XPRT_INV_PROCEDURE_VAR_S';
132:
133: g_concat_art_no VARCHAR2(1) := NVL(FND_PROFILE.VALUE('OKC_CONCAT_ART_NO'),'N');
134:
135:
136: ---------------------------------------------------
137: -- Private Functions and Procedures
1552: CURSOR csr_sell_item_exists(p_concatenated_segments VARCHAR2) IS
1553: select 'X'
1554: from MTL_SYSTEM_ITEMS_VL
1555: where organization_id =
1556: TO_NUMBER(oe_sys_parameters.value('MASTER_ORGANIZATION_ID', to_number(fnd_profile.value('ORG_ID'))))
1557: AND (bom_item_type = 1 OR bom_item_type = 4)
1558: AND vendor_warranty_flag = 'N'
1559: AND primary_uom_code <> 'ENR'
1560: AND concatenated_segments = p_concatenated_segments
2676: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2677: RAISE FND_API.G_EXC_ERROR;
2678: END IF;
2679:
2680: select fnd_profile.value('OKC_DISABLE_CYCLIC_CHECK') into cyclic_check_flag from dual;
2681:
2682: IF (NVL(cyclic_check_flag,'N')='N') THEN
2683:
2684: check_circular_dependency
3029:
3030: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CPRG_ACT_MSG');
3031: l_conc_pgm_desc := FND_MESSAGE.get;
3032:
3033: SELECT fnd_profile.Value('OKC_USE_CONTRACTS_RULES_ENGINE') INTO l_okc_rules_engine FROM dual;
3034: SELECT Decode(Nvl(l_okc_rules_engine,'N'),'Y','OKC_XPRT_PUBLISH_RULES_OKC','OKC_XPRT_PUBLISH_RULES') INTO l_conc_pgm FROM dual;
3035:
3036:
3037: x_request_id := fnd_request.submit_request
3047:
3048: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CPRG_DIS_MSG');
3049: l_conc_pgm_desc := FND_MESSAGE.get;
3050:
3051: SELECT fnd_profile.Value('OKC_USE_CONTRACTS_RULES_ENGINE') INTO l_okc_rules_engine FROM dual;
3052: SELECT Decode(Nvl(l_okc_rules_engine,'N'),'Y','OKC_XPRT_DISABLE_RULES_OKC','OKC_XPRT_DISABLE_RULES') INTO l_conc_pgm FROM dual;
3053:
3054: x_request_id := fnd_request.submit_request
3055: (application => 'OKC',