DBA Data[Home] [Help]

APPS.CLN_RN_UTILS dependencies on XMLDOM

Line 794: l_domDoc xmldom.DOMDocument;

790: IS
791: l_xmlDoc CLOB;
792: l_payload CLOB;
793: l_parser xmlparser.parser;
794: l_domDoc xmldom.DOMDocument;
795: l_node xmldom.domNode;
796: l_nodelist xmldom.DOMNodeList;
797: l_nodelistlen NUMBER;
798: l_error_code VARCHAR2(255);

Line 795: l_node xmldom.domNode;

791: l_xmlDoc CLOB;
792: l_payload CLOB;
793: l_parser xmlparser.parser;
794: l_domDoc xmldom.DOMDocument;
795: l_node xmldom.domNode;
796: l_nodelist xmldom.DOMNodeList;
797: l_nodelistlen NUMBER;
798: l_error_code VARCHAR2(255);
799: l_error_msg VARCHAR2(1000);

Line 796: l_nodelist xmldom.DOMNodeList;

792: l_payload CLOB;
793: l_parser xmlparser.parser;
794: l_domDoc xmldom.DOMDocument;
795: l_node xmldom.domNode;
796: l_nodelist xmldom.DOMNodeList;
797: l_nodelistlen NUMBER;
798: l_error_code VARCHAR2(255);
799: l_error_msg VARCHAR2(1000);
800: l_msg_data VARCHAR2(1000);

Line 872: l_root_element:= xmldom.getNodeName( xmldom.makeNode(xmldom.getDocumentElement(l_domDoc))); -- Getting the root element of the document

868: l_domDoc := xmlparser.getDocument(l_parser);
869: IF (l_Debug_Level <= 1) THEN
870: cln_debug_pub.Add('About to get root element', 1);
871: END IF;
872: l_root_element:= xmldom.getNodeName( xmldom.makeNode(xmldom.getDocumentElement(l_domDoc))); -- Getting the root element of the document
873: IF (l_Debug_Level <= 1) THEN
874: cln_debug_pub.Add('Root element :' || l_root_element, 1);
875: END IF;
876: OPEN c_validations(l_root_element);

Line 891: l_nodelist := xmldom.getElementsByTagName(l_domDoc, l_xml_elements(i));

887: cln_debug_pub.Add('l_max_lengths:' || l_max_lengths(i), 1);
888: cln_debug_pub.Add('l_types:' || l_types(i), 1);
889: cln_debug_pub.Add('l_formats:' || l_formats(i), 1);
890: END IF;
891: l_nodelist := xmldom.getElementsByTagName(l_domDoc, l_xml_elements(i));
892: l_nodelistlen := xmldom.getLength(l_nodelist);
893: IF (l_Debug_Level <= 1) THEN
894: cln_debug_pub.Add('Number of element found :' || l_nodelistlen, 1);
895: END IF;

Line 892: l_nodelistlen := xmldom.getLength(l_nodelist);

888: cln_debug_pub.Add('l_types:' || l_types(i), 1);
889: cln_debug_pub.Add('l_formats:' || l_formats(i), 1);
890: END IF;
891: l_nodelist := xmldom.getElementsByTagName(l_domDoc, l_xml_elements(i));
892: l_nodelistlen := xmldom.getLength(l_nodelist);
893: IF (l_Debug_Level <= 1) THEN
894: cln_debug_pub.Add('Number of element found :' || l_nodelistlen, 1);
895: END IF;
896: FOR l_counter IN 0..l_nodelistlen-1 LOOP

Line 900: l_node := xmldom.item(l_nodelist, l_counter);

896: FOR l_counter IN 0..l_nodelistlen-1 LOOP
897: IF (l_Debug_Level <= 1) THEN
898: cln_debug_pub.Add('Trying to do validation - loop counter:' || l_counter, 1);
899: END IF;
900: l_node := xmldom.item(l_nodelist, l_counter);
901: --l_name := xmldom.getNodeName(l_node);
902: l_node := xmldom.getFirstChild(l_node);
903: IF xmldom.isNull(l_node) THEN
904: l_value := null;

Line 901: --l_name := xmldom.getNodeName(l_node);

897: IF (l_Debug_Level <= 1) THEN
898: cln_debug_pub.Add('Trying to do validation - loop counter:' || l_counter, 1);
899: END IF;
900: l_node := xmldom.item(l_nodelist, l_counter);
901: --l_name := xmldom.getNodeName(l_node);
902: l_node := xmldom.getFirstChild(l_node);
903: IF xmldom.isNull(l_node) THEN
904: l_value := null;
905: IF (l_Debug_Level <= 1) THEN

Line 902: l_node := xmldom.getFirstChild(l_node);

898: cln_debug_pub.Add('Trying to do validation - loop counter:' || l_counter, 1);
899: END IF;
900: l_node := xmldom.item(l_nodelist, l_counter);
901: --l_name := xmldom.getNodeName(l_node);
902: l_node := xmldom.getFirstChild(l_node);
903: IF xmldom.isNull(l_node) THEN
904: l_value := null;
905: IF (l_Debug_Level <= 1) THEN
906: cln_debug_pub.Add('Value is null. So no need to do validation', 1);

Line 903: IF xmldom.isNull(l_node) THEN

899: END IF;
900: l_node := xmldom.item(l_nodelist, l_counter);
901: --l_name := xmldom.getNodeName(l_node);
902: l_node := xmldom.getFirstChild(l_node);
903: IF xmldom.isNull(l_node) THEN
904: l_value := null;
905: IF (l_Debug_Level <= 1) THEN
906: cln_debug_pub.Add('Value is null. So no need to do validation', 1);
907: END IF;

Line 913: ELSIF xmldom.getNodeType(l_node) = xmldom.TEXT_NODE THEN -- get the text node associated with the element node

909: /*IF NOT VALIDATE_ELEMENT(l_xml_elements(i),l_value, l_min_lengths(i),l_max_lengths(i),l_types(i),l_formats(i), l_error_message) THEN
910: --Validation failed
911: RAISE Validation_Failed;
912: END IF;*/
913: ELSIF xmldom.getNodeType(l_node) = xmldom.TEXT_NODE THEN -- get the text node associated with the element node
914: l_value := xmldom.getNodeValue(l_node);
915: IF (l_Debug_Level <= 1) THEN
916: cln_debug_pub.Add('Value of the tag : ' || l_value , 1);
917: END IF;

Line 914: l_value := xmldom.getNodeValue(l_node);

910: --Validation failed
911: RAISE Validation_Failed;
912: END IF;*/
913: ELSIF xmldom.getNodeType(l_node) = xmldom.TEXT_NODE THEN -- get the text node associated with the element node
914: l_value := xmldom.getNodeValue(l_node);
915: IF (l_Debug_Level <= 1) THEN
916: cln_debug_pub.Add('Value of the tag : ' || l_value , 1);
917: END IF;
918: IF( (l_value is not null)) THEN -- Need not do validation for nodes that doesnt have values

Line 1248: l_domDoc xmldom.DOMDocument;

1244: )
1245: IS
1246: l_xmlDoc CLOB;
1247: l_parser xmlparser.parser := xmlparser.newParser;
1248: l_domDoc xmldom.DOMDocument;
1249: l_node xmldom.domNode;
1250: l_element xmldom.domElement;
1251: l_nodeList xmldom.domNodeList;
1252: l_size number;

Line 1249: l_node xmldom.domNode;

1245: IS
1246: l_xmlDoc CLOB;
1247: l_parser xmlparser.parser := xmlparser.newParser;
1248: l_domDoc xmldom.DOMDocument;
1249: l_node xmldom.domNode;
1250: l_element xmldom.domElement;
1251: l_nodeList xmldom.domNodeList;
1252: l_size number;
1253: l_Nname varchar2(255);

Line 1250: l_element xmldom.domElement;

1246: l_xmlDoc CLOB;
1247: l_parser xmlparser.parser := xmlparser.newParser;
1248: l_domDoc xmldom.DOMDocument;
1249: l_node xmldom.domNode;
1250: l_element xmldom.domElement;
1251: l_nodeList xmldom.domNodeList;
1252: l_size number;
1253: l_Nname varchar2(255);
1254: l_Nvalue varchar2(255);

Line 1251: l_nodeList xmldom.domNodeList;

1247: l_parser xmlparser.parser := xmlparser.newParser;
1248: l_domDoc xmldom.DOMDocument;
1249: l_node xmldom.domNode;
1250: l_element xmldom.domElement;
1251: l_nodeList xmldom.domNodeList;
1252: l_size number;
1253: l_Nname varchar2(255);
1254: l_Nvalue varchar2(255);
1255: l_error_code VARCHAR2(255);

Line 1314: l_element := xmldom.getDocumentElement(l_domDoc);

1310: xmlparser.parseClob(l_parser,l_xmlDoc);
1311: END IF;
1312:
1313: l_domDoc := xmlparser.getDocument(l_parser);
1314: l_element := xmldom.getDocumentElement(l_domDoc);
1315:
1316: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, 'CNTROLAREA');
1317: --l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));
1318: --l_nodeList := Xmldom.getElementsByTagName(l_element, 'REFERENCEID');

Line 1316: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, 'CNTROLAREA');

1312:
1313: l_domDoc := xmlparser.getDocument(l_parser);
1314: l_element := xmldom.getDocumentElement(l_domDoc);
1315:
1316: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, 'CNTROLAREA');
1317: --l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));
1318: --l_nodeList := Xmldom.getElementsByTagName(l_element, 'REFERENCEID');
1319:
1320:

Line 1317: --l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));

1313: l_domDoc := xmlparser.getDocument(l_parser);
1314: l_element := xmldom.getDocumentElement(l_domDoc);
1315:
1316: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, 'CNTROLAREA');
1317: --l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));
1318: --l_nodeList := Xmldom.getElementsByTagName(l_element, 'REFERENCEID');
1319:
1320:
1321: l_remaining_part := p_tag_path;

Line 1318: --l_nodeList := Xmldom.getElementsByTagName(l_element, 'REFERENCEID');

1314: l_element := xmldom.getDocumentElement(l_domDoc);
1315:
1316: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, 'CNTROLAREA');
1317: --l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));
1318: --l_nodeList := Xmldom.getElementsByTagName(l_element, 'REFERENCEID');
1319:
1320:
1321: l_remaining_part := p_tag_path;
1322: while length(l_remaining_part) > 0 loop

Line 1328: l_nodeList := Xmldom.getElementsByTagName(l_element, l_part);

1324: if(l_PipeExists > 0) then
1325: l_part := substr(l_remaining_part,1,l_PipeExists-1);
1326: l_remaining_part := substr(l_remaining_part,l_PipeExists+1);
1327:
1328: l_nodeList := Xmldom.getElementsByTagName(l_element, l_part);
1329: l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));
1330: else
1331: l_part := l_remaining_part;
1332: l_remaining_part := '';

Line 1329: l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));

1325: l_part := substr(l_remaining_part,1,l_PipeExists-1);
1326: l_remaining_part := substr(l_remaining_part,l_PipeExists+1);
1327:
1328: l_nodeList := Xmldom.getElementsByTagName(l_element, l_part);
1329: l_element := xmldom.makeElement(xmldom.item( l_nodeList, 0 ));
1330: else
1331: l_part := l_remaining_part;
1332: l_remaining_part := '';
1333:

Line 1334: l_nodeList := Xmldom.getElementsByTagName(l_element, l_part);

1330: else
1331: l_part := l_remaining_part;
1332: l_remaining_part := '';
1333:
1334: l_nodeList := Xmldom.getElementsByTagName(l_element, l_part);
1335: end if;
1336:
1337: IF (l_Debug_Level <= 1) THEN
1338: cln_debug_pub.Add('l_remaining_part:' || l_remaining_part,1);

Line 1342: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, l_part);

1338: cln_debug_pub.Add('l_remaining_part:' || l_remaining_part,1);
1339: END IF;
1340: end loop;
1341:
1342: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, l_part);
1343: l_node := xmldom.item( l_nodeList, 0 );
1344: l_Nvalue := xmldom.getNodeName(l_node);
1345: l_node := xmldom.getFirstChild(l_node);
1346:

Line 1343: l_node := xmldom.item( l_nodeList, 0 );

1339: END IF;
1340: end loop;
1341:
1342: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, l_part);
1343: l_node := xmldom.item( l_nodeList, 0 );
1344: l_Nvalue := xmldom.getNodeName(l_node);
1345: l_node := xmldom.getFirstChild(l_node);
1346:
1347: IF NOT xmldom.IsNull(l_node) THEN

Line 1344: l_Nvalue := xmldom.getNodeName(l_node);

1340: end loop;
1341:
1342: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, l_part);
1343: l_node := xmldom.item( l_nodeList, 0 );
1344: l_Nvalue := xmldom.getNodeName(l_node);
1345: l_node := xmldom.getFirstChild(l_node);
1346:
1347: IF NOT xmldom.IsNull(l_node) THEN
1348: x_tag_value := xmldom.getNodeValue(l_node);

Line 1345: l_node := xmldom.getFirstChild(l_node);

1341:
1342: --l_nodeList := Xmldom.getElementsByTagName(l_domDoc, l_part);
1343: l_node := xmldom.item( l_nodeList, 0 );
1344: l_Nvalue := xmldom.getNodeName(l_node);
1345: l_node := xmldom.getFirstChild(l_node);
1346:
1347: IF NOT xmldom.IsNull(l_node) THEN
1348: x_tag_value := xmldom.getNodeValue(l_node);
1349: END IF;

Line 1347: IF NOT xmldom.IsNull(l_node) THEN

1343: l_node := xmldom.item( l_nodeList, 0 );
1344: l_Nvalue := xmldom.getNodeName(l_node);
1345: l_node := xmldom.getFirstChild(l_node);
1346:
1347: IF NOT xmldom.IsNull(l_node) THEN
1348: x_tag_value := xmldom.getNodeValue(l_node);
1349: END IF;
1350:
1351: EXCEPTION

Line 1348: x_tag_value := xmldom.getNodeValue(l_node);

1344: l_Nvalue := xmldom.getNodeName(l_node);
1345: l_node := xmldom.getFirstChild(l_node);
1346:
1347: IF NOT xmldom.IsNull(l_node) THEN
1348: x_tag_value := xmldom.getNodeValue(l_node);
1349: END IF;
1350:
1351: EXCEPTION
1352: WHEN OTHERS THEN