IBM WMB 使用方法

第一部分； webservice 调用 webservice

注意：webservice一般传来的是字符串（具体情况要看DEBUG中的数据数值）
一般队列传过来的xml消息不需要转化成逻辑树（ROW格式）
BROKER SCHEMA gen
CREATE COMPUTE MODULE funMain_Request_Response_CALL_HIS_ZZYY
CREATE FUNCTION Main() RETURNS BOOLEAN
BEGIN
–将MsgId赋值给CorrelId，Environment逻辑树主要用于存储配置信息
SET Environment.MQMD.CorrelId=InputRoot.MQMD.MsgId;
SET Environment.Encoding = InputRoot.Properties.Encoding;
SET Environment.CodedCharSetId = InputRoot.Properties.CodedCharSetId;
–命名空间在与区别相同的结构
DECLARE ws NAMESPACE ‘http://provide.ws.hosws.greatsoft.net/‘;
DECLARE ns NAMESPACE ‘http://his_zzyy‘;
–获得message逻辑树中InputRoot.XMLNSC.ns:funMain.input中的节点的值为传入队列或者传入webservice的多有数据
DECLARE inputString CHAR InputRoot.XMLNSC.ns:funMain.input;
–将输入string转成XML逻辑树才能指定节点赋值，不然就是整体一个字符串怎么指定字节
–具体顺序是传进来的是inputString（CHAR）然后转换成subBitStream（BLOB）最后转化成myRow（ROW）如下：
DECLARE subBitStream BLOB;
DECLARE myRow ROW;
SET subBitStream = CAST(inputString as BLOB CCSID 1208);
CREATE LASTCHILD OF myRow DOMAIN (‘XMLNSC’)
PARSE(subBitStream,Environment.Encoding,Environment.CodedCharSetId);
–通过Fid来判断服务并调用相应的webservice
declare who char myRow.XMLNSC.ESBEntry.MessageHeader.Fid;
–并且把调用的webservice所需的字符串赋值
DECLARE wholeMsgChar CHAR myRow.XMLNSC.ESBEntry.MsgInfo.Msg;
IF who = ‘MS02004’ THEN
SET OutputRoot.XMLNSC.ws:QueryPatientInfoXML.ws:strxml = wholeMsgChar;
ELSEIF who = ‘MS02005’ THEN
SET OutputRoot.XMLNSC.ws:GetDeptListXML.ws:strxml = wholeMsgChar;
ELSEIF who = ‘MS02006’ THEN
SET OutputRoot.XMLNSC.ws:GetDoctorListXML.ws:strxml = wholeMsgChar;
ELSEIF who = ‘BS10035’ THEN
SET OutputRoot.XMLNSC.ws:ReserveXML.ws:strxml = wholeMsgChar;
ELSEIF who = ‘BS10038’ THEN
SET OutputRoot.XMLNSC.ws:GetTicketListXML.ws:strxml = wholeMsgChar;
ELSEIF who = ‘BS10036’ THEN
SET OutputRoot.XMLNSC.ws:CancelReserveXML.ws:strxml = wholeMsgChar;
ELSEIF who = ‘BS10037’ THEN
SET OutputRoot.XMLNSC.ws:GetReserveHistoryXML.ws:strxml = wholeMsgChar;
END IF;
–结束并输出到out节点(终端)
PROPAGATE TO TERMINAL ‘out’;
RETURN FALSE;
END;

END MODULE;

IBM WMB 使用方法相关推荐

ibm服务器电脑维修部电话,ibm有哪些电脑维修点 ibm电脑维修方法及维修点介绍【图文】...
ibm电脑是属于商务型的电脑,由于ibm电脑在相同情况下比其他品牌的电脑安全性更高,因此在更多的商务人士更更愿意使用ibm电脑.但是我们应该知道,任何一款产品,即便质量品牌再怎么好,使用的时间久了,难 ...
IBM MQ监控方法
2019-10-25 18:26:12 IBM MQ监控工具已开源,参见: https://github.com/zollty/IBM-MQ-Monitoring-Script 1.检查连接数 1)底 ...
java 连接IBM MQ的方法和常见问题
第一步:建立新项目,如下图所示第二步:导入jar包,以上八个jar是必须的,如果网上可以下载connector-1.0.jar也导入: 第三步:配置pom.xml文件如下图所示: 第四步:配置cla ...
IBM 客户拜访模式及特色销售方法简介
IBM 客户拜访模式及特色销售方法简介 IBM 客户拜访模式及特色销售方法简介在最近对合作伙伴的拜访中, 许多公司老总都会提到销售队伍缺乏经验, 如何培养和锻炼这些年轻的销售人员, 不再事无巨细, ...
漫谈IBM Power VM历史及其特点
漫谈IBM Power VM历史及其特点 IBM虚拟化是在微软.思杰.VMware等同样拥有自己产品和解决方案的众多厂商中,历史最为久远和成熟的代表,本文将对IBM Power VM的历史及其特点进行 ...
仅用一年时间，蓝巨人 IBM 如何开发出首台个人计算机？
作者 | Michal Necasek 译者 | 弯月出品 | CSDN(ID:CSDNnews) 距离 1981 年 8 月 IBM 发布 PC 机,已经过去 40 年了. 但早在一年前,也就是 ...
IBM罗睿兰的“告别信”
点击蓝字关注了解更多 IBM公司日前发布2019年度报告,IBM罗睿兰在她作为CEO给全球投资者的最后一封信中,分享了IBM 2019年的财务成果,详细介绍了公司为奠定未来发展的坚实基础而做出的诸多 ...
虚拟化IBM HMC
IBM HMC(Hardware Management Console)是独立于Power服务器的外置系统,将Power服务器的HMC接口和HMC服务器接入同一个网络,那么可以使用HMC系统对Powe ...
IBM刀片配置RHCS for centos6
最近公司在搞个运营平台,使用了比较新的环境,项目差不多了,于是决定抽出时间来把过程经历和大家分享下,有需要的朋友可以借鉴借鉴. 硬件环境:IBM Blade Center H .HS22.DS5020 ...
IBM董事长亲自站台，开源为什么对IBM这么重要？
在2019年2月12日-15日的IBM Think 2019大会上,IBM董事长.总裁及首席执行官Ginni Rometty亲自参与了除主旨演讲之外的唯一一个分论坛并担任对话环节主持人,这就是&quo ...

IBM WMB 使用方法

END MODULE;

IBM WMB 使用方法相关推荐

最新文章

热门文章