DBA Data[Home] [Help]

APPS.PER_ZA_WSP_XML_GEN_PKG dependencies on XMLDOM

Line 36: type xml_dom_table is table of xmldom.DOMNode index by binary_integer;

32: --
33: g_package constant varchar2(31) := 'PER_ZA_WSP_XML_GEN_PKG.';
34: g_debug boolean;
35: --
36: type xml_dom_table is table of xmldom.DOMNode index by binary_integer;
37: --
38: g_xml_dom xmldom.DOMDocument;
39: g_node_list xml_dom_table;
40: --

Line 38: g_xml_dom xmldom.DOMDocument;

34: g_debug boolean;
35: --
36: type xml_dom_table is table of xmldom.DOMNode index by binary_integer;
37: --
38: g_xml_dom xmldom.DOMDocument;
39: g_node_list xml_dom_table;
40: --
41: g_root_level constant binary_integer := 0;
42: g_company_level constant binary_integer := 1;

Line 101: parent_node xmldom.DOMNode;

97: procedure update_dom( p_name varchar2
98: , p_text varchar2
99: , p_level binary_integer) is
100:
101: parent_node xmldom.DOMNode;
102:
103: item_node xmldom.DOMNode;
104: item_elmt xmldom.DOMElement;
105: item_text xmldom.DOMText;

Line 103: item_node xmldom.DOMNode;

99: , p_level binary_integer) is
100:
101: parent_node xmldom.DOMNode;
102:
103: item_node xmldom.DOMNode;
104: item_elmt xmldom.DOMElement;
105: item_text xmldom.DOMText;
106:
107: begin

Line 104: item_elmt xmldom.DOMElement;

100:
101: parent_node xmldom.DOMNode;
102:
103: item_node xmldom.DOMNode;
104: item_elmt xmldom.DOMElement;
105: item_text xmldom.DOMText;
106:
107: begin
108: parent_node := g_node_list(p_level);

Line 105: item_text xmldom.DOMText;

101: parent_node xmldom.DOMNode;
102:
103: item_node xmldom.DOMNode;
104: item_elmt xmldom.DOMElement;
105: item_text xmldom.DOMText;
106:
107: begin
108: parent_node := g_node_list(p_level);
109:

Line 110: item_elmt := xmldom.createElement(g_xml_dom, p_name);

106:
107: begin
108: parent_node := g_node_list(p_level);
109:
110: item_elmt := xmldom.createElement(g_xml_dom, p_name);
111: item_node := xmldom.appendChild(parent_node, xmldom.makeNode(item_elmt));
112:
113: if p_text is not null
114: then

Line 111: item_node := xmldom.appendChild(parent_node, xmldom.makeNode(item_elmt));

107: begin
108: parent_node := g_node_list(p_level);
109:
110: item_elmt := xmldom.createElement(g_xml_dom, p_name);
111: item_node := xmldom.appendChild(parent_node, xmldom.makeNode(item_elmt));
112:
113: if p_text is not null
114: then
115: item_text := xmldom.createTextNode(g_xml_dom, p_text);

Line 115: item_text := xmldom.createTextNode(g_xml_dom, p_text);

111: item_node := xmldom.appendChild(parent_node, xmldom.makeNode(item_elmt));
112:
113: if p_text is not null
114: then
115: item_text := xmldom.createTextNode(g_xml_dom, p_text);
116: item_node := xmldom.appendChild(item_node, xmldom.makeNode(item_text));
117: end if;
118:
119: g_node_list(p_level+1) := item_node;

Line 116: item_node := xmldom.appendChild(item_node, xmldom.makeNode(item_text));

112:
113: if p_text is not null
114: then
115: item_text := xmldom.createTextNode(g_xml_dom, p_text);
116: item_node := xmldom.appendChild(item_node, xmldom.makeNode(item_text));
117: end if;
118:
119: g_node_list(p_level+1) := item_node;
120: end update_dom;

Line 1002: main_node xmldom.DOMNode;

998: , p_xml out nocopy clob) is
999:
1000: l_proc varchar2(100) := g_package || 'populate_xml_data';
1001:
1002: main_node xmldom.DOMNode;
1003: root_node xmldom.DOMNode;
1004: parent_node xmldom.DOMNode;
1005: item_node xmldom.DOMNode;
1006:

Line 1003: root_node xmldom.DOMNode;

999:
1000: l_proc varchar2(100) := g_package || 'populate_xml_data';
1001:
1002: main_node xmldom.DOMNode;
1003: root_node xmldom.DOMNode;
1004: parent_node xmldom.DOMNode;
1005: item_node xmldom.DOMNode;
1006:
1007: root_elmt xmldom.DOMElement;

Line 1004: parent_node xmldom.DOMNode;

1000: l_proc varchar2(100) := g_package || 'populate_xml_data';
1001:
1002: main_node xmldom.DOMNode;
1003: root_node xmldom.DOMNode;
1004: parent_node xmldom.DOMNode;
1005: item_node xmldom.DOMNode;
1006:
1007: root_elmt xmldom.DOMElement;
1008: item_elmt xmldom.DOMElement;

Line 1005: item_node xmldom.DOMNode;

1001:
1002: main_node xmldom.DOMNode;
1003: root_node xmldom.DOMNode;
1004: parent_node xmldom.DOMNode;
1005: item_node xmldom.DOMNode;
1006:
1007: root_elmt xmldom.DOMElement;
1008: item_elmt xmldom.DOMElement;
1009: item_text xmldom.DOMText;

Line 1007: root_elmt xmldom.DOMElement;

1003: root_node xmldom.DOMNode;
1004: parent_node xmldom.DOMNode;
1005: item_node xmldom.DOMNode;
1006:
1007: root_elmt xmldom.DOMElement;
1008: item_elmt xmldom.DOMElement;
1009: item_text xmldom.DOMText;
1010:
1011: cursor csr_legal_entities is

Line 1008: item_elmt xmldom.DOMElement;

1004: parent_node xmldom.DOMNode;
1005: item_node xmldom.DOMNode;
1006:
1007: root_elmt xmldom.DOMElement;
1008: item_elmt xmldom.DOMElement;
1009: item_text xmldom.DOMText;
1010:
1011: cursor csr_legal_entities is
1012: select distinct action_information2 legal_entity_id -- Legal entity ID

Line 1009: item_text xmldom.DOMText;

1005: item_node xmldom.DOMNode;
1006:
1007: root_elmt xmldom.DOMElement;
1008: item_elmt xmldom.DOMElement;
1009: item_text xmldom.DOMText;
1010:
1011: cursor csr_legal_entities is
1012: select distinct action_information2 legal_entity_id -- Legal entity ID
1013: from pay_action_information

Line 1025: g_xml_dom := xmldom.newDOMDocument;

1021: -- hr_utility.trace_on(null, 'WSP_GEN');
1022: hr_utility.set_location ('Entering ' || l_proc, 10);
1023:
1024: -- Initialize g_xml_dom and create root node
1025: g_xml_dom := xmldom.newDOMDocument;
1026: main_node := xmldom.makeNode(g_xml_dom);
1027: root_elmt := xmldom.createElement(g_xml_dom, 'ZA_WSP_ATR_ROOT');
1028: root_node := xmldom.appendChild(main_node, xmldom.makeNode(root_elmt));
1029: g_node_list(g_root_level) := root_node;

Line 1026: main_node := xmldom.makeNode(g_xml_dom);

1022: hr_utility.set_location ('Entering ' || l_proc, 10);
1023:
1024: -- Initialize g_xml_dom and create root node
1025: g_xml_dom := xmldom.newDOMDocument;
1026: main_node := xmldom.makeNode(g_xml_dom);
1027: root_elmt := xmldom.createElement(g_xml_dom, 'ZA_WSP_ATR_ROOT');
1028: root_node := xmldom.appendChild(main_node, xmldom.makeNode(root_elmt));
1029: g_node_list(g_root_level) := root_node;
1030:

Line 1027: root_elmt := xmldom.createElement(g_xml_dom, 'ZA_WSP_ATR_ROOT');

1023:
1024: -- Initialize g_xml_dom and create root node
1025: g_xml_dom := xmldom.newDOMDocument;
1026: main_node := xmldom.makeNode(g_xml_dom);
1027: root_elmt := xmldom.createElement(g_xml_dom, 'ZA_WSP_ATR_ROOT');
1028: root_node := xmldom.appendChild(main_node, xmldom.makeNode(root_elmt));
1029: g_node_list(g_root_level) := root_node;
1030:
1031: for rec in csr_legal_entities

Line 1028: root_node := xmldom.appendChild(main_node, xmldom.makeNode(root_elmt));

1024: -- Initialize g_xml_dom and create root node
1025: g_xml_dom := xmldom.newDOMDocument;
1026: main_node := xmldom.makeNode(g_xml_dom);
1027: root_elmt := xmldom.createElement(g_xml_dom, 'ZA_WSP_ATR_ROOT');
1028: root_node := xmldom.appendChild(main_node, xmldom.makeNode(root_elmt));
1029: g_node_list(g_root_level) := root_node;
1030:
1031: for rec in csr_legal_entities
1032: loop

Line 1047: xmldom.writeToClob(g_xml_dom, p_xml);

1043: end loop;
1044:
1045: -- Update out variable p_xml and release xml dom
1046: dbms_lob.createtemporary(p_xml, true);
1047: xmldom.writeToClob(g_xml_dom, p_xml);
1048: xmldom.freeDocument(g_xml_dom);
1049: -- open the file p_xml
1050: -- Why ? In the Core wrapper package(PAY_XML_GEN_PKG) this is being closed
1051: dbms_lob.open(p_xml, dbms_lob.lob_readonly);

Line 1048: xmldom.freeDocument(g_xml_dom);

1044:
1045: -- Update out variable p_xml and release xml dom
1046: dbms_lob.createtemporary(p_xml, true);
1047: xmldom.writeToClob(g_xml_dom, p_xml);
1048: xmldom.freeDocument(g_xml_dom);
1049: -- open the file p_xml
1050: -- Why ? In the Core wrapper package(PAY_XML_GEN_PKG) this is being closed
1051: dbms_lob.open(p_xml, dbms_lob.lob_readonly);
1052: