680: function GENERATE (
681: X_GUID in raw
682: ) return varchar2 is
683: buf varchar2(32000);
684: l_doc xmldom.DOMDocument;
685: l_element xmldom.DOMElement;
686: l_root xmldom.DOMNode;
687: l_node xmldom.DOMNode;
688: l_header xmldom.DOMNode;
681: X_GUID in raw
682: ) return varchar2 is
683: buf varchar2(32000);
684: l_doc xmldom.DOMDocument;
685: l_element xmldom.DOMElement;
686: l_root xmldom.DOMNode;
687: l_node xmldom.DOMNode;
688: l_header xmldom.DOMNode;
689:
682: ) return varchar2 is
683: buf varchar2(32000);
684: l_doc xmldom.DOMDocument;
685: l_element xmldom.DOMElement;
686: l_root xmldom.DOMNode;
687: l_node xmldom.DOMNode;
688: l_header xmldom.DOMNode;
689:
690: l_guid raw(16);
683: buf varchar2(32000);
684: l_doc xmldom.DOMDocument;
685: l_element xmldom.DOMElement;
686: l_root xmldom.DOMNode;
687: l_node xmldom.DOMNode;
688: l_header xmldom.DOMNode;
689:
690: l_guid raw(16);
691: l_system_guid raw(16);
684: l_doc xmldom.DOMDocument;
685: l_element xmldom.DOMElement;
686: l_root xmldom.DOMNode;
687: l_node xmldom.DOMNode;
688: l_header xmldom.DOMNode;
689:
690: l_guid raw(16);
691: l_system_guid raw(16);
692: l_source_type varchar2(80);
737: from wf_event_subscriptions s, wf_events e
738: where s.guid = x_guid
739: and e.guid = s.event_filter_guid;
740:
741: l_doc := xmldom.newDOMDocument;
742: l_root := xmldom.makeNode(l_doc);
743: l_root := wf_event_xml.newtag (l_doc, l_root, wf_event_xml.masterTagName);
744: l_header := wf_event_xml.newtag(l_doc, l_root, m_table_name);
745: l_node := wf_event_xml.newtag(l_doc, l_header, wf_event_xml.versionTagName,
738: where s.guid = x_guid
739: and e.guid = s.event_filter_guid;
740:
741: l_doc := xmldom.newDOMDocument;
742: l_root := xmldom.makeNode(l_doc);
743: l_root := wf_event_xml.newtag (l_doc, l_root, wf_event_xml.masterTagName);
744: l_header := wf_event_xml.newtag(l_doc, l_root, m_table_name);
745: l_node := wf_event_xml.newtag(l_doc, l_header, wf_event_xml.versionTagName,
746: m_package_version);
798: l_node := wf_event_xml.newtag(l_doc, l_header, 'DESCRIPTION',
799: l_DESCRIPTION);
800: l_node := wf_event_xml.newtag(l_doc, l_header, 'EXPRESSION',
801: l_EXPRESSION);
802: xmldom.writeToBuffer(l_root, buf);
803:
804: return buf;
805: exception
806: when others then
836: l_subscription_guid varchar2(32);
837: l_expression varchar2(4000);
838:
839: l_node_name varchar2(255);
840: l_node xmldom.DOMNode;
841: l_child xmldom.DOMNode;
842: l_value varchar2(32000);
843: l_length integer;
844: l_node_list xmldom.DOMNodeList;
837: l_expression varchar2(4000);
838:
839: l_node_name varchar2(255);
840: l_node xmldom.DOMNode;
841: l_child xmldom.DOMNode;
842: l_value varchar2(32000);
843: l_length integer;
844: l_node_list xmldom.DOMNodeList;
845:
840: l_node xmldom.DOMNode;
841: l_child xmldom.DOMNode;
842: l_value varchar2(32000);
843: l_length integer;
844: l_node_list xmldom.DOMNodeList;
845:
846: l_num number;
847: --Bug 3328673
848: --JBES Support for loader
864: l_message := WF_EVENT_SYNCHRONIZE_PKG.SetAgent2('
865: l_message := WF_EVENT_SYNCHRONIZE_PKG.SetAgent2('
866: l_message := WF_EVENT_SYNCHRONIZE_PKG.SetAgent2('
867: l_node_list := wf_event_xml.findTable(l_message, m_table_name);
868: l_length := xmldom.getLength(l_node_list);
869:
870: -- loop through elements that we received.
871: for i in 0..l_length-1 loop
872: l_node := xmldom.item(l_node_list, i);
868: l_length := xmldom.getLength(l_node_list);
869:
870: -- loop through elements that we received.
871: for i in 0..l_length-1 loop
872: l_node := xmldom.item(l_node_list, i);
873: l_node_name := xmldom.getNodeName(l_node);
874: if xmldom.hasChildNodes(l_node) then
875: l_child := xmldom.GetFirstChild(l_node);
876: l_value := xmldom.getNodevalue(l_child);
869:
870: -- loop through elements that we received.
871: for i in 0..l_length-1 loop
872: l_node := xmldom.item(l_node_list, i);
873: l_node_name := xmldom.getNodeName(l_node);
874: if xmldom.hasChildNodes(l_node) then
875: l_child := xmldom.GetFirstChild(l_node);
876: l_value := xmldom.getNodevalue(l_child);
877: else
870: -- loop through elements that we received.
871: for i in 0..l_length-1 loop
872: l_node := xmldom.item(l_node_list, i);
873: l_node_name := xmldom.getNodeName(l_node);
874: if xmldom.hasChildNodes(l_node) then
875: l_child := xmldom.GetFirstChild(l_node);
876: l_value := xmldom.getNodevalue(l_child);
877: else
878: l_value := NULL;
871: for i in 0..l_length-1 loop
872: l_node := xmldom.item(l_node_list, i);
873: l_node_name := xmldom.getNodeName(l_node);
874: if xmldom.hasChildNodes(l_node) then
875: l_child := xmldom.GetFirstChild(l_node);
876: l_value := xmldom.getNodevalue(l_child);
877: else
878: l_value := NULL;
879: end if;
872: l_node := xmldom.item(l_node_list, i);
873: l_node_name := xmldom.getNodeName(l_node);
874: if xmldom.hasChildNodes(l_node) then
875: l_child := xmldom.GetFirstChild(l_node);
876: l_value := xmldom.getNodevalue(l_child);
877: else
878: l_value := NULL;
879: end if;
880: