35: IS
36: l_api_name CONSTANT VARCHAR2(30) := 'SEND_MESSAGE';
37: l_api_version CONSTANT NUMBER := 1.0;
38: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
39: l_xml_clob system.okc_aq_msg_typ;
40: --
41: l_proc varchar2(72) := ' OKC_AQ_PUB.'||'send_message';
42: --
43:
147: IS
148: l_api_name CONSTANT VARCHAR2(30) := 'SEND_MESSAGE';
149: l_api_version CONSTANT NUMBER := 1.0;
150: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
151: l_char_clob system.okc_aq_msg_typ;
152:
153: BEGIN
154: IF p_msg IS NOT NULL THEN
155: -- Call start_activity to create savepoint, check compatibility