693: function GENERATE (
694: X_GUID in raw
695: ) return varchar2 is
696: buf varchar2(32000);
697: l_doc xmldom.DOMDocument;
698: l_element xmldom.DOMElement;
699: l_root xmldom.DOMNode;
700: l_node xmldom.DOMNode;
701: l_header xmldom.DOMNode;
694: X_GUID in raw
695: ) return varchar2 is
696: buf varchar2(32000);
697: l_doc xmldom.DOMDocument;
698: l_element xmldom.DOMElement;
699: l_root xmldom.DOMNode;
700: l_node xmldom.DOMNode;
701: l_header xmldom.DOMNode;
702:
695: ) return varchar2 is
696: buf varchar2(32000);
697: l_doc xmldom.DOMDocument;
698: l_element xmldom.DOMElement;
699: l_root xmldom.DOMNode;
700: l_node xmldom.DOMNode;
701: l_header xmldom.DOMNode;
702:
703: l_guid raw(16);
696: buf varchar2(32000);
697: l_doc xmldom.DOMDocument;
698: l_element xmldom.DOMElement;
699: l_root xmldom.DOMNode;
700: l_node xmldom.DOMNode;
701: l_header xmldom.DOMNode;
702:
703: l_guid raw(16);
704: l_system_guid raw(16);
697: l_doc xmldom.DOMDocument;
698: l_element xmldom.DOMElement;
699: l_root xmldom.DOMNode;
700: l_node xmldom.DOMNode;
701: l_header xmldom.DOMNode;
702:
703: l_guid raw(16);
704: l_system_guid raw(16);
705: l_source_type varchar2(80);
750: from wf_event_subscriptions s, wf_events e
751: where s.guid = x_guid
752: and e.guid = s.event_filter_guid;
753:
754: l_doc := xmldom.newDOMDocument;
755: l_root := xmldom.makeNode(l_doc);
756: l_root := wf_event_xml.newtag (l_doc, l_root, wf_event_xml.masterTagName);
757: l_header := wf_event_xml.newtag(l_doc, l_root, m_table_name);
758: l_node := wf_event_xml.newtag(l_doc, l_header, wf_event_xml.versionTagName,
751: where s.guid = x_guid
752: and e.guid = s.event_filter_guid;
753:
754: l_doc := xmldom.newDOMDocument;
755: l_root := xmldom.makeNode(l_doc);
756: l_root := wf_event_xml.newtag (l_doc, l_root, wf_event_xml.masterTagName);
757: l_header := wf_event_xml.newtag(l_doc, l_root, m_table_name);
758: l_node := wf_event_xml.newtag(l_doc, l_header, wf_event_xml.versionTagName,
759: m_package_version);
811: l_node := wf_event_xml.newtag(l_doc, l_header, 'DESCRIPTION',
812: l_DESCRIPTION);
813: l_node := wf_event_xml.newtag(l_doc, l_header, 'EXPRESSION',
814: l_EXPRESSION);
815: xmldom.writeToBuffer(l_root, buf);
816:
817: return buf;
818: exception
819: when others then
849: l_subscription_guid varchar2(32);
850: l_expression varchar2(4000);
851:
852: l_node_name varchar2(255);
853: l_node xmldom.DOMNode;
854: l_child xmldom.DOMNode;
855: l_value varchar2(32000);
856: l_length integer;
857: l_node_list xmldom.DOMNodeList;
850: l_expression varchar2(4000);
851:
852: l_node_name varchar2(255);
853: l_node xmldom.DOMNode;
854: l_child xmldom.DOMNode;
855: l_value varchar2(32000);
856: l_length integer;
857: l_node_list xmldom.DOMNodeList;
858:
853: l_node xmldom.DOMNode;
854: l_child xmldom.DOMNode;
855: l_value varchar2(32000);
856: l_length integer;
857: l_node_list xmldom.DOMNodeList;
858:
859: l_num number;
860: --Bug 3328673
861: --JBES Support for loader
877: l_message := WF_EVENT_SYNCHRONIZE_PKG.SetAgent2('
878: l_message := WF_EVENT_SYNCHRONIZE_PKG.SetAgent2('
879: l_message := WF_EVENT_SYNCHRONIZE_PKG.SetAgent2('
880: l_node_list := wf_event_xml.findTable(l_message, m_table_name);
881: l_length := xmldom.getLength(l_node_list);
882:
883: -- loop through elements that we received.
884: for i in 0..l_length-1 loop
885: l_node := xmldom.item(l_node_list, i);
881: l_length := xmldom.getLength(l_node_list);
882:
883: -- loop through elements that we received.
884: for i in 0..l_length-1 loop
885: l_node := xmldom.item(l_node_list, i);
886: l_node_name := xmldom.getNodeName(l_node);
887: if xmldom.hasChildNodes(l_node) then
888: l_child := xmldom.GetFirstChild(l_node);
889: l_value := xmldom.getNodevalue(l_child);
882:
883: -- loop through elements that we received.
884: for i in 0..l_length-1 loop
885: l_node := xmldom.item(l_node_list, i);
886: l_node_name := xmldom.getNodeName(l_node);
887: if xmldom.hasChildNodes(l_node) then
888: l_child := xmldom.GetFirstChild(l_node);
889: l_value := xmldom.getNodevalue(l_child);
890: else
883: -- loop through elements that we received.
884: for i in 0..l_length-1 loop
885: l_node := xmldom.item(l_node_list, i);
886: l_node_name := xmldom.getNodeName(l_node);
887: if xmldom.hasChildNodes(l_node) then
888: l_child := xmldom.GetFirstChild(l_node);
889: l_value := xmldom.getNodevalue(l_child);
890: else
891: l_value := NULL;
884: for i in 0..l_length-1 loop
885: l_node := xmldom.item(l_node_list, i);
886: l_node_name := xmldom.getNodeName(l_node);
887: if xmldom.hasChildNodes(l_node) then
888: l_child := xmldom.GetFirstChild(l_node);
889: l_value := xmldom.getNodevalue(l_child);
890: else
891: l_value := NULL;
892: end if;
885: l_node := xmldom.item(l_node_list, i);
886: l_node_name := xmldom.getNodeName(l_node);
887: if xmldom.hasChildNodes(l_node) then
888: l_child := xmldom.GetFirstChild(l_node);
889: l_value := xmldom.getNodevalue(l_child);
890: else
891: l_value := NULL;
892: end if;
893: