&response = CreateMessage(Operation.GETWLINSTANCE, %IntBroker_Response);
Local Record &respRec = &response.GetPartRowset(1).GetRow(1).GetRecord(Record.PT_WL_MSGKEYS_W);
&respRec.GetField(Field.PT_REQUEST_MSG_ID).Value = &ReqMsgID;
&respRec.GetField(Field.BUSPROCNAME).Value = &BusProcName;
&respRec.GetField(Field.ACTIVITYNAME).Value = &ActivityName;
&respRec.GetField(Field.EVENTNAME).Value = &EventName;
&respRec.GetField(Field.WORKLISTNAME).Value = &WorklistName;
&respRec.GetField(Field.INSTANCEID).Value = &InstanceID;
&respRec.GetField(Field.TRANSACTIONID).Value = &TransactionID;
&respRec.GetField(Field.INSTSTATUS).Value = &InstanceStatus;
&respRec.GetField(Field.PT_WS_RESP_SENT).Value = &ResponseStatus;
Local XmlDoc &respDoc = CreateXmlDoc(&response.GenXMLPartString(1));
/*return response message for IB to reply*/
Return &response;
peopleCode xml Return
最新推荐文章于 2021-11-23 11:11:39 发布