eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FND_GSM_UTIL dependencies on XMLDOM

Line 157: my_doc xmlDOM.DOMDocument;

153: queue_appl_id number;
154: fcq_enabled_flag varchar2(1);
155:
156: my_parser xmlParser.parser;
157: my_doc xmlDOM.DOMDocument;
158: my_nodelist xmlDOM.DOMNodeList;
159: my_nodelist2 xmlDOM.DOMNodeList;
160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;

Line 158: my_nodelist xmlDOM.DOMNodeList;

154: fcq_enabled_flag varchar2(1);
155:
156: my_parser xmlParser.parser;
157: my_doc xmlDOM.DOMDocument;
158: my_nodelist xmlDOM.DOMNodeList;
159: my_nodelist2 xmlDOM.DOMNodeList;
160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;

Line 159: my_nodelist2 xmlDOM.DOMNodeList;

155:
156: my_parser xmlParser.parser;
157: my_doc xmlDOM.DOMDocument;
158: my_nodelist xmlDOM.DOMNodeList;
159: my_nodelist2 xmlDOM.DOMNodeList;
160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;

Line 160: my_contextlist xmlDOM.DOMNodeList;

156: my_parser xmlParser.parser;
157: my_doc xmlDOM.DOMDocument;
158: my_nodelist xmlDOM.DOMNodeList;
159: my_nodelist2 xmlDOM.DOMNodeList;
160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;
164: my_nodemap xmlDOM.DOMNamedNodeMap;

Line 161: my_node xmlDOM.DOMNode;

157: my_doc xmlDOM.DOMDocument;
158: my_nodelist xmlDOM.DOMNodeList;
159: my_nodelist2 xmlDOM.DOMNodeList;
160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;
164: my_nodemap xmlDOM.DOMNamedNodeMap;
165: my_attr xmlDOM.DOMAttr;

Line 162: my_node2 xmlDOM.DOMNode;

158: my_nodelist xmlDOM.DOMNodeList;
159: my_nodelist2 xmlDOM.DOMNodeList;
160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;
164: my_nodemap xmlDOM.DOMNamedNodeMap;
165: my_attr xmlDOM.DOMAttr;
166: my_element xmlDOM.DOMElement;

Line 163: my_context xmlDOM.DOMNode;

159: my_nodelist2 xmlDOM.DOMNodeList;
160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;
164: my_nodemap xmlDOM.DOMNamedNodeMap;
165: my_attr xmlDOM.DOMAttr;
166: my_element xmlDOM.DOMElement;
167: server_type varchar2(128);

Line 164: my_nodemap xmlDOM.DOMNamedNodeMap;

160: my_contextlist xmlDOM.DOMNodeList;
161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;
164: my_nodemap xmlDOM.DOMNamedNodeMap;
165: my_attr xmlDOM.DOMAttr;
166: my_element xmlDOM.DOMElement;
167: server_type varchar2(128);
168: oh_type varchar2(128);

Line 165: my_attr xmlDOM.DOMAttr;

161: my_node xmlDOM.DOMNode;
162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;
164: my_nodemap xmlDOM.DOMNamedNodeMap;
165: my_attr xmlDOM.DOMAttr;
166: my_element xmlDOM.DOMElement;
167: server_type varchar2(128);
168: oh_type varchar2(128);
169: i number;

Line 166: my_element xmlDOM.DOMElement;

162: my_node2 xmlDOM.DOMNode;
163: my_context xmlDOM.DOMNode;
164: my_nodemap xmlDOM.DOMNamedNodeMap;
165: my_attr xmlDOM.DOMAttr;
166: my_element xmlDOM.DOMElement;
167: server_type varchar2(128);
168: oh_type varchar2(128);
169: i number;
170: listlength number;

Line 172: my_cdata xmlDOM.DOMCharacterData;

168: oh_type varchar2(128);
169: i number;
170: listlength number;
171: file_found boolean := FALSE;
172: my_cdata xmlDOM.DOMCharacterData;
173:
174: sr_num varchar2(128);
175: f_sr_num number;
176: db_sr_num number;

Line 231: my_contextlist := xmldom.getElementsByTagName(my_doc, 'oa_context');

227: * this effort.
228: */
229:
230: /* Get version */
231: my_contextlist := xmldom.getElementsByTagName(my_doc, 'oa_context');
232: listlength := xmldom.getLength(my_contextlist);
233: if listlength < 1 then
234: -- may be it is metadata file
235: my_contextlist := xmldom.getElementsByTagName(my_doc,'oa_context_doc');

Line 232: listlength := xmldom.getLength(my_contextlist);

228: */
229:
230: /* Get version */
231: my_contextlist := xmldom.getElementsByTagName(my_doc, 'oa_context');
232: listlength := xmldom.getLength(my_contextlist);
233: if listlength < 1 then
234: -- may be it is metadata file
235: my_contextlist := xmldom.getElementsByTagName(my_doc,'oa_context_doc');
236: listlength := xmldom.getLength(my_contextlist);

Line 235: my_contextlist := xmldom.getElementsByTagName(my_doc,'oa_context_doc');

231: my_contextlist := xmldom.getElementsByTagName(my_doc, 'oa_context');
232: listlength := xmldom.getLength(my_contextlist);
233: if listlength < 1 then
234: -- may be it is metadata file
235: my_contextlist := xmldom.getElementsByTagName(my_doc,'oa_context_doc');
236: listlength := xmldom.getLength(my_contextlist);
237: if listlength < 1 then
238: element_name := 'oa_context/oa_context_doc';
239: dbms_lob.freetemporary(ctx_file_clob);

Line 236: listlength := xmldom.getLength(my_contextlist);

232: listlength := xmldom.getLength(my_contextlist);
233: if listlength < 1 then
234: -- may be it is metadata file
235: my_contextlist := xmldom.getElementsByTagName(my_doc,'oa_context_doc');
236: listlength := xmldom.getLength(my_contextlist);
237: if listlength < 1 then
238: element_name := 'oa_context/oa_context_doc';
239: dbms_lob.freetemporary(ctx_file_clob);
240: ctx_file_clob := null;

Line 245: my_node := xmldom.item(my_contextlist, 0);

241: raise missing_elem;
242: end if;
243: end if;
244:
245: my_node := xmldom.item(my_contextlist, 0);
246: my_element := xmldom.makeElement(my_node);
247: file_ver := xmldom.getAttribute(my_element, 'version');
248:
249: file_ver := substr(file_ver, instr(file_ver,':',1,1) + 1);

Line 246: my_element := xmldom.makeElement(my_node);

242: end if;
243: end if;
244:
245: my_node := xmldom.item(my_contextlist, 0);
246: my_element := xmldom.makeElement(my_node);
247: file_ver := xmldom.getAttribute(my_element, 'version');
248:
249: file_ver := substr(file_ver, instr(file_ver,':',1,1) + 1);
250:

Line 247: file_ver := xmldom.getAttribute(my_element, 'version');

243: end if;
244:
245: my_node := xmldom.item(my_contextlist, 0);
246: my_element := xmldom.makeElement(my_node);
247: file_ver := xmldom.getAttribute(my_element, 'version');
248:
249: file_ver := substr(file_ver, instr(file_ver,':',1,1) + 1);
250:
251: file_ver := rtrim(file_ver, '$');

Line 259: my_contextlist := xmldom.getElementsByTagName(my_doc, 'oa_context_name');

255: /* Get Context name */
256: if ( file_type = 'TEMPLATE' ) then
257: context_name := 'TEMPLATE';
258: else
259: my_contextlist := xmldom.getElementsByTagName(my_doc, 'oa_context_name');
260: listlength := xmldom.getLength(my_contextlist);
261: if listlength < 1 then
262: context_name := 'METADATA';
263: else

Line 260: listlength := xmldom.getLength(my_contextlist);

256: if ( file_type = 'TEMPLATE' ) then
257: context_name := 'TEMPLATE';
258: else
259: my_contextlist := xmldom.getElementsByTagName(my_doc, 'oa_context_name');
260: listlength := xmldom.getLength(my_contextlist);
261: if listlength < 1 then
262: context_name := 'METADATA';
263: else
264: my_node := xmldom.item(my_contextlist, 0);

Line 264: my_node := xmldom.item(my_contextlist, 0);

260: listlength := xmldom.getLength(my_contextlist);
261: if listlength < 1 then
262: context_name := 'METADATA';
263: else
264: my_node := xmldom.item(my_contextlist, 0);
265: my_node := xmldom.getFirstChild(my_node);
266: if xmldom.isNull(my_node) then
267: dbms_lob.freetemporary(ctx_file_clob);
268: ctx_file_clob := null;

Line 265: my_node := xmldom.getFirstChild(my_node);

261: if listlength < 1 then
262: context_name := 'METADATA';
263: else
264: my_node := xmldom.item(my_contextlist, 0);
265: my_node := xmldom.getFirstChild(my_node);
266: if xmldom.isNull(my_node) then
267: dbms_lob.freetemporary(ctx_file_clob);
268: ctx_file_clob := null;
269: raise null_context_name;

Line 266: if xmldom.isNull(my_node) then

262: context_name := 'METADATA';
263: else
264: my_node := xmldom.item(my_contextlist, 0);
265: my_node := xmldom.getFirstChild(my_node);
266: if xmldom.isNull(my_node) then
267: dbms_lob.freetemporary(ctx_file_clob);
268: ctx_file_clob := null;
269: raise null_context_name;
270: else

Line 271: context_name := ltrim(rtrim(xmldom.getNodeValue(my_node)));

267: dbms_lob.freetemporary(ctx_file_clob);
268: ctx_file_clob := null;
269: raise null_context_name;
270: else
271: context_name := ltrim(rtrim(xmldom.getNodeValue(my_node)));
272: end if;
273: end if;
274: end if;
275:

Line 288: my_nodelist := xmldom.getElementsByTagName(my_doc, 'host');

284: from v$session
285: where audsid=USERENV('SESSIONID');
286: else
287: /* Get Name of Node */
288: my_nodelist := xmldom.getElementsByTagName(my_doc, 'host');
289: listlength := xmldom.getLength(my_nodelist);
290: if listlength < 1 then
291: element_name := 'host';
292: dbms_lob.freetemporary(ctx_file_clob);

Line 289: listlength := xmldom.getLength(my_nodelist);

285: where audsid=USERENV('SESSIONID');
286: else
287: /* Get Name of Node */
288: my_nodelist := xmldom.getElementsByTagName(my_doc, 'host');
289: listlength := xmldom.getLength(my_nodelist);
290: if listlength < 1 then
291: element_name := 'host';
292: dbms_lob.freetemporary(ctx_file_clob);
293: ctx_file_clob := null;

Line 296: my_node := xmldom.item(my_nodelist, 0);

292: dbms_lob.freetemporary(ctx_file_clob);
293: ctx_file_clob := null;
294: raise missing_elem;
295: end if;
296: my_node := xmldom.item(my_nodelist, 0);
297: my_node := xmldom.getFirstChild(my_node);
298: if xmldom.isNull(my_node) then
299: primary_node := null;
300: else

Line 297: my_node := xmldom.getFirstChild(my_node);

293: ctx_file_clob := null;
294: raise missing_elem;
295: end if;
296: my_node := xmldom.item(my_nodelist, 0);
297: my_node := xmldom.getFirstChild(my_node);
298: if xmldom.isNull(my_node) then
299: primary_node := null;
300: else
301: primary_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 298: if xmldom.isNull(my_node) then

294: raise missing_elem;
295: end if;
296: my_node := xmldom.item(my_nodelist, 0);
297: my_node := xmldom.getFirstChild(my_node);
298: if xmldom.isNull(my_node) then
299: primary_node := null;
300: else
301: primary_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));
302: end if;

Line 301: primary_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));

297: my_node := xmldom.getFirstChild(my_node);
298: if xmldom.isNull(my_node) then
299: primary_node := null;
300: else
301: primary_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));
302: end if;
303: end if;
304:
305: /* Get Serial Number from context file */

Line 309: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_context_serial');

305: /* Get Serial Number from context file */
306: if ( context_name in ('METADATA', 'TEMPLATE')) then
307: sr_num := '0';
308: else
309: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_context_serial');
310: listlength := xmldom.getLength(my_nodelist);
311: if listlength < 1 then
312: goto service_upld;
313: end if;

Line 310: listlength := xmldom.getLength(my_nodelist);

306: if ( context_name in ('METADATA', 'TEMPLATE')) then
307: sr_num := '0';
308: else
309: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_context_serial');
310: listlength := xmldom.getLength(my_nodelist);
311: if listlength < 1 then
312: goto service_upld;
313: end if;
314: my_node := xmldom.item(my_nodelist, 0);

Line 314: my_node := xmldom.item(my_nodelist, 0);

310: listlength := xmldom.getLength(my_nodelist);
311: if listlength < 1 then
312: goto service_upld;
313: end if;
314: my_node := xmldom.item(my_nodelist, 0);
315: my_node := xmldom.getFirstChild(my_node);
316: if xmldom.isNull(my_node) then
317: sr_num := null;
318: else

Line 315: my_node := xmldom.getFirstChild(my_node);

311: if listlength < 1 then
312: goto service_upld;
313: end if;
314: my_node := xmldom.item(my_nodelist, 0);
315: my_node := xmldom.getFirstChild(my_node);
316: if xmldom.isNull(my_node) then
317: sr_num := null;
318: else
319: sr_num := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 316: if xmldom.isNull(my_node) then

312: goto service_upld;
313: end if;
314: my_node := xmldom.item(my_nodelist, 0);
315: my_node := xmldom.getFirstChild(my_node);
316: if xmldom.isNull(my_node) then
317: sr_num := null;
318: else
319: sr_num := ltrim(rtrim(xmldom.getNodeValue(my_node)));
320: end if;

Line 319: sr_num := ltrim(rtrim(xmldom.getNodeValue(my_node)));

315: my_node := xmldom.getFirstChild(my_node);
316: if xmldom.isNull(my_node) then
317: sr_num := null;
318: else
319: sr_num := ltrim(rtrim(xmldom.getNodeValue(my_node)));
320: end if;
321: end if;
322:
323: f_sr_num := to_number(NVL(sr_num,0));

Line 428: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbhost');

424: in db_domain, in c_null, in c_null, in n_null, out ret_val;
425:
426:
427: /* Get db_host value */
428: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbhost');
429: listlength := xmldom.getLength(my_nodelist);
430: if listlength < 1 then
431: element_name := 'dbhost';
432: raise missing_elem;

Line 429: listlength := xmldom.getLength(my_nodelist);

425:
426:
427: /* Get db_host value */
428: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbhost');
429: listlength := xmldom.getLength(my_nodelist);
430: if listlength < 1 then
431: element_name := 'dbhost';
432: raise missing_elem;
433: end if;

Line 434: my_node := xmldom.item(my_nodelist, 0);

430: if listlength < 1 then
431: element_name := 'dbhost';
432: raise missing_elem;
433: end if;
434: my_node := xmldom.item(my_nodelist, 0);
435: my_node := xmldom.getFirstChild(my_node);
436: if xmldom.isNull(my_node) then
437: db_host := null;
438: else

Line 435: my_node := xmldom.getFirstChild(my_node);

431: element_name := 'dbhost';
432: raise missing_elem;
433: end if;
434: my_node := xmldom.item(my_nodelist, 0);
435: my_node := xmldom.getFirstChild(my_node);
436: if xmldom.isNull(my_node) then
437: db_host := null;
438: else
439: db_host := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 436: if xmldom.isNull(my_node) then

432: raise missing_elem;
433: end if;
434: my_node := xmldom.item(my_nodelist, 0);
435: my_node := xmldom.getFirstChild(my_node);
436: if xmldom.isNull(my_node) then
437: db_host := null;
438: else
439: db_host := ltrim(rtrim(xmldom.getNodeValue(my_node)));
440: end if;

Line 439: db_host := ltrim(rtrim(xmldom.getNodeValue(my_node)));

435: my_node := xmldom.getFirstChild(my_node);
436: if xmldom.isNull(my_node) then
437: db_host := null;
438: else
439: db_host := ltrim(rtrim(xmldom.getNodeValue(my_node)));
440: end if;
441:
442: /* Get db_sid value */
443: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbsid');

Line 443: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbsid');

439: db_host := ltrim(rtrim(xmldom.getNodeValue(my_node)));
440: end if;
441:
442: /* Get db_sid value */
443: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbsid');
444: listlength := xmldom.getLength(my_nodelist);
445: if listlength < 1 then
446: element_name := 'dbsid';
447: raise missing_elem;

Line 444: listlength := xmldom.getLength(my_nodelist);

440: end if;
441:
442: /* Get db_sid value */
443: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbsid');
444: listlength := xmldom.getLength(my_nodelist);
445: if listlength < 1 then
446: element_name := 'dbsid';
447: raise missing_elem;
448: end if;

Line 449: my_node := xmldom.item(my_nodelist, 0);

445: if listlength < 1 then
446: element_name := 'dbsid';
447: raise missing_elem;
448: end if;
449: my_node := xmldom.item(my_nodelist, 0);
450: my_node := xmldom.getFirstChild(my_node);
451: if xmldom.isNull(my_node) then
452: db_sid := null;
453: else

Line 450: my_node := xmldom.getFirstChild(my_node);

446: element_name := 'dbsid';
447: raise missing_elem;
448: end if;
449: my_node := xmldom.item(my_nodelist, 0);
450: my_node := xmldom.getFirstChild(my_node);
451: if xmldom.isNull(my_node) then
452: db_sid := null;
453: else
454: db_sid := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 451: if xmldom.isNull(my_node) then

447: raise missing_elem;
448: end if;
449: my_node := xmldom.item(my_nodelist, 0);
450: my_node := xmldom.getFirstChild(my_node);
451: if xmldom.isNull(my_node) then
452: db_sid := null;
453: else
454: db_sid := ltrim(rtrim(xmldom.getNodeValue(my_node)));
455: end if;

Line 454: db_sid := ltrim(rtrim(xmldom.getNodeValue(my_node)));

450: my_node := xmldom.getFirstChild(my_node);
451: if xmldom.isNull(my_node) then
452: db_sid := null;
453: else
454: db_sid := ltrim(rtrim(xmldom.getNodeValue(my_node)));
455: end if;
456:
457: /* Get db_port value */
458: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbport');

Line 458: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbport');

454: db_sid := ltrim(rtrim(xmldom.getNodeValue(my_node)));
455: end if;
456:
457: /* Get db_port value */
458: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbport');
459: listlength := xmldom.getLength(my_nodelist);
460: if listlength < 1 then
461: element_name := 'dbport';
462: raise missing_elem;

Line 459: listlength := xmldom.getLength(my_nodelist);

455: end if;
456:
457: /* Get db_port value */
458: my_nodelist := xmldom.getElementsByTagName(my_doc, 'dbport');
459: listlength := xmldom.getLength(my_nodelist);
460: if listlength < 1 then
461: element_name := 'dbport';
462: raise missing_elem;
463: end if;

Line 464: my_node := xmldom.item(my_nodelist, 0);

460: if listlength < 1 then
461: element_name := 'dbport';
462: raise missing_elem;
463: end if;
464: my_node := xmldom.item(my_nodelist, 0);
465: my_node := xmldom.getFirstChild(my_node);
466: if xmldom.isNull(my_node) then
467: db_port := null;
468: else

Line 465: my_node := xmldom.getFirstChild(my_node);

461: element_name := 'dbport';
462: raise missing_elem;
463: end if;
464: my_node := xmldom.item(my_nodelist, 0);
465: my_node := xmldom.getFirstChild(my_node);
466: if xmldom.isNull(my_node) then
467: db_port := null;
468: else
469: db_port := to_number(ltrim(rtrim(xmldom.getNodeValue(my_node))));

Line 466: if xmldom.isNull(my_node) then

462: raise missing_elem;
463: end if;
464: my_node := xmldom.item(my_nodelist, 0);
465: my_node := xmldom.getFirstChild(my_node);
466: if xmldom.isNull(my_node) then
467: db_port := null;
468: else
469: db_port := to_number(ltrim(rtrim(xmldom.getNodeValue(my_node))));
470: end if;

Line 469: db_port := to_number(ltrim(rtrim(xmldom.getNodeValue(my_node))));

465: my_node := xmldom.getFirstChild(my_node);
466: if xmldom.isNull(my_node) then
467: db_port := null;
468: else
469: db_port := to_number(ltrim(rtrim(xmldom.getNodeValue(my_node))));
470: end if;
471:
472: select instance_number,instance_name
473: into inst_num, inst_name

Line 495: my_nodelist := xmldom.getElementsByTagName(my_doc, 'platform');

491:
492:
493:
494: /* Get Name of platform */
495: my_nodelist := xmldom.getElementsByTagName(my_doc, 'platform');
496: listlength := xmldom.getLength(my_nodelist);
497: if listlength < 1 then
498: element_name := 'platform';
499: raise missing_elem;

Line 496: listlength := xmldom.getLength(my_nodelist);

492:
493:
494: /* Get Name of platform */
495: my_nodelist := xmldom.getElementsByTagName(my_doc, 'platform');
496: listlength := xmldom.getLength(my_nodelist);
497: if listlength < 1 then
498: element_name := 'platform';
499: raise missing_elem;
500: end if;

Line 501: my_node := xmldom.item(my_nodelist, 0);

497: if listlength < 1 then
498: element_name := 'platform';
499: raise missing_elem;
500: end if;
501: my_node := xmldom.item(my_nodelist, 0);
502: my_node := xmldom.getFirstChild(my_node);
503: if xmldom.isNull(my_node) then
504: platform_name := null;
505: else

Line 502: my_node := xmldom.getFirstChild(my_node);

498: element_name := 'platform';
499: raise missing_elem;
500: end if;
501: my_node := xmldom.item(my_nodelist, 0);
502: my_node := xmldom.getFirstChild(my_node);
503: if xmldom.isNull(my_node) then
504: platform_name := null;
505: else
506: platform_name := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 503: if xmldom.isNull(my_node) then

499: raise missing_elem;
500: end if;
501: my_node := xmldom.item(my_nodelist, 0);
502: my_node := xmldom.getFirstChild(my_node);
503: if xmldom.isNull(my_node) then
504: platform_name := null;
505: else
506: platform_name := ltrim(rtrim(xmldom.getNodeValue(my_node)));
507: end if;

Line 506: platform_name := ltrim(rtrim(xmldom.getNodeValue(my_node)));

502: my_node := xmldom.getFirstChild(my_node);
503: if xmldom.isNull(my_node) then
504: platform_name := null;
505: else
506: platform_name := ltrim(rtrim(xmldom.getNodeValue(my_node)));
507: end if;
508:
509:
510: -- Tru64 UNIX Alpha need hostname.domain_name as node name

Line 514: my_nodelist := xmldom.getElementsByTagName(my_doc, 'domain');

510: -- Tru64 UNIX Alpha need hostname.domain_name as node name
511:
512: if ( platform_name = 'UNIX Alpha' ) then
513: /* Get Name of domain */
514: my_nodelist := xmldom.getElementsByTagName(my_doc, 'domain');
515: listlength := xmldom.getLength(my_nodelist);
516: if listlength < 1 then
517: element_name := 'domain';
518: raise missing_elem;

Line 515: listlength := xmldom.getLength(my_nodelist);

511:
512: if ( platform_name = 'UNIX Alpha' ) then
513: /* Get Name of domain */
514: my_nodelist := xmldom.getElementsByTagName(my_doc, 'domain');
515: listlength := xmldom.getLength(my_nodelist);
516: if listlength < 1 then
517: element_name := 'domain';
518: raise missing_elem;
519: end if;

Line 520: my_node := xmldom.item(my_nodelist, 0);

516: if listlength < 1 then
517: element_name := 'domain';
518: raise missing_elem;
519: end if;
520: my_node := xmldom.item(my_nodelist, 0);
521: my_node := xmldom.getFirstChild(my_node);
522: if xmldom.isNull(my_node) then
523: domain_name := null;
524: else

Line 521: my_node := xmldom.getFirstChild(my_node);

517: element_name := 'domain';
518: raise missing_elem;
519: end if;
520: my_node := xmldom.item(my_nodelist, 0);
521: my_node := xmldom.getFirstChild(my_node);
522: if xmldom.isNull(my_node) then
523: domain_name := null;
524: else
525: domain_name := substr(ltrim(rtrim(xmldom.getNodeValue(my_node))), 1, 64);

Line 522: if xmldom.isNull(my_node) then

518: raise missing_elem;
519: end if;
520: my_node := xmldom.item(my_nodelist, 0);
521: my_node := xmldom.getFirstChild(my_node);
522: if xmldom.isNull(my_node) then
523: domain_name := null;
524: else
525: domain_name := substr(ltrim(rtrim(xmldom.getNodeValue(my_node))), 1, 64);
526: end if;

Line 525: domain_name := substr(ltrim(rtrim(xmldom.getNodeValue(my_node))), 1, 64);

521: my_node := xmldom.getFirstChild(my_node);
522: if xmldom.isNull(my_node) then
523: domain_name := null;
524: else
525: domain_name := substr(ltrim(rtrim(xmldom.getNodeValue(my_node))), 1, 64);
526: end if;
527:
528: tmp_node_name := primary_node || '.' || domain_name;
529: if (length(tmp_node_name) > 30) then

Line 543: my_nodelist := xmldom.getElementsByTagName(my_doc, 'reports_port');

539:
540:
541: /* Get the Reports port */
542:
543: my_nodelist := xmldom.getElementsByTagName(my_doc, 'reports_port');
544: listlength := xmldom.getLength(my_nodelist);
545: if listlength < 1 then
546: element_name := 'reports_port';
547: -- To fix 4684481

Line 544: listlength := xmldom.getLength(my_nodelist);

540:
541: /* Get the Reports port */
542:
543: my_nodelist := xmldom.getElementsByTagName(my_doc, 'reports_port');
544: listlength := xmldom.getLength(my_nodelist);
545: if listlength < 1 then
546: element_name := 'reports_port';
547: -- To fix 4684481
548: -- raise missing_elem;

Line 550: my_node := xmldom.item(my_nodelist, 0);

546: element_name := 'reports_port';
547: -- To fix 4684481
548: -- raise missing_elem;
549: else
550: my_node := xmldom.item(my_nodelist, 0);
551: my_node := xmldom.getFirstChild(my_node);
552: if xmldom.isNull(my_node) then
553: reports_port := null;
554: else

Line 551: my_node := xmldom.getFirstChild(my_node);

547: -- To fix 4684481
548: -- raise missing_elem;
549: else
550: my_node := xmldom.item(my_nodelist, 0);
551: my_node := xmldom.getFirstChild(my_node);
552: if xmldom.isNull(my_node) then
553: reports_port := null;
554: else
555: reports_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 552: if xmldom.isNull(my_node) then

548: -- raise missing_elem;
549: else
550: my_node := xmldom.item(my_nodelist, 0);
551: my_node := xmldom.getFirstChild(my_node);
552: if xmldom.isNull(my_node) then
553: reports_port := null;
554: else
555: reports_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
556: end if;

Line 555: reports_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

551: my_node := xmldom.getFirstChild(my_node);
552: if xmldom.isNull(my_node) then
553: reports_port := null;
554: else
555: reports_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
556: end if;
557: end if;
558:
559:

Line 563: my_nodelist := xmldom.getElementsByTagName(my_doc, 'forms_port');

559:
560:
561: /* Get the Forms port */
562:
563: my_nodelist := xmldom.getElementsByTagName(my_doc, 'forms_port');
564: listlength := xmldom.getLength(my_nodelist);
565: if listlength < 1 then
566: element_name := 'forms_port';
567: -- To fix bug 5151130

Line 564: listlength := xmldom.getLength(my_nodelist);

560:
561: /* Get the Forms port */
562:
563: my_nodelist := xmldom.getElementsByTagName(my_doc, 'forms_port');
564: listlength := xmldom.getLength(my_nodelist);
565: if listlength < 1 then
566: element_name := 'forms_port';
567: -- To fix bug 5151130
568: -- raise missing_elem;

Line 570: my_node := xmldom.item(my_nodelist, 0);

566: element_name := 'forms_port';
567: -- To fix bug 5151130
568: -- raise missing_elem;
569: end if;
570: my_node := xmldom.item(my_nodelist, 0);
571: my_node := xmldom.getFirstChild(my_node);
572: if xmldom.isNull(my_node) then
573: forms_port := null;
574: else

Line 571: my_node := xmldom.getFirstChild(my_node);

567: -- To fix bug 5151130
568: -- raise missing_elem;
569: end if;
570: my_node := xmldom.item(my_nodelist, 0);
571: my_node := xmldom.getFirstChild(my_node);
572: if xmldom.isNull(my_node) then
573: forms_port := null;
574: else
575: forms_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 572: if xmldom.isNull(my_node) then

568: -- raise missing_elem;
569: end if;
570: my_node := xmldom.item(my_nodelist, 0);
571: my_node := xmldom.getFirstChild(my_node);
572: if xmldom.isNull(my_node) then
573: forms_port := null;
574: else
575: forms_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
576: end if;

Line 575: forms_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

571: my_node := xmldom.getFirstChild(my_node);
572: if xmldom.isNull(my_node) then
573: forms_port := null;
574: else
575: forms_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
576: end if;
577:
578: /* Get the Metrics Server Node */
579:

Line 582: my_nodelist := xmldom.getElementsByTagName(my_doc, 'hostname');

578: /* Get the Metrics Server Node */
579:
580: methost_node := null;
581:
582: my_nodelist := xmldom.getElementsByTagName(my_doc, 'hostname');
583: listlength := xmldom.getLength(my_nodelist);
584:
585: if listlength > 1 then
586: for i in 0..listlength-1 loop

Line 583: listlength := xmldom.getLength(my_nodelist);

579:
580: methost_node := null;
581:
582: my_nodelist := xmldom.getElementsByTagName(my_doc, 'hostname');
583: listlength := xmldom.getLength(my_nodelist);
584:
585: if listlength > 1 then
586: for i in 0..listlength-1 loop
587: my_node := xmldom.item(my_nodelist, i);

Line 587: my_node := xmldom.item(my_nodelist, i);

583: listlength := xmldom.getLength(my_nodelist);
584:
585: if listlength > 1 then
586: for i in 0..listlength-1 loop
587: my_node := xmldom.item(my_nodelist, i);
588: my_element := xmldom.makeElement(my_node);
589: oh_type := xmldom.getAttribute(my_element, 'oa_var');
590: exit when oh_type = 's_methost';
591: end loop;

Line 588: my_element := xmldom.makeElement(my_node);

584:
585: if listlength > 1 then
586: for i in 0..listlength-1 loop
587: my_node := xmldom.item(my_nodelist, i);
588: my_element := xmldom.makeElement(my_node);
589: oh_type := xmldom.getAttribute(my_element, 'oa_var');
590: exit when oh_type = 's_methost';
591: end loop;
592: end if;

Line 589: oh_type := xmldom.getAttribute(my_element, 'oa_var');

585: if listlength > 1 then
586: for i in 0..listlength-1 loop
587: my_node := xmldom.item(my_nodelist, i);
588: my_element := xmldom.makeElement(my_node);
589: oh_type := xmldom.getAttribute(my_element, 'oa_var');
590: exit when oh_type = 's_methost';
591: end loop;
592: end if;
593:

Line 595: my_node := xmldom.getFirstChild(my_node);

591: end loop;
592: end if;
593:
594: if (oh_type = 's_methost') then
595: my_node := xmldom.getFirstChild(my_node);
596: if not xmldom.isNull(my_node) then
597: methost_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));
598: end if;
599: end if;

Line 596: if not xmldom.isNull(my_node) then

592: end if;
593:
594: if (oh_type = 's_methost') then
595: my_node := xmldom.getFirstChild(my_node);
596: if not xmldom.isNull(my_node) then
597: methost_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));
598: end if;
599: end if;
600: if methost_node is null then

Line 597: methost_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));

593:
594: if (oh_type = 's_methost') then
595: my_node := xmldom.getFirstChild(my_node);
596: if not xmldom.isNull(my_node) then
597: methost_node := ltrim(rtrim(xmldom.getNodeValue(my_node)));
598: end if;
599: end if;
600: if methost_node is null then
601: methost_node := primary_node;

Line 606: my_nodelist := xmldom.getElementsByTagName(my_doc, 'met_req_port');

602: end if;
603:
604: /* Get the metrics request port */
605:
606: my_nodelist := xmldom.getElementsByTagName(my_doc, 'met_req_port');
607: listlength := xmldom.getLength(my_nodelist);
608: if listlength < 1 then
609: element_name := 'met_req_port';
610: -- To fix bug 5151130

Line 607: listlength := xmldom.getLength(my_nodelist);

603:
604: /* Get the metrics request port */
605:
606: my_nodelist := xmldom.getElementsByTagName(my_doc, 'met_req_port');
607: listlength := xmldom.getLength(my_nodelist);
608: if listlength < 1 then
609: element_name := 'met_req_port';
610: -- To fix bug 5151130
611: -- raise missing_elem;

Line 613: my_node := xmldom.item(my_nodelist, 0);

609: element_name := 'met_req_port';
610: -- To fix bug 5151130
611: -- raise missing_elem;
612: else
613: my_node := xmldom.item(my_nodelist, 0);
614: my_node := xmldom.getFirstChild(my_node);
615: if xmldom.isNull(my_node) then
616: met_req_port := null;
617: else

Line 614: my_node := xmldom.getFirstChild(my_node);

610: -- To fix bug 5151130
611: -- raise missing_elem;
612: else
613: my_node := xmldom.item(my_nodelist, 0);
614: my_node := xmldom.getFirstChild(my_node);
615: if xmldom.isNull(my_node) then
616: met_req_port := null;
617: else
618: met_req_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 615: if xmldom.isNull(my_node) then

611: -- raise missing_elem;
612: else
613: my_node := xmldom.item(my_nodelist, 0);
614: my_node := xmldom.getFirstChild(my_node);
615: if xmldom.isNull(my_node) then
616: met_req_port := null;
617: else
618: met_req_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
619: end if;

Line 618: met_req_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

614: my_node := xmldom.getFirstChild(my_node);
615: if xmldom.isNull(my_node) then
616: met_req_port := null;
617: else
618: met_req_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
619: end if;
620: end if;
621:
622:

Line 625: my_nodelist := xmldom.getElementsByTagName(my_doc, 'met_data_port');

621:
622:
623: /* Get the metrics data port */
624:
625: my_nodelist := xmldom.getElementsByTagName(my_doc, 'met_data_port');
626: listlength := xmldom.getLength(my_nodelist);
627: if listlength < 1 then
628: element_name := 'met_data_port';
629: -- To fix bug 5151130

Line 626: listlength := xmldom.getLength(my_nodelist);

622:
623: /* Get the metrics data port */
624:
625: my_nodelist := xmldom.getElementsByTagName(my_doc, 'met_data_port');
626: listlength := xmldom.getLength(my_nodelist);
627: if listlength < 1 then
628: element_name := 'met_data_port';
629: -- To fix bug 5151130
630: -- raise missing_elem;

Line 632: my_node := xmldom.item(my_nodelist, 0);

628: element_name := 'met_data_port';
629: -- To fix bug 5151130
630: -- raise missing_elem;
631: else
632: my_node := xmldom.item(my_nodelist, 0);
633: my_node := xmldom.getFirstChild(my_node);
634: if xmldom.isNull(my_node) then
635: met_data_port := null;
636: else

Line 633: my_node := xmldom.getFirstChild(my_node);

629: -- To fix bug 5151130
630: -- raise missing_elem;
631: else
632: my_node := xmldom.item(my_nodelist, 0);
633: my_node := xmldom.getFirstChild(my_node);
634: if xmldom.isNull(my_node) then
635: met_data_port := null;
636: else
637: met_data_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 634: if xmldom.isNull(my_node) then

630: -- raise missing_elem;
631: else
632: my_node := xmldom.item(my_nodelist, 0);
633: my_node := xmldom.getFirstChild(my_node);
634: if xmldom.isNull(my_node) then
635: met_data_port := null;
636: else
637: met_data_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
638: end if;

Line 637: met_data_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

633: my_node := xmldom.getFirstChild(my_node);
634: if xmldom.isNull(my_node) then
635: met_data_port := null;
636: else
637: met_data_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
638: end if;
639: end if;
640:
641: /* Get the web port */

Line 643: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port');

639: end if;
640:
641: /* Get the web port */
642:
643: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port');
644: listlength := xmldom.getLength(my_nodelist);
645: if listlength < 1 then
646: element_name := 'web_port';
647: raise missing_elem;

Line 644: listlength := xmldom.getLength(my_nodelist);

640:
641: /* Get the web port */
642:
643: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port');
644: listlength := xmldom.getLength(my_nodelist);
645: if listlength < 1 then
646: element_name := 'web_port';
647: raise missing_elem;
648: end if;

Line 649: my_node := xmldom.item(my_nodelist, 0);

645: if listlength < 1 then
646: element_name := 'web_port';
647: raise missing_elem;
648: end if;
649: my_node := xmldom.item(my_nodelist, 0);
650: my_node := xmldom.getFirstChild(my_node);
651: if xmldom.isNull(my_node) then
652: web_port := null;
653: else

Line 650: my_node := xmldom.getFirstChild(my_node);

646: element_name := 'web_port';
647: raise missing_elem;
648: end if;
649: my_node := xmldom.item(my_nodelist, 0);
650: my_node := xmldom.getFirstChild(my_node);
651: if xmldom.isNull(my_node) then
652: web_port := null;
653: else
654: web_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 651: if xmldom.isNull(my_node) then

647: raise missing_elem;
648: end if;
649: my_node := xmldom.item(my_nodelist, 0);
650: my_node := xmldom.getFirstChild(my_node);
651: if xmldom.isNull(my_node) then
652: web_port := null;
653: else
654: web_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
655: end if;

Line 654: web_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

650: my_node := xmldom.getFirstChild(my_node);
651: if xmldom.isNull(my_node) then
652: web_port := null;
653: else
654: web_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
655: end if;
656:
657: /* Get web pls port if any */
658:

Line 659: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port_pls');

655: end if;
656:
657: /* Get web pls port if any */
658:
659: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port_pls');
660: listlength := xmldom.getLength(my_nodelist);
661: if listlength > 0 then
662: my_node := xmldom.item(my_nodelist, 0);
663: my_node := xmldom.getFirstChild(my_node);

Line 660: listlength := xmldom.getLength(my_nodelist);

656:
657: /* Get web pls port if any */
658:
659: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port_pls');
660: listlength := xmldom.getLength(my_nodelist);
661: if listlength > 0 then
662: my_node := xmldom.item(my_nodelist, 0);
663: my_node := xmldom.getFirstChild(my_node);
664: if xmldom.isNull(my_node) then

Line 662: my_node := xmldom.item(my_nodelist, 0);

658:
659: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port_pls');
660: listlength := xmldom.getLength(my_nodelist);
661: if listlength > 0 then
662: my_node := xmldom.item(my_nodelist, 0);
663: my_node := xmldom.getFirstChild(my_node);
664: if xmldom.isNull(my_node) then
665: web_pls_port := null;
666: else

Line 663: my_node := xmldom.getFirstChild(my_node);

659: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_port_pls');
660: listlength := xmldom.getLength(my_nodelist);
661: if listlength > 0 then
662: my_node := xmldom.item(my_nodelist, 0);
663: my_node := xmldom.getFirstChild(my_node);
664: if xmldom.isNull(my_node) then
665: web_pls_port := null;
666: else
667: web_pls_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 664: if xmldom.isNull(my_node) then

660: listlength := xmldom.getLength(my_nodelist);
661: if listlength > 0 then
662: my_node := xmldom.item(my_nodelist, 0);
663: my_node := xmldom.getFirstChild(my_node);
664: if xmldom.isNull(my_node) then
665: web_pls_port := null;
666: else
667: web_pls_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
668: end if;

Line 667: web_pls_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));

663: my_node := xmldom.getFirstChild(my_node);
664: if xmldom.isNull(my_node) then
665: web_pls_port := null;
666: else
667: web_pls_port := ltrim(rtrim(xmldom.getNodeValue(my_node)));
668: end if;
669: else
670: web_pls_port := null;
671: end if;

Line 676: my_nodelist := xmldom.getElementsByTagName(my_doc, 'ORACLE_HOME');

672:
673:
674: /* Get the Apache_Top */
675:
676: my_nodelist := xmldom.getElementsByTagName(my_doc, 'ORACLE_HOME');
677: listlength := xmldom.getLength(my_nodelist);
678: if listlength < 1 then
679: element_name := 'ORACLE_HOME oa_var=s_web_oh';
680: raise missing_elem;

Line 677: listlength := xmldom.getLength(my_nodelist);

673:
674: /* Get the Apache_Top */
675:
676: my_nodelist := xmldom.getElementsByTagName(my_doc, 'ORACLE_HOME');
677: listlength := xmldom.getLength(my_nodelist);
678: if listlength < 1 then
679: element_name := 'ORACLE_HOME oa_var=s_web_oh';
680: raise missing_elem;
681: end if;

Line 684: my_node := xmldom.item(my_nodelist, i);

680: raise missing_elem;
681: end if;
682:
683: for i in 0..listlength-1 loop
684: my_node := xmldom.item(my_nodelist, i);
685: my_element := xmldom.makeElement(my_node);
686: oh_type := xmldom.getAttribute(my_element, 'oa_var');
687: exit when oh_type = 's_weboh_oh';
688: end loop;

Line 685: my_element := xmldom.makeElement(my_node);

681: end if;
682:
683: for i in 0..listlength-1 loop
684: my_node := xmldom.item(my_nodelist, i);
685: my_element := xmldom.makeElement(my_node);
686: oh_type := xmldom.getAttribute(my_element, 'oa_var');
687: exit when oh_type = 's_weboh_oh';
688: end loop;
689:

Line 686: oh_type := xmldom.getAttribute(my_element, 'oa_var');

682:
683: for i in 0..listlength-1 loop
684: my_node := xmldom.item(my_nodelist, i);
685: my_element := xmldom.makeElement(my_node);
686: oh_type := xmldom.getAttribute(my_element, 'oa_var');
687: exit when oh_type = 's_weboh_oh';
688: end loop;
689:
690: if (oh_type = 's_weboh_oh') then

Line 691: my_node := xmldom.getFirstChild(my_node);

687: exit when oh_type = 's_weboh_oh';
688: end loop;
689:
690: if (oh_type = 's_weboh_oh') then
691: my_node := xmldom.getFirstChild(my_node);
692: if xmldom.isNull(my_node) then
693: apache_top := null;
694: else
695: apache_top := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 692: if xmldom.isNull(my_node) then

688: end loop;
689:
690: if (oh_type = 's_weboh_oh') then
691: my_node := xmldom.getFirstChild(my_node);
692: if xmldom.isNull(my_node) then
693: apache_top := null;
694: else
695: apache_top := ltrim(rtrim(xmldom.getNodeValue(my_node)));
696: end if;

Line 695: apache_top := ltrim(rtrim(xmldom.getNodeValue(my_node)));

691: my_node := xmldom.getFirstChild(my_node);
692: if xmldom.isNull(my_node) then
693: apache_top := null;
694: else
695: apache_top := ltrim(rtrim(xmldom.getNodeValue(my_node)));
696: end if;
697: else
698: element_name := 'ORACLE_HOME oa_var=s_web_oh';
699: raise missing_elem;

Line 705: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_pid_file');

701:
702:
703: /* Get the web pid file if any, do not show this an error */
704:
705: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_pid_file');
706: listlength := xmldom.getLength(my_nodelist);
707: if listlength > 0 then
708: my_node := xmldom.item(my_nodelist, 0);
709: my_node := xmldom.getFirstChild(my_node);

Line 706: listlength := xmldom.getLength(my_nodelist);

702:
703: /* Get the web pid file if any, do not show this an error */
704:
705: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_pid_file');
706: listlength := xmldom.getLength(my_nodelist);
707: if listlength > 0 then
708: my_node := xmldom.item(my_nodelist, 0);
709: my_node := xmldom.getFirstChild(my_node);
710: if xmldom.isNull(my_node) then

Line 708: my_node := xmldom.item(my_nodelist, 0);

704:
705: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_pid_file');
706: listlength := xmldom.getLength(my_nodelist);
707: if listlength > 0 then
708: my_node := xmldom.item(my_nodelist, 0);
709: my_node := xmldom.getFirstChild(my_node);
710: if xmldom.isNull(my_node) then
711: web_pid_file := null;
712: else

Line 709: my_node := xmldom.getFirstChild(my_node);

705: my_nodelist := xmldom.getElementsByTagName(my_doc, 'web_pid_file');
706: listlength := xmldom.getLength(my_nodelist);
707: if listlength > 0 then
708: my_node := xmldom.item(my_nodelist, 0);
709: my_node := xmldom.getFirstChild(my_node);
710: if xmldom.isNull(my_node) then
711: web_pid_file := null;
712: else
713: web_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 710: if xmldom.isNull(my_node) then

706: listlength := xmldom.getLength(my_nodelist);
707: if listlength > 0 then
708: my_node := xmldom.item(my_nodelist, 0);
709: my_node := xmldom.getFirstChild(my_node);
710: if xmldom.isNull(my_node) then
711: web_pid_file := null;
712: else
713: web_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));
714: end if;

Line 713: web_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));

709: my_node := xmldom.getFirstChild(my_node);
710: if xmldom.isNull(my_node) then
711: web_pid_file := null;
712: else
713: web_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));
714: end if;
715: end if;
716:
717: /* bug11844982 */

Line 722: my_nodelist := xmldom.getElementsByTagName(my_doc, 'httpd_pls_pid_file');

718: /* Get the web pls pid file if any, do not show this an error */
719:
720: web_pls_pid_file := null;
721:
722: my_nodelist := xmldom.getElementsByTagName(my_doc, 'httpd_pls_pid_file');
723: listlength := xmldom.getLength(my_nodelist);
724: if listlength > 0 then
725: my_node := xmldom.item(my_nodelist, 0);
726: my_node := xmldom.getFirstChild(my_node);

Line 723: listlength := xmldom.getLength(my_nodelist);

719:
720: web_pls_pid_file := null;
721:
722: my_nodelist := xmldom.getElementsByTagName(my_doc, 'httpd_pls_pid_file');
723: listlength := xmldom.getLength(my_nodelist);
724: if listlength > 0 then
725: my_node := xmldom.item(my_nodelist, 0);
726: my_node := xmldom.getFirstChild(my_node);
727: if not xmldom.isNull(my_node) then

Line 725: my_node := xmldom.item(my_nodelist, 0);

721:
722: my_nodelist := xmldom.getElementsByTagName(my_doc, 'httpd_pls_pid_file');
723: listlength := xmldom.getLength(my_nodelist);
724: if listlength > 0 then
725: my_node := xmldom.item(my_nodelist, 0);
726: my_node := xmldom.getFirstChild(my_node);
727: if not xmldom.isNull(my_node) then
728: web_pls_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));
729: end if;

Line 726: my_node := xmldom.getFirstChild(my_node);

722: my_nodelist := xmldom.getElementsByTagName(my_doc, 'httpd_pls_pid_file');
723: listlength := xmldom.getLength(my_nodelist);
724: if listlength > 0 then
725: my_node := xmldom.item(my_nodelist, 0);
726: my_node := xmldom.getFirstChild(my_node);
727: if not xmldom.isNull(my_node) then
728: web_pls_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));
729: end if;
730: end if;

Line 727: if not xmldom.isNull(my_node) then

723: listlength := xmldom.getLength(my_nodelist);
724: if listlength > 0 then
725: my_node := xmldom.item(my_nodelist, 0);
726: my_node := xmldom.getFirstChild(my_node);
727: if not xmldom.isNull(my_node) then
728: web_pls_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));
729: end if;
730: end if;
731: if web_pls_pid_file is null then

Line 728: web_pls_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));

724: if listlength > 0 then
725: my_node := xmldom.item(my_nodelist, 0);
726: my_node := xmldom.getFirstChild(my_node);
727: if not xmldom.isNull(my_node) then
728: web_pls_pid_file := ltrim(rtrim(xmldom.getNodeValue(my_node)));
729: end if;
730: end if;
731: if web_pls_pid_file is null then
732: web_pls_pid_file := apache_top||'/Apache/Apache/logs/httpd_pls.pid';

Line 736: my_nodelist := xmldom.getElementsByTagName(my_doc, 'logs_dir');

732: web_pls_pid_file := apache_top||'/Apache/Apache/logs/httpd_pls.pid';
733: end if;
734:
735: /* Get logs_dir value, used for reports */
736: my_nodelist := xmldom.getElementsByTagName(my_doc, 'logs_dir');
737: listlength := xmldom.getLength(my_nodelist);
738: if listlength > 0 then
739: my_node := xmldom.item(my_nodelist, 0);
740: my_node := xmldom.getFirstChild(my_node);

Line 737: listlength := xmldom.getLength(my_nodelist);

733: end if;
734:
735: /* Get logs_dir value, used for reports */
736: my_nodelist := xmldom.getElementsByTagName(my_doc, 'logs_dir');
737: listlength := xmldom.getLength(my_nodelist);
738: if listlength > 0 then
739: my_node := xmldom.item(my_nodelist, 0);
740: my_node := xmldom.getFirstChild(my_node);
741: if xmldom.isNull(my_node) then

Line 739: my_node := xmldom.item(my_nodelist, 0);

735: /* Get logs_dir value, used for reports */
736: my_nodelist := xmldom.getElementsByTagName(my_doc, 'logs_dir');
737: listlength := xmldom.getLength(my_nodelist);
738: if listlength > 0 then
739: my_node := xmldom.item(my_nodelist, 0);
740: my_node := xmldom.getFirstChild(my_node);
741: if xmldom.isNull(my_node) then
742: logs_dir := null;
743: else

Line 740: my_node := xmldom.getFirstChild(my_node);

736: my_nodelist := xmldom.getElementsByTagName(my_doc, 'logs_dir');
737: listlength := xmldom.getLength(my_nodelist);
738: if listlength > 0 then
739: my_node := xmldom.item(my_nodelist, 0);
740: my_node := xmldom.getFirstChild(my_node);
741: if xmldom.isNull(my_node) then
742: logs_dir := null;
743: else
744: logs_dir := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 741: if xmldom.isNull(my_node) then

737: listlength := xmldom.getLength(my_nodelist);
738: if listlength > 0 then
739: my_node := xmldom.item(my_nodelist, 0);
740: my_node := xmldom.getFirstChild(my_node);
741: if xmldom.isNull(my_node) then
742: logs_dir := null;
743: else
744: logs_dir := ltrim(rtrim(xmldom.getNodeValue(my_node)));
745: end if;

Line 744: logs_dir := ltrim(rtrim(xmldom.getNodeValue(my_node)));

740: my_node := xmldom.getFirstChild(my_node);
741: if xmldom.isNull(my_node) then
742: logs_dir := null;
743: else
744: logs_dir := ltrim(rtrim(xmldom.getNodeValue(my_node)));
745: end if;
746: else
747: element_name := 'logs_dir oa_var=s_logdir';
748: raise missing_elem;

Line 753: my_nodelist := xmldom.getElementsByTagName(my_doc, 'config_option');

749: end if;
750:
751:
752: /* Get techstack value */
753: my_nodelist := xmldom.getElementsByTagName(my_doc, 'config_option');
754: listlength := xmldom.getLength(my_nodelist);
755: if listlength < 1 then
756: tech_stack := null;
757: end if;

Line 754: listlength := xmldom.getLength(my_nodelist);

750:
751:
752: /* Get techstack value */
753: my_nodelist := xmldom.getElementsByTagName(my_doc, 'config_option');
754: listlength := xmldom.getLength(my_nodelist);
755: if listlength < 1 then
756: tech_stack := null;
757: end if;
758:

Line 760: my_node := xmldom.item(my_nodelist, i);

756: tech_stack := null;
757: end if;
758:
759: for i in 0..listlength-1 loop
760: my_node := xmldom.item(my_nodelist, i);
761: my_element := xmldom.makeElement(my_node);
762: oh_type := xmldom.getAttribute(my_element, 'oa_var');
763: exit when oh_type = 's_techstack';
764: end loop;

Line 761: my_element := xmldom.makeElement(my_node);

757: end if;
758:
759: for i in 0..listlength-1 loop
760: my_node := xmldom.item(my_nodelist, i);
761: my_element := xmldom.makeElement(my_node);
762: oh_type := xmldom.getAttribute(my_element, 'oa_var');
763: exit when oh_type = 's_techstack';
764: end loop;
765:

Line 762: oh_type := xmldom.getAttribute(my_element, 'oa_var');

758:
759: for i in 0..listlength-1 loop
760: my_node := xmldom.item(my_nodelist, i);
761: my_element := xmldom.makeElement(my_node);
762: oh_type := xmldom.getAttribute(my_element, 'oa_var');
763: exit when oh_type = 's_techstack';
764: end loop;
765:
766: if (oh_type = 's_techstack') then

Line 767: my_node := xmldom.getFirstChild(my_node);

763: exit when oh_type = 's_techstack';
764: end loop;
765:
766: if (oh_type = 's_techstack') then
767: my_node := xmldom.getFirstChild(my_node);
768: if xmldom.isNull(my_node) then
769: tech_stack := null;
770: else
771: tech_stack := ltrim(rtrim(xmldom.getNodeValue(my_node)));

Line 768: if xmldom.isNull(my_node) then

764: end loop;
765:
766: if (oh_type = 's_techstack') then
767: my_node := xmldom.getFirstChild(my_node);
768: if xmldom.isNull(my_node) then
769: tech_stack := null;
770: else
771: tech_stack := ltrim(rtrim(xmldom.getNodeValue(my_node)));
772: end if;

Line 771: tech_stack := ltrim(rtrim(xmldom.getNodeValue(my_node)));

767: my_node := xmldom.getFirstChild(my_node);
768: if xmldom.isNull(my_node) then
769: tech_stack := null;
770: else
771: tech_stack := ltrim(rtrim(xmldom.getNodeValue(my_node)));
772: end if;
773: else
774: tech_stack := null;
775: end if;

Line 783: my_nodelist := xmldom.getElementsByTagname(my_doc, 'oa_process');

779: 'core' to Apache control script, else old stuff.
780: */
781:
782: mod_pls_exists := FALSE;
783: my_nodelist := xmldom.getElementsByTagname(my_doc, 'oa_process');
784: listlength := xmldom.getLength(my_nodelist);
785: for i in 0..(listlength -1 ) loop
786: my_node := xmldom.item(my_nodelist, i);
787: my_element := xmldom.makeElement(my_node);

Line 784: listlength := xmldom.getLength(my_nodelist);

780: */
781:
782: mod_pls_exists := FALSE;
783: my_nodelist := xmldom.getElementsByTagname(my_doc, 'oa_process');
784: listlength := xmldom.getLength(my_nodelist);
785: for i in 0..(listlength -1 ) loop
786: my_node := xmldom.item(my_nodelist, i);
787: my_element := xmldom.makeElement(my_node);
788: server_type := xmldom.getAttribute(my_element, 'type');

Line 786: my_node := xmldom.item(my_nodelist, i);

782: mod_pls_exists := FALSE;
783: my_nodelist := xmldom.getElementsByTagname(my_doc, 'oa_process');
784: listlength := xmldom.getLength(my_nodelist);
785: for i in 0..(listlength -1 ) loop
786: my_node := xmldom.item(my_nodelist, i);
787: my_element := xmldom.makeElement(my_node);
788: server_type := xmldom.getAttribute(my_element, 'type');
789:
790: if (server_type = 'apache_pls' ) then

Line 787: my_element := xmldom.makeElement(my_node);

783: my_nodelist := xmldom.getElementsByTagname(my_doc, 'oa_process');
784: listlength := xmldom.getLength(my_nodelist);
785: for i in 0..(listlength -1 ) loop
786: my_node := xmldom.item(my_nodelist, i);
787: my_element := xmldom.makeElement(my_node);
788: server_type := xmldom.getAttribute(my_element, 'type');
789:
790: if (server_type = 'apache_pls' ) then
791: mod_pls_exists := TRUE;

Line 788: server_type := xmldom.getAttribute(my_element, 'type');

784: listlength := xmldom.getLength(my_nodelist);
785: for i in 0..(listlength -1 ) loop
786: my_node := xmldom.item(my_nodelist, i);
787: my_element := xmldom.makeElement(my_node);
788: server_type := xmldom.getAttribute(my_element, 'type');
789:
790: if (server_type = 'apache_pls' ) then
791: mod_pls_exists := TRUE;
792: end if;

Line 798: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_process');

794:
795:
796: /* Register Services */
797:
798: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_process');
799: listlength := xmldom.getLength(my_nodelist);
800: for i in 0..(listlength - 1) loop
801: my_node := xmldom.item(my_nodelist, i);
802: my_element := xmldom.makeElement(my_node);

Line 799: listlength := xmldom.getLength(my_nodelist);

795:
796: /* Register Services */
797:
798: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_process');
799: listlength := xmldom.getLength(my_nodelist);
800: for i in 0..(listlength - 1) loop
801: my_node := xmldom.item(my_nodelist, i);
802: my_element := xmldom.makeElement(my_node);
803: server_type := xmldom.getAttribute(my_element, 'type');

Line 801: my_node := xmldom.item(my_nodelist, i);

797:
798: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_process');
799: listlength := xmldom.getLength(my_nodelist);
800: for i in 0..(listlength - 1) loop
801: my_node := xmldom.item(my_nodelist, i);
802: my_element := xmldom.makeElement(my_node);
803: server_type := xmldom.getAttribute(my_element, 'type');
804:
805:

Line 802: my_element := xmldom.makeElement(my_node);

798: my_nodelist := xmldom.getElementsByTagName(my_doc, 'oa_process');
799: listlength := xmldom.getLength(my_nodelist);
800: for i in 0..(listlength - 1) loop
801: my_node := xmldom.item(my_nodelist, i);
802: my_element := xmldom.makeElement(my_node);
803: server_type := xmldom.getAttribute(my_element, 'type');
804:
805:
806: /* Get the process name */

Line 803: server_type := xmldom.getAttribute(my_element, 'type');

799: listlength := xmldom.getLength(my_nodelist);
800: for i in 0..(listlength - 1) loop
801: my_node := xmldom.item(my_nodelist, i);
802: my_element := xmldom.makeElement(my_node);
803: server_type := xmldom.getAttribute(my_element, 'type');
804:
805:
806: /* Get the process name */
807: my_nodelist2 := xmldom.getElementsByTagName(my_element,

Line 807: my_nodelist2 := xmldom.getElementsByTagName(my_element,

803: server_type := xmldom.getAttribute(my_element, 'type');
804:
805:
806: /* Get the process name */
807: my_nodelist2 := xmldom.getElementsByTagName(my_element,
808: 'oa_process_name');
809: listlength := xmldom.getLength(my_nodelist2);
810: if listlength < 1 then
811: element_name := 'oa_process_name';

Line 809: listlength := xmldom.getLength(my_nodelist2);

805:
806: /* Get the process name */
807: my_nodelist2 := xmldom.getElementsByTagName(my_element,
808: 'oa_process_name');
809: listlength := xmldom.getLength(my_nodelist2);
810: if listlength < 1 then
811: element_name := 'oa_process_name';
812: raise missing_elem;
813: end if;

Line 814: my_node2 := xmldom.item(my_nodelist2, 0);

810: if listlength < 1 then
811: element_name := 'oa_process_name';
812: raise missing_elem;
813: end if;
814: my_node2 := xmldom.item(my_nodelist2, 0);
815: my_node2 := xmldom.getFirstChild(my_node2);
816: if xmldom.isNull(my_node2) then
817: process_name := null;
818: else

Line 815: my_node2 := xmldom.getFirstChild(my_node2);

811: element_name := 'oa_process_name';
812: raise missing_elem;
813: end if;
814: my_node2 := xmldom.item(my_nodelist2, 0);
815: my_node2 := xmldom.getFirstChild(my_node2);
816: if xmldom.isNull(my_node2) then
817: process_name := null;
818: else
819: process_name := ltrim(rtrim(

Line 816: if xmldom.isNull(my_node2) then

812: raise missing_elem;
813: end if;
814: my_node2 := xmldom.item(my_nodelist2, 0);
815: my_node2 := xmldom.getFirstChild(my_node2);
816: if xmldom.isNull(my_node2) then
817: process_name := null;
818: else
819: process_name := ltrim(rtrim(
820: xmldom.getNodeValue(my_node2), '" '), '" ');

Line 820: xmldom.getNodeValue(my_node2), '" '), '" ');

816: if xmldom.isNull(my_node2) then
817: process_name := null;
818: else
819: process_name := ltrim(rtrim(
820: xmldom.getNodeValue(my_node2), '" '), '" ');
821: end if;
822:
823:
824: /* Get the control script name. */

Line 825: my_nodelist2 := xmldom.getElementsByTagName(my_element,

821: end if;
822:
823:
824: /* Get the control script name. */
825: my_nodelist2 := xmldom.getElementsByTagName(my_element,
826: 'ctrl_script');
827: listlength := xmldom.getLength(my_nodelist2);
828: if listlength < 1 then
829: element_name := 'ctrl_script';

Line 827: listlength := xmldom.getLength(my_nodelist2);

823:
824: /* Get the control script name. */
825: my_nodelist2 := xmldom.getElementsByTagName(my_element,
826: 'ctrl_script');
827: listlength := xmldom.getLength(my_nodelist2);
828: if listlength < 1 then
829: element_name := 'ctrl_script';
830: raise missing_elem;
831: end if;

Line 832: my_node2 := xmldom.item(my_nodelist2, 0);

828: if listlength < 1 then
829: element_name := 'ctrl_script';
830: raise missing_elem;
831: end if;
832: my_node2 := xmldom.item(my_nodelist2, 0);
833: my_node2 := xmldom.getFirstChild(my_node2);
834: if xmldom.isNull(my_node2) then
835: ctrl_script := null;
836: else

Line 833: my_node2 := xmldom.getFirstChild(my_node2);

829: element_name := 'ctrl_script';
830: raise missing_elem;
831: end if;
832: my_node2 := xmldom.item(my_nodelist2, 0);
833: my_node2 := xmldom.getFirstChild(my_node2);
834: if xmldom.isNull(my_node2) then
835: ctrl_script := null;
836: else
837: ctrl_script := ltrim(rtrim(

Line 834: if xmldom.isNull(my_node2) then

830: raise missing_elem;
831: end if;
832: my_node2 := xmldom.item(my_nodelist2, 0);
833: my_node2 := xmldom.getFirstChild(my_node2);
834: if xmldom.isNull(my_node2) then
835: ctrl_script := null;
836: else
837: ctrl_script := ltrim(rtrim(
838: xmldom.getNodeValue(my_node2), '" '), '" ');

Line 838: xmldom.getNodeValue(my_node2), '" '), '" ');

834: if xmldom.isNull(my_node2) then
835: ctrl_script := null;
836: else
837: ctrl_script := ltrim(rtrim(
838: xmldom.getNodeValue(my_node2), '" '), '" ');
839: end if;
840:
841:
842: /* Get the log file name name. */

Line 843: my_nodelist2 := xmldom.getElementsByTagName(my_element,

839: end if;
840:
841:
842: /* Get the log file name name. */
843: my_nodelist2 := xmldom.getElementsByTagName(my_element,
844: 'oa_process_log');
845: listlength := xmldom.getLength(my_nodelist2);
846: if listlength < 1 then
847: element_name := 'oa_process_log';

Line 845: listlength := xmldom.getLength(my_nodelist2);

841:
842: /* Get the log file name name. */
843: my_nodelist2 := xmldom.getElementsByTagName(my_element,
844: 'oa_process_log');
845: listlength := xmldom.getLength(my_nodelist2);
846: if listlength < 1 then
847: element_name := 'oa_process_log';
848: raise missing_elem;
849: end if;

Line 850: my_node2 := xmldom.item(my_nodelist2, 0);

846: if listlength < 1 then
847: element_name := 'oa_process_log';
848: raise missing_elem;
849: end if;
850: my_node2 := xmldom.item(my_nodelist2, 0);
851: my_node2 := xmldom.getFirstChild(my_node2);
852: if xmldom.isNull(my_node2) then
853: process_log := null;
854: else

Line 851: my_node2 := xmldom.getFirstChild(my_node2);

847: element_name := 'oa_process_log';
848: raise missing_elem;
849: end if;
850: my_node2 := xmldom.item(my_nodelist2, 0);
851: my_node2 := xmldom.getFirstChild(my_node2);
852: if xmldom.isNull(my_node2) then
853: process_log := null;
854: else
855: process_log := ltrim(rtrim(

Line 852: if xmldom.isNull(my_node2) then

848: raise missing_elem;
849: end if;
850: my_node2 := xmldom.item(my_nodelist2, 0);
851: my_node2 := xmldom.getFirstChild(my_node2);
852: if xmldom.isNull(my_node2) then
853: process_log := null;
854: else
855: process_log := ltrim(rtrim(
856: xmldom.getNodeValue(my_node2), '" '), '" ');

Line 856: xmldom.getNodeValue(my_node2), '" '), '" ');

852: if xmldom.isNull(my_node2) then
853: process_log := null;
854: else
855: process_log := ltrim(rtrim(
856: xmldom.getNodeValue(my_node2), '" '), '" ');
857: end if;
858:
859:
860: if server_type in ('apache','forms','met_cl','met_srv',

Line 1002: my_nodelist2 := xmldom.getElementsByTagName(my_element,

998: '.PID'||';'||'SERVICE='||process_name;
999: end if;
1000:
1001: /* Is the service enabled? */
1002: my_nodelist2 := xmldom.getElementsByTagName(my_element,
1003: 'oa_process_status');
1004: listlength := xmldom.getLength(my_nodelist2);
1005: if listlength < 1 then
1006: element_name := 'oa_process_status';

Line 1004: listlength := xmldom.getLength(my_nodelist2);

1000:
1001: /* Is the service enabled? */
1002: my_nodelist2 := xmldom.getElementsByTagName(my_element,
1003: 'oa_process_status');
1004: listlength := xmldom.getLength(my_nodelist2);
1005: if listlength < 1 then
1006: element_name := 'oa_process_status';
1007: raise missing_elem;
1008: end if;

Line 1009: my_node2 := xmldom.item(my_nodelist2, 0);

1005: if listlength < 1 then
1006: element_name := 'oa_process_status';
1007: raise missing_elem;
1008: end if;
1009: my_node2 := xmldom.item(my_nodelist2, 0);
1010: my_node2 := xmldom.getFirstChild(my_node2);
1011: if xmldom.isNull(my_node2) then
1012: status := 'disabled';
1013: else

Line 1010: my_node2 := xmldom.getFirstChild(my_node2);

1006: element_name := 'oa_process_status';
1007: raise missing_elem;
1008: end if;
1009: my_node2 := xmldom.item(my_nodelist2, 0);
1010: my_node2 := xmldom.getFirstChild(my_node2);
1011: if xmldom.isNull(my_node2) then
1012: status := 'disabled';
1013: else
1014: status := ltrim(rtrim(xmldom.getNodeValue(my_node2), '" '), '" ');

Line 1011: if xmldom.isNull(my_node2) then

1007: raise missing_elem;
1008: end if;
1009: my_node2 := xmldom.item(my_nodelist2, 0);
1010: my_node2 := xmldom.getFirstChild(my_node2);
1011: if xmldom.isNull(my_node2) then
1012: status := 'disabled';
1013: else
1014: status := ltrim(rtrim(xmldom.getNodeValue(my_node2), '" '), '" ');
1015: end if;

Line 1014: status := ltrim(rtrim(xmldom.getNodeValue(my_node2), '" '), '" ');

1010: my_node2 := xmldom.getFirstChild(my_node2);
1011: if xmldom.isNull(my_node2) then
1012: status := 'disabled';
1013: else
1014: status := ltrim(rtrim(xmldom.getNodeValue(my_node2), '" '), '" ');
1015: end if;
1016:
1017: if status = 'enabled' then
1018: /* Does the service exist in GSM? */

Line 1081: if (not xmldom.isNull(my_doc)) then

1077: exception
1078: when program_error then
1079: message := fnd_manager.message;
1080:
1081: if (not xmldom.isNull(my_doc)) then
1082: xmldom.freeDocument (my_doc);
1083: end if;
1084: xmlparser.freeParser (my_parser);
1085:

Line 1082: xmldom.freeDocument (my_doc);

1078: when program_error then
1079: message := fnd_manager.message;
1080:
1081: if (not xmldom.isNull(my_doc)) then
1082: xmldom.freeDocument (my_doc);
1083: end if;
1084: xmlparser.freeParser (my_parser);
1085:
1086: retcode := 1;

Line 1097: if (not xmldom.isNull(my_doc)) then

1093: fnd_message.set_token('ERRNO', SQLCODE);
1094: fnd_message.set_token('REASON', SQLERRM);
1095: message := fnd_message.get;
1096:
1097: if (not xmldom.isNull(my_doc)) then
1098: xmldom.freeDocument (my_doc);
1099: end if;
1100: xmlparser.freeParser (my_parser);
1101:

Line 1098: xmldom.freeDocument (my_doc);

1094: fnd_message.set_token('REASON', SQLERRM);
1095: message := fnd_message.get;
1096:
1097: if (not xmldom.isNull(my_doc)) then
1098: xmldom.freeDocument (my_doc);
1099: end if;
1100: xmlparser.freeParser (my_parser);
1101:
1102: retcode := 1;

Line 1121: if (not xmldom.isNull(my_doc)) then

1117: end if;
1118:
1119: end loop;
1120:
1121: if (not xmldom.isNull(my_doc)) then
1122: xmldom.freeDocument (my_doc);
1123: end if;
1124:
1125: xmlparser.freeParser (my_parser);

Line 1122: xmldom.freeDocument (my_doc);

1118:
1119: end loop;
1120:
1121: if (not xmldom.isNull(my_doc)) then
1122: xmldom.freeDocument (my_doc);
1123: end if;
1124:
1125: xmlparser.freeParser (my_parser);
1126:

Line 1131: if (not xmldom.isNull(my_doc)) then

1127: retcode := 0;
1128:
1129: exception
1130: when metadata_file then
1131: if (not xmldom.isNull(my_doc)) then
1132: xmldom.freeDocument (my_doc);
1133: end if;
1134: xmlparser.freeParser (my_parser);
1135:

Line 1132: xmldom.freeDocument (my_doc);

1128:
1129: exception
1130: when metadata_file then
1131: if (not xmldom.isNull(my_doc)) then
1132: xmldom.freeDocument (my_doc);
1133: end if;
1134: xmlparser.freeParser (my_parser);
1135:
1136: retcode := 0;

Line 1143: if (not xmldom.isNull(my_doc)) then

1139: fnd_message.set_name('FND', 'GSM-CTX NULL CONTEXT');
1140: fnd_message.set_token('FILE', filepath);
1141: message := fnd_message.get;
1142:
1143: if (not xmldom.isNull(my_doc)) then
1144: xmldom.freeDocument (my_doc);
1145: end if;
1146: xmlparser.freeParser (my_parser);
1147:

Line 1144: xmldom.freeDocument (my_doc);

1140: fnd_message.set_token('FILE', filepath);
1141: message := fnd_message.get;
1142:
1143: if (not xmldom.isNull(my_doc)) then
1144: xmldom.freeDocument (my_doc);
1145: end if;
1146: xmlparser.freeParser (my_parser);
1147:
1148: retcode := 1;

Line 1155: if (not xmldom.isNull(my_doc)) then

1151: fnd_message.set_name('FND', 'GSM-CTX FILE SYS COPY LOW');
1152: fnd_message.set_token('FILE', filepath);
1153: message := fnd_message.get;
1154:
1155: if (not xmldom.isNull(my_doc)) then
1156: xmldom.freeDocument (my_doc);
1157: end if;
1158: xmlparser.freeParser (my_parser);
1159:

Line 1156: xmldom.freeDocument (my_doc);

1152: fnd_message.set_token('FILE', filepath);
1153: message := fnd_message.get;
1154:
1155: if (not xmldom.isNull(my_doc)) then
1156: xmldom.freeDocument (my_doc);
1157: end if;
1158: xmlparser.freeParser (my_parser);
1159:
1160: retcode := 1;

Line 1168: if (not xmldom.isNull(my_doc)) then

1164: fnd_message.set_token('ELEMENT', element_name);
1165: fnd_message.set_token('FILE', filepath);
1166: message := fnd_message.get;
1167:
1168: if (not xmldom.isNull(my_doc)) then
1169: xmldom.freeDocument (my_doc);
1170: end if;
1171: xmlparser.freeParser (my_parser);
1172:

Line 1169: xmldom.freeDocument (my_doc);

1165: fnd_message.set_token('FILE', filepath);
1166: message := fnd_message.get;
1167:
1168: if (not xmldom.isNull(my_doc)) then
1169: xmldom.freeDocument (my_doc);
1170: end if;
1171: xmlparser.freeParser (my_parser);
1172:
1173: retcode := 1;

Line 1180: if (not xmldom.isNull(my_doc)) then

1176: fnd_message.set_name('FND', 'GSM-CTX NODE NAME TOO LONG');
1177: fnd_message.set_token('NODE_NAME', tmp_node_name);
1178: message := fnd_message.get;
1179:
1180: if (not xmldom.isNull(my_doc)) then
1181: xmldom.freeDocument (my_doc);
1182: end if;
1183: xmlparser.freeParser (my_parser);
1184:

Line 1181: xmldom.freeDocument (my_doc);

1177: fnd_message.set_token('NODE_NAME', tmp_node_name);
1178: message := fnd_message.get;
1179:
1180: if (not xmldom.isNull(my_doc)) then
1181: xmldom.freeDocument (my_doc);
1182: end if;
1183: xmlparser.freeParser (my_parser);
1184:
1185: retcode := 1;

Line 1194: if (not xmldom.isNull(my_doc)) then

1190: fnd_message.set_token('ERRNO', SQLCODE);
1191: fnd_message.set_token('REASON', SQLERRM);
1192: message := fnd_message.get;
1193:
1194: if (not xmldom.isNull(my_doc)) then
1195: xmldom.freeDocument (my_doc);
1196: end if;
1197: xmlparser.freeParser (my_parser);
1198:

Line 1195: xmldom.freeDocument (my_doc);

1191: fnd_message.set_token('REASON', SQLERRM);
1192: message := fnd_message.get;
1193:
1194: if (not xmldom.isNull(my_doc)) then
1195: xmldom.freeDocument (my_doc);
1196: end if;
1197: xmlparser.freeParser (my_parser);
1198:
1199: retcode := 1;