Utilize a subárvore Destino para configurar os destinos de destino que são utilizados pelos nós de saída, os nós HTTPRequest, SOAPRequest, SOAPAsyncRequest, e RouteToLabel. Os exemplos a seguir mostram como é possível criar e utilizar o procedimento ESQL para executar a tarefa de configuração de valores para cada uma dessas utilizações.
Copie e utilize estes procedimentos conforme mostrado ou você pode modificar ou estendê-los para desempenhar tarefas semelhantes.
CREATE PROCEDURE addToMQDestinationList(IN LocalEnvironment REFERENCE, IN newQueue char) BEGIN /******************************************************************************* * Um procedimento que inclui o nome da fila na lista de destinos MQ no ambiente local. * Esta lista é utilizada por um nó MQOutput que possui seus modos configurados na lista de Destinos. * * EM LocalEnvironment: o Ambiente Local a ser modificado. * Configure este valor para OutputLocalEnvironment ao chamar este procedimento * NA fila: a fila a ser incluída à lista * *******************************************************************************/ DECLARE I INTEGER CARDINALITY(LocalEnvironment.Destination.MQ.DestinationData[]); IF I = 0 THEN SET LocalEnvironment.Destination.MQ.DestinationData[1].queueName = newQueue; ELSE SET LocalEnvironment.Destination.MQ.DestinationData[I+1].queueName = newQueue; END IF; END;
CREATE PROCEDURE overrideDefaultHTTPRequestURL(IN LocalEnvironment REFERENCE, IN newUrl char) BEGIN /******************************************************************************* * Um procedimento que irá alterar a URL à qual o nó HTTPRequest enviará o pedido. * * EM LocalEnvironment: o Ambiente Local a ser modificado. * Configure este valor para OutputLocalEnvironment ao chamar este procedimento * Fila IN: a URL para o qual enviar o pedido. * *******************************************************************************/ set LocalEnvironment.Destination.HTTP.RequestURL = newUrl; END;
CREATE PROCEDURE addToRouteToLabelList(IN LocalEnvironment REFERENCE, IN newLabel char) BEGIN /******************************************************************************* * Um procedimento que incluirá um nome de rótulo na lista RouteToLabel no ambiente local. * Esta lista é utilizada por um nó RoteToLabel. * * EM LocalEnvironment: o Ambiente Local a ser modificado. * Configure este valor para OutputLocalEnvironment ao chamar este procedimento * NO rótulo: rótulo a ser incluído na lista * *******************************************************************************/ if LocalEnvironment.Destination.RouterList.DestinationData is null then set LocalEnvironment.Destination.RouterList.DestinationData."label" = newLabel; else create LASTCHILD OF LocalEnvironment.Destination.RouterList.DestinationData NAME 'label' VALUE newLabel; end if; END;