Message Flow for ESB 8

>>>>>>>>CreateBusinessFlow
--Create Business Log
CREATE COMPUTE MODULE EndBusinessLog
CREATE FUNCTION Main() RETURNS BOOLEAN
BEGIN
CALL CopyEntireMessage();

--登記ISP請求的返回日誌
Call Common.addBusinessMsgLog(Environment.Variables.IntObjectFormat,
Common.getNormalModule(),
Common.getResponseType(),
InputRoot.*[<],
Environment);
--更新結束時間以及日誌狀態
CALL Common.buildBusinessEndLog(Environment.Variables.status,Environment.Variables.RequestHeader.RetCode,Common.getProExcDef(),Environment.Variables.RequestHeader.RetMsg,Environment);
RETURN TRUE;
END;
CREATE PROCEDURE CopyEntireMessage() BEGIN
SET OutputRoot = InputRoot;
END;
END MODULE;


>>>>>>>BusinessLog_receiver
--Compute
CREATE COMPUTE MODULE BusinessLog_receiver_Compute
CREATE FUNCTION Main() RETURNS BOOLEAN
BEGIN
-- CALL CopyMessageHeaders();
-- CALL CopyEntireMessage();
set OutputRoot.XMLNSC.EsbBusinessLog = Environment.EsbBusinessLog;
RETURN TRUE;
END;
END MODULE;