3026:
3027: -- Submit the Concurrent Program
3028: IF p_sync_mode = 'PUBLISH' THEN
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;
3027: -- Submit the Concurrent Program
3028: IF p_sync_mode = 'PUBLISH' THEN
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:
3044: );
3045:
3046: ELSIF p_sync_mode = 'DISABLE' THEN
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;
3045:
3046: ELSIF p_sync_mode = 'DISABLE' THEN
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:
3066:
3067:
3068: IF NVL(x_request_id,0) = 0 THEN
3069: -- Could Not submit Conc Pgm
3070: fnd_message.set_name('OKC','OKC_XPRT_SUB_CZ_RUL_PGM');
3071: RAISE FND_API.G_EXC_ERROR;
3072: END IF; -- x_request_id is 0
3073:
3074: