How To Loop over a Node List

Attune node lists (formerly known as server groups) store data in comma-separated values (CSV) format. This example loops over the replicationServers node list and updates the HOST_DETAILS table based on the CSV text values replicationServerHostIds and replicationServerTypeList.

 1DELETE FROM HOST_DETAILS;
 2
 3set serveroutput on
 4DECLARE
 5  hosts VARCHAR2(200) := '{replicationServers.serverHostnames}';
 6  host_ids VARCHAR2(100) := '{replicationServerHostIds}';
 7  host_types VARCHAR2(100) := '{replicationServerTypeList}';
 8BEGIN
 9  FOR row IN
10  (SELECT trim(regexp_substr(hosts, '[^,]+', 1, LEVEL)) host,
11          trim(regexp_substr(host_ids, '[^,]+', 1, LEVEL)) host_id,
12          trim(regexp_substr(host_types, '[^,]+', 1, LEVEL)) host_type,
13          LEVEL priority
14
15   FROM dual
16    CONNECT BY LEVEL <= regexp_count(hosts, ',')+1
17  )
18  LOOP
19    dbms_output.put_line('Adding server ' || row.host
20                        || ', id=' || row.host_id
21                        || ', type=' || row.host_type
22                        || ', priority=' || row.priority);
23    EXECUTE IMMEDIATE
24       'Insert into ENMAC.HOST_DETAILS ('
25           || 'HOST_NAME,HOST_PRIORITY,HOST_ID,HOST_LAST_TRANSACTION,HOST_STATUS,'
26           || 'HOST_TYPE,HOST_NETWORK,HOST_LAST_ERROR,HOST_GROUP,HOST_SEND_TXNS,HOST_RECV_TXNS,HOST_THIS_SERVER,'
27           || 'HOST_LAST_REQUEST_ID,HOST_TRANSACTION_TIME,LAST_SEND_TRANSACTION_SERIAL,HOST_HALT,'
28           || 'HOST_ROLL_TRANSACTION_ID'
29           || ')'
30           || ' VALUES (''' || row.host || ''',' || row.priority || ',''' || row.host_id || ''''
31           || ',0,1, '|| row.host_type ||' , ''Default'',0,null,''Y'',''Y'',null,null,null,null,null,null)';
32   END LOOP;
33 END;